Top Level Namespace

Defined Under Namespace

Modules: IE_CONST, IXMLDOMAttribute, IXMLDOMCDATASection, IXMLDOMCharacterData, IXMLDOMComment, IXMLDOMDocument, IXMLDOMDocumentFragment, IXMLDOMDocumentType, IXMLDOMElement, IXMLDOMEntity, IXMLDOMEntityReference, IXMLDOMImplementation, IXMLDOMNamedNodeMap, IXMLDOMNode, IXMLDOMNodeList, IXMLDOMNotation, IXMLDOMParseError, IXMLDOMProcessingInstruction, IXMLDOMText, IXMLHttpRequest, IXTLRuntime, OLEtagDOMNodeType, OLEtagXMLEMEM_TYPE Classes: IEHandler, Microsoft_FreeThreadedXMLDOM_1_0, Microsoft_XMLDOM_1_0, Microsoft_XMLDSO_1_0, Microsoft_XMLHTTP_1, Msxml, OLEProperty, WIN32COMGen, WIN32OLE, WIN32OLEQueryInterfaceError, WIN32OLERuntimeError, WIN32OLE_EVENT, WIN32OLE_METHOD, WIN32OLE_PARAM, WIN32OLE_RECORD, WIN32OLE_TYPE, WIN32OLE_TYPELIB, WIN32OLE_VARIABLE, WIN32OLE_VARIANT

Constant Summary collapse

ChartTypeVal =

-4100 is the value for the Excel constant xl3DColumn.

-4100;

Instance Method Summary collapse

Instance Method Details

#create_win32ole_makefile ⇒ Object 



16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
 
# File 'extconf.rb', line 16

def create_win32ole_makefile
  if have_library("ole32") and
     have_library("oleaut32") and
     have_library("uuid", "&CLSID_CMultiLanguage", "mlang.h") and
     have_library("user32") and
     have_library("kernel32") and
     have_library("advapi32") and
     have_header("windows.h")
    unless have_type("IMultiLanguage2", "mlang.h")
      have_type("IMultiLanguage", "mlang.h")
    end
    spec = nil
    checking_for('thread_specific', '%s') do
      spec = %w[__declspec(thread) __thread].find {|th|
        try_compile("#{th} int foo;", "", :werror => true)
      }
      spec or 'no'
    end
    $defs << "-DRB_THREAD_SPECIFIC=#{spec}" if spec
    create_makefile("win32ole")
  end
end

#default_handler(event, *args) ⇒ Object 



15
16
17
18
19
20
 
# File 'sample/ienavi.rb', line 15

def default_handler(event, *args)
  case event
  when "BeforeNavigate"
    puts "Now Navigate #{args[0]}..."
  end
end

#listup(items) ⇒ Object 



8
9
10
11
12
13
 
# File 'sample/oledirs.rb', line 8

def listup(items)
#  items.each do |i|
  for i in items
    puts i.name
  end
end

#navigate(url) ⇒ Object 



6
7
8
 
# File 'sample/ienavi.rb', line 6

def navigate(url)
  $urls << url
end

#stop_msg_loop ⇒ Object 



10
11
12
13
 
# File 'sample/ienavi.rb', line 10

def stop_msg_loop
  puts "Now Stop IE..."
  $LOOP = false;
end