1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

* ext/win32ole/sample/example*.rb: Add wait input to quit for examples

Browse Source 
with patch provided by @windwiny [Fixes GH-705]
  https://github.com/ruby/ruby/pull/705


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@47784 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
zzak 2014-10-04 00:13:18 +00:00
parent 34fcb5dbee
commit b4e9ffbdc8
4 changed files with 20 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ChangeLog
View File

@ -1,3 +1,9 @@
Sat Oct 4 09:12:03 2014 Zachary Scott <e@zzak.io>
* ext/win32ole/sample/example*.rb: Add wait input to quit for examples
with patch provided by @windwiny [Fixes GH-705]
https://github.com/ruby/ruby/pull/705
Sat Oct 4 09:08:18 2014 Zachary Scott <e@zzak.io> Sat Oct 4 09:08:18 2014 Zachary Scott <e@zzak.io>
* ext/win32ole/win32ole.c: [DOC] Fix typo in :nodoc: reported by * ext/win32ole/win32ole.c: [DOC] Fix typo in :nodoc: reported by

5
ext/win32ole/sample/excel1.rb
View File

@ -27,7 +27,10 @@ range.Select
chart = workbook.Charts.Add; chart = workbook.Charts.Add;
workbook.saved = TRUE; workbook.saved = TRUE;
sleep 0.5
print "Now quit Excel... Please enter."
gets
application.ActiveWorkbook.Close(0); application.ActiveWorkbook.Close(0);
application.Quit(); application.Quit();

3
ext/win32ole/sample/excel2.rb
View File

@ -23,5 +23,8 @@ i.step(180, 10) do |rot|
end end
# Done, bye # Done, bye
print "Now quit Excel... Please enter."
gets
excel.ActiveWorkbook.Close(0); excel.ActiveWorkbook.Close(0);
excel.Quit(); excel.Quit();

7
ext/win32ole/sample/excel3.rb
View File

@ -11,3 +11,10 @@ puts "The number of sheets is #{sheetS.count}"
puts "Now add 2 sheets after of `#{sheet.name}`" puts "Now add 2 sheets after of `#{sheet.name}`"
sheetS.add({'count'=>2, 'after'=>sheet}) sheetS.add({'count'=>2, 'after'=>sheet})
puts "The number of sheets is #{sheetS.count}" puts "The number of sheets is #{sheetS.count}"
print "Now quit Excel... Please enter."
gets
application.ActiveWorkbook.Close(0);
application.Quit();