1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
platform_is :windows do
require 'win32ole'
describe "WIN32OLE_METHOD#params" do
before :each do
ole_type = WIN32OLE_TYPE.new("Microsoft Scripting Runtime", "File")
@m_file_name = WIN32OLE_METHOD.new(ole_type, "name")
ole_type = WIN32OLE_TYPE.new("Microsoft Shell Controls And Automation", "Shell")
@m_browse_for_folder = WIN32OLE_METHOD.new(ole_type, "BrowseForFolder")
end
it "raises ArgumentError if argument is given" do
lambda { @m_file_name.params(1) }.should raise_error ArgumentError
end
it "returns empty array for Scripting Runtime's 'name' method" do
@m_file_name.params.should be_kind_of Array
@m_file_name.params.should be_empty
end
it "returns 4-element array of WIN32OLE_PARAM for Shell's 'BrowseForFolder' method" do
@m_browse_for_folder.params.all? { |p| p.kind_of? WIN32OLE_PARAM }.should be_true
@m_browse_for_folder.params.size == 4
end
end
end
|
