Top Level Namespace

Defined Under Namespace

Modules: CONST1, CONST2, CONST3, EXCEL_CONST, IE_CONST, IXMLDOMAttribute, IXMLDOMCDATASection, IXMLDOMCharacterData, IXMLDOMComment, IXMLDOMDocument, IXMLDOMDocumentFragment, IXMLDOMDocumentType, IXMLDOMElement, IXMLDOMEntity, IXMLDOMEntityReference, IXMLDOMImplementation, IXMLDOMNamedNodeMap, IXMLDOMNode, IXMLDOMNodeList, IXMLDOMNotation, IXMLDOMParseError, IXMLDOMProcessingInstruction, IXMLDOMText, IXMLHttpRequest, IXTLRuntime, OLESERVER, OLEtagDOMNodeType, OLEtagXMLEMEM_TYPE Classes: Microsoft_FreeThreadedXMLDOM_1_0, Microsoft_XMLDOM_1_0, Microsoft_XMLDSO_1_0, Microsoft_XMLHTTP_1, Msxml, MyExcel, OLEProperty, TestMyExcel, TestNIL2VT_EMPTY, TestOLEMETHOD, TestOLEPARAM, TestOLETYPE, TestOLEVARIABLE, TestWIN32OLE_EVENT, TestWIN32OLE_FOR_PROPERTYPUTREF, TestWIN32OLE_PROPERTYPUTREF, TestWIN32OLE_WITH_WORD, TestWin32OLE, TestWin32OLE_VARIANT, TestWin32OLE_WITH_MSI, WIN32COMGen, WIN32OLE, WIN32OLERuntimeError, WIN32OLE_EVENT, WIN32OLE_METHOD, WIN32OLE_PARAM, WIN32OLE_TYPE, WIN32OLE_VARIABLE

Constant Summary collapse

SRCFILES = 
<<SRC
win32ole.c
SRC
ChartTypeVal =

-4100 is the value for the Excel constant xl3DColumn.

4100

Instance Method Summary collapse

Instance Method Details

#create_docfile(src) ⇒ Object 



14
15
16
17
18
 
# File 'extconf.rb', line 14

def create_docfile(src)
  open(File.expand_path($srcdir) + "/.document", "w") {|ofs|
    ofs.print src
  }
end

#create_win32ole_makefile ⇒ Object 



20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
# File 'extconf.rb', line 20

def create_win32ole_makefile
  if have_library("ole32") and
     have_library("oleaut32") and
     have_library("uuid") and 
     have_library("user32") and
     have_library("kernel32") and
     have_library("advapi32") and
     have_header("windows.h")
    create_makefile("win32ole")
    create_docfile(SRCFILES)
  else
    create_docfile("")
  end
end

#default_handler(event, *args) ⇒ Object 



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

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

#listup(items) ⇒ Object 



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

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

#navigate(url) ⇒ Object 



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

def navigate(url)
  $urls << url
end

#oletypelib_name(pat) ⇒ Object 



2
3
4
5
6
 
# File 'tests/oleserver.rb', line 2

def oletypelib_name(pat)
  WIN32OLE_TYPE.typelibs.each do |lib|
    return lib if pat =~ lib
  end
end

#stop_msg_loop ⇒ Object 



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

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