diff options
| -rw-r--r-- | ChangeLog | 5 | ||||
| -rw-r--r-- | ext/win32ole/sample/excel2.rb | 7 |
2 files changed, 7 insertions, 5 deletions
@@ -1,3 +1,8 @@ +Tue Sep 9 21:55:39 2014 Masaki Suketa <masaki.suketa@nifty.ne.jp> + + * ext/win32ole/sample/excel2.rb: remove some commented-out code. + rotate graph more slowly to see graph clearly. + Tue Sep 9 19:52:33 2014 Koichi Sasada <ko1@atdot.net> * gc.c: rename rb_objspace_t::marked_objects to marked_slots. diff --git a/ext/win32ole/sample/excel2.rb b/ext/win32ole/sample/excel2.rb index dbe4178051..95af61ceb6 100644 --- a/ext/win32ole/sample/excel2.rb +++ b/ext/win32ole/sample/excel2.rb @@ -4,11 +4,9 @@ require 'win32ole' ChartTypeVal = -4100; # Creates OLE object to Excel -#excel = WIN32OLE.new("excel.application.5") excel = WIN32OLE.new("excel.application") # Create and rotate the chart - excel.visible = TRUE; excel.Workbooks.Add(); excel.Range("a1").value = 3; @@ -18,13 +16,12 @@ excel.Range("a1:a3").Select(); excelchart = excel.Charts.Add(); excelchart.type = ChartTypeVal; -i = 30 +i = 0 i.step(180, 10) do |rot| -# excelchart['Rotation'] = rot; excelchart.rotation=rot; + sleep 0.1 end # Done, bye excel.ActiveWorkbook.Close(0); excel.Quit(); - |