Linux server1.dn-server.com 4.18.0-553.89.1.lve.el8.x86_64 #1 SMP Wed Dec 10 13:58:50 UTC 2025 x86_64
LiteSpeed
Server IP : 195.201.204.189 & Your IP : 216.73.217.130
Domains :
Cant Read [ /etc/named.conf ]
User : beriska1
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
opt /
alt /
ruby20 /
share /
doc /
ruby /
capi /
html /
d2 /
d99 /
Delete
Unzip
Name
Size
Permission
Date
Action
win32ole_8c.html
1.16
MB
-rw-r--r--
2023-07-26 17:36
win32ole_8c_source.html
2.09
MB
-rw-r--r--
2023-07-26 17:36
Save
Rename
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/> <meta http-equiv="X-UA-Compatible" content="IE=9"/> <meta name="generator" content="Doxygen 1.8.14"/> <meta name="viewport" content="width=device-width, initial-scale=1"/> <title>Ruby: ext/win32ole/win32ole.c Source File</title> <link href="../../tabs.css" rel="stylesheet" type="text/css"/> <script type="text/javascript" src="../../jquery.js"></script> <script type="text/javascript" src="../../dynsections.js"></script> <link href="../../doxygen.css" rel="stylesheet" type="text/css" /> </head> <body> <div id="top"><!-- do not remove this div, it is closed by doxygen! --> <div id="titlearea"> <table cellspacing="0" cellpadding="0"> <tbody> <tr style="height: 56px;"> <td id="projectalign" style="padding-left: 0.5em;"> <div id="projectname">Ruby  <span id="projectnumber">2.0.0p648(2015-12-16revision53162)</span> </div> </td> </tr> </tbody> </table> </div> <!-- end header part --> <!-- Generated by Doxygen 1.8.14 --> <script type="text/javascript" src="../../menudata.js"></script> <script type="text/javascript" src="../../menu.js"></script> <script type="text/javascript"> /* @license magnet:?xt=urn:btih:cf05388f2679ee054f2beb29a391d25f4e673ac3&dn=gpl-2.0.txt GPL-v2 */ $(function() { initMenu('../../',false,false,'search.php','Search'); }); /* @license-end */</script> <div id="main-nav"></div> <div id="nav-path" class="navpath"> <ul> <li class="navelem"><a class="el" href="../../dir_31cedd4509e06940f559c1ca2f722e02.html">ext</a></li><li class="navelem"><a class="el" href="../../dir_c921c6e9e40b1e5d7cbe74d9e649c6d7.html">win32ole</a></li> </ul> </div> </div><!-- top --> <div class="header"> <div class="headertitle"> <div class="title">win32ole.c</div> </div> </div><!--header--> <div class="contents"> <a href="../../d2/d99/win32ole_8c.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno"> 1</span> <span class="comment">/*</span></div><div class="line"><a name="l00002"></a><span class="lineno"> 2</span> <span class="comment"> * (c) 1995 Microsoft Corporation. All rights reserved.</span></div><div class="line"><a name="l00003"></a><span class="lineno"> 3</span> <span class="comment"> * Developed by ActiveWare Internet Corp., http://www.ActiveWare.com</span></div><div class="line"><a name="l00004"></a><span class="lineno"> 4</span> <span class="comment"> *</span></div><div class="line"><a name="l00005"></a><span class="lineno"> 5</span> <span class="comment"> * Other modifications Copyright (c) 1997, 1998 by Gurusamy Sarathy</span></div><div class="line"><a name="l00006"></a><span class="lineno"> 6</span> <span class="comment"> * <gsar@umich.edu> and Jan Dubois <jan.dubois@ibm.net></span></div><div class="line"><a name="l00007"></a><span class="lineno"> 7</span> <span class="comment"> *</span></div><div class="line"><a name="l00008"></a><span class="lineno"> 8</span> <span class="comment"> * You may distribute under the terms of either the GNU General Public</span></div><div class="line"><a name="l00009"></a><span class="lineno"> 9</span> <span class="comment"> * License or the Artistic License, as specified in the README file</span></div><div class="line"><a name="l00010"></a><span class="lineno"> 10</span> <span class="comment"> * of the Perl distribution.</span></div><div class="line"><a name="l00011"></a><span class="lineno"> 11</span> <span class="comment"> *</span></div><div class="line"><a name="l00012"></a><span class="lineno"> 12</span> <span class="comment"> */</span></div><div class="line"><a name="l00013"></a><span class="lineno"> 13</span> </div><div class="line"><a name="l00014"></a><span class="lineno"> 14</span> <span class="comment">/*</span></div><div class="line"><a name="l00015"></a><span class="lineno"> 15</span> <span class="comment"> modified for win32ole (ruby) by Masaki.Suketa <masaki.suketa@nifty.ne.jp></span></div><div class="line"><a name="l00016"></a><span class="lineno"> 16</span> <span class="comment"> */</span></div><div class="line"><a name="l00017"></a><span class="lineno"> 17</span> </div><div class="line"><a name="l00018"></a><span class="lineno"> 18</span> <span class="preprocessor">#include "<a class="code" href="../../de/de6/ruby_2ruby_8h.html">ruby/ruby.h</a>"</span></div><div class="line"><a name="l00019"></a><span class="lineno"> 19</span> <span class="preprocessor">#include "<a class="code" href="../../dd/d24/st_8h.html">ruby/st.h</a>"</span></div><div class="line"><a name="l00020"></a><span class="lineno"> 20</span> <span class="preprocessor">#include "<a class="code" href="../../d5/de3/encoding_8h.html">ruby/encoding.h</a>"</span></div><div class="line"><a name="l00021"></a><span class="lineno"> 21</span> </div><div class="line"><a name="l00022"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a18f4fdd65125f70f0a1538bc5523cd54"> 22</a></span> <span class="preprocessor">#define GNUC_OLDER_3_4_4 \</span></div><div class="line"><a name="l00023"></a><span class="lineno"> 23</span> <span class="preprocessor"> ((__GNUC__ < 3) || \</span></div><div class="line"><a name="l00024"></a><span class="lineno"> 24</span> <span class="preprocessor"> ((__GNUC__ <= 3) && (__GNUC_MINOR__ < 4)) || \</span></div><div class="line"><a name="l00025"></a><span class="lineno"> 25</span> <span class="preprocessor"> ((__GNUC__ <= 3) && (__GNUC_MINOR__ <= 4) && (__GNUC_PATCHLEVEL__ <= 4)))</span></div><div class="line"><a name="l00026"></a><span class="lineno"> 26</span> </div><div class="line"><a name="l00027"></a><span class="lineno"> 27</span> <span class="preprocessor">#if (defined(__GNUC__)) && (GNUC_OLDER_3_4_4)</span></div><div class="line"><a name="l00028"></a><span class="lineno"> 28</span> <span class="preprocessor">#ifndef NONAMELESSUNION</span></div><div class="line"><a name="l00029"></a><span class="lineno"> 29</span> <span class="preprocessor">#define NONAMELESSUNION 1</span></div><div class="line"><a name="l00030"></a><span class="lineno"> 30</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00031"></a><span class="lineno"> 31</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00032"></a><span class="lineno"> 32</span> </div><div class="line"><a name="l00033"></a><span class="lineno"> 33</span> <span class="preprocessor">#include <ctype.h></span></div><div class="line"><a name="l00034"></a><span class="lineno"> 34</span> </div><div class="line"><a name="l00035"></a><span class="lineno"> 35</span> <span class="preprocessor">#include <windows.h></span></div><div class="line"><a name="l00036"></a><span class="lineno"> 36</span> <span class="preprocessor">#include <ocidl.h></span></div><div class="line"><a name="l00037"></a><span class="lineno"> 37</span> <span class="preprocessor">#include <olectl.h></span></div><div class="line"><a name="l00038"></a><span class="lineno"> 38</span> <span class="preprocessor">#include <ole2.h></span></div><div class="line"><a name="l00039"></a><span class="lineno"> 39</span> <span class="preprocessor">#if defined(HAVE_TYPE_IMULTILANGUAGE2) || defined(HAVE_TYPE_IMULTILANGUAGE)</span></div><div class="line"><a name="l00040"></a><span class="lineno"> 40</span> <span class="preprocessor">#include <mlang.h></span></div><div class="line"><a name="l00041"></a><span class="lineno"> 41</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00042"></a><span class="lineno"> 42</span> <span class="preprocessor">#include <stdlib.h></span></div><div class="line"><a name="l00043"></a><span class="lineno"> 43</span> <span class="preprocessor">#include <math.h></span></div><div class="line"><a name="l00044"></a><span class="lineno"> 44</span> <span class="preprocessor">#ifdef HAVE_STDARG_PROTOTYPES</span></div><div class="line"><a name="l00045"></a><span class="lineno"> 45</span> <span class="preprocessor">#include <stdarg.h></span></div><div class="line"><a name="l00046"></a><span class="lineno"> 46</span> <span class="preprocessor">#define va_init_list(a,b) va_start(a,b)</span></div><div class="line"><a name="l00047"></a><span class="lineno"> 47</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00048"></a><span class="lineno"> 48</span> <span class="preprocessor">#include <varargs.h></span></div><div class="line"><a name="l00049"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3a0a28ba6e22644006c9bafb793f8a2c"> 49</a></span> <span class="preprocessor">#define va_init_list(a,b) va_start(a)</span></div><div class="line"><a name="l00050"></a><span class="lineno"> 50</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00051"></a><span class="lineno"> 51</span> <span class="preprocessor">#include <objidl.h></span></div><div class="line"><a name="l00052"></a><span class="lineno"> 52</span> </div><div class="line"><a name="l00053"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a0b93cd51079c0fa8e21ee4faf2da1a27"> 53</a></span> <span class="preprocessor">#define DOUT fprintf(stderr,"[%d]\n",__LINE__)</span></div><div class="line"><a name="l00054"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a60f6e36b857a459e0ef1b316925cd869"> 54</a></span> <span class="preprocessor">#define DOUTS(x) fprintf(stderr,"[%d]:" #x "=%s\n",__LINE__,x)</span></div><div class="line"><a name="l00055"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#abc6f4bd63dd6fb618320c447c9e1c81c"> 55</a></span> <span class="preprocessor">#define DOUTMSG(x) fprintf(stderr, "[%d]:" #x "\n",__LINE__)</span></div><div class="line"><a name="l00056"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab4ce3a590f7989348fea7ec4b8a2376b"> 56</a></span> <span class="preprocessor">#define DOUTI(x) fprintf(stderr, "[%ld]:" #x "=%d\n",__LINE__,x)</span></div><div class="line"><a name="l00057"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9b6a098e586f9183bdd0b9cd8bd49e19"> 57</a></span> <span class="preprocessor">#define DOUTD(x) fprintf(stderr, "[%d]:" #x "=%f\n",__LINE__,x)</span></div><div class="line"><a name="l00058"></a><span class="lineno"> 58</span> </div><div class="line"><a name="l00059"></a><span class="lineno"> 59</span> <span class="preprocessor">#if (defined(__GNUC__)) && (GNUC_OLDER_3_4_4)</span></div><div class="line"><a name="l00060"></a><span class="lineno"> 60</span> <span class="preprocessor">#define V_UNION1(X, Y) ((X)->u.Y)</span></div><div class="line"><a name="l00061"></a><span class="lineno"> 61</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00062"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac921f4ad75c62ef506c5d282bc39eb26"> 62</a></span> <span class="preprocessor">#define V_UNION1(X, Y) ((X)->Y)</span></div><div class="line"><a name="l00063"></a><span class="lineno"> 63</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00064"></a><span class="lineno"> 64</span> </div><div class="line"><a name="l00065"></a><span class="lineno"> 65</span> <span class="preprocessor">#if (defined(__GNUC__)) && (GNUC_OLDER_3_4_4)</span></div><div class="line"><a name="l00066"></a><span class="lineno"> 66</span> <span class="preprocessor">#undef V_UNION</span></div><div class="line"><a name="l00067"></a><span class="lineno"> 67</span> <span class="preprocessor">#define V_UNION(X,Y) ((X)->n1.n2.n3.Y)</span></div><div class="line"><a name="l00068"></a><span class="lineno"> 68</span> </div><div class="line"><a name="l00069"></a><span class="lineno"> 69</span> <span class="preprocessor">#undef V_VT</span></div><div class="line"><a name="l00070"></a><span class="lineno"> 70</span> <span class="preprocessor">#define V_VT(X) ((X)->n1.n2.vt)</span></div><div class="line"><a name="l00071"></a><span class="lineno"> 71</span> </div><div class="line"><a name="l00072"></a><span class="lineno"> 72</span> <span class="preprocessor">#undef V_BOOL</span></div><div class="line"><a name="l00073"></a><span class="lineno"> 73</span> <span class="preprocessor">#define V_BOOL(X) V_UNION(X,boolVal)</span></div><div class="line"><a name="l00074"></a><span class="lineno"> 74</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00075"></a><span class="lineno"> 75</span> </div><div class="line"><a name="l00076"></a><span class="lineno"> 76</span> <span class="preprocessor">#ifndef V_I1REF</span></div><div class="line"><a name="l00077"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a36c9f535c0f4434cb2e2fea56e393384"> 77</a></span> <span class="preprocessor">#define V_I1REF(X) V_UNION(X, pcVal)</span></div><div class="line"><a name="l00078"></a><span class="lineno"> 78</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00079"></a><span class="lineno"> 79</span> </div><div class="line"><a name="l00080"></a><span class="lineno"> 80</span> <span class="preprocessor">#ifndef V_UI2REF</span></div><div class="line"><a name="l00081"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9aba4875e432f5a9e6108c4ea95e04fc"> 81</a></span> <span class="preprocessor">#define V_UI2REF(X) V_UNION(X, puiVal)</span></div><div class="line"><a name="l00082"></a><span class="lineno"> 82</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00083"></a><span class="lineno"> 83</span> </div><div class="line"><a name="l00084"></a><span class="lineno"> 84</span> <span class="preprocessor">#ifndef V_INT</span></div><div class="line"><a name="l00085"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae28d7243617fdad03119e7f82193726d"> 85</a></span> <span class="preprocessor">#define V_INT(X) V_UNION(X, intVal)</span></div><div class="line"><a name="l00086"></a><span class="lineno"> 86</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00087"></a><span class="lineno"> 87</span> </div><div class="line"><a name="l00088"></a><span class="lineno"> 88</span> <span class="preprocessor">#ifndef V_INTREF</span></div><div class="line"><a name="l00089"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3d4c4141e36eb51f6028533a97b8d484"> 89</a></span> <span class="preprocessor">#define V_INTREF(X) V_UNION(X, pintVal)</span></div><div class="line"><a name="l00090"></a><span class="lineno"> 90</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00091"></a><span class="lineno"> 91</span> </div><div class="line"><a name="l00092"></a><span class="lineno"> 92</span> <span class="preprocessor">#ifndef V_UINT</span></div><div class="line"><a name="l00093"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1da4b972b6e7529b70cadb6077838ad2"> 93</a></span> <span class="preprocessor">#define V_UINT(X) V_UNION(X, uintVal)</span></div><div class="line"><a name="l00094"></a><span class="lineno"> 94</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00095"></a><span class="lineno"> 95</span> </div><div class="line"><a name="l00096"></a><span class="lineno"> 96</span> <span class="preprocessor">#ifndef V_UINTREF</span></div><div class="line"><a name="l00097"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afd407d8a5a6f061bb64f6797f4718975"> 97</a></span> <span class="preprocessor">#define V_UINTREF(X) V_UNION(X, puintVal)</span></div><div class="line"><a name="l00098"></a><span class="lineno"> 98</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00099"></a><span class="lineno"> 99</span> </div><div class="line"><a name="l00100"></a><span class="lineno"> 100</span> <span class="comment">/*</span></div><div class="line"><a name="l00101"></a><span class="lineno"> 101</span> <span class="comment"> * unfortunately IID_IMultiLanguage2 is not included in any libXXX.a</span></div><div class="line"><a name="l00102"></a><span class="lineno"> 102</span> <span class="comment"> * in Cygwin(mingw32).</span></div><div class="line"><a name="l00103"></a><span class="lineno"> 103</span> <span class="comment"> */</span></div><div class="line"><a name="l00104"></a><span class="lineno"> 104</span> <span class="preprocessor">#if defined(__CYGWIN__) || defined(__MINGW32__)</span></div><div class="line"><a name="l00105"></a><span class="lineno"> 105</span> <span class="preprocessor">#undef IID_IMultiLanguage2</span></div><div class="line"><a name="l00106"></a><span class="lineno"> 106</span> <span class="keyword">const</span> IID IID_IMultiLanguage2 = {0xDCCFC164, 0x2B38, 0x11d2, {0xB7, 0xEC, 0x00, 0xC0, 0x4F, 0x8F, 0x5D, 0x9A}};</div><div class="line"><a name="l00107"></a><span class="lineno"> 107</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00108"></a><span class="lineno"> 108</span> </div><div class="line"><a name="l00109"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb"> 109</a></span> <span class="preprocessor">#define OLE_RELEASE(X) (X) ? ((X)->lpVtbl->Release(X)) : 0</span></div><div class="line"><a name="l00110"></a><span class="lineno"> 110</span> </div><div class="line"><a name="l00111"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5"> 111</a></span> <span class="preprocessor">#define OLE_ADDREF(X) (X) ? ((X)->lpVtbl->AddRef(X)) : 0</span></div><div class="line"><a name="l00112"></a><span class="lineno"> 112</span> </div><div class="line"><a name="l00113"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5"> 113</a></span> <span class="preprocessor">#define OLE_GET_TYPEATTR(X, Y) ((X)->lpVtbl->GetTypeAttr((X), (Y)))</span></div><div class="line"><a name="l00114"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf"> 114</a></span> <span class="preprocessor">#define OLE_RELEASE_TYPEATTR(X, Y) ((X)->lpVtbl->ReleaseTypeAttr((X), (Y)))</span></div><div class="line"><a name="l00115"></a><span class="lineno"> 115</span> </div><div class="line"><a name="l00116"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7979d0bf1755bd9d1e72709d8fd3ff89"> 116</a></span> <span class="preprocessor">#define OLE_FREE(x) {\</span></div><div class="line"><a name="l00117"></a><span class="lineno"> 117</span> <span class="preprocessor"> if(g_ole_initialized == TRUE) {\</span></div><div class="line"><a name="l00118"></a><span class="lineno"> 118</span> <span class="preprocessor"> if(x) {\</span></div><div class="line"><a name="l00119"></a><span class="lineno"> 119</span> <span class="preprocessor"> OLE_RELEASE(x);\</span></div><div class="line"><a name="l00120"></a><span class="lineno"> 120</span> <span class="preprocessor"> (x) = 0;\</span></div><div class="line"><a name="l00121"></a><span class="lineno"> 121</span> <span class="preprocessor"> }\</span></div><div class="line"><a name="l00122"></a><span class="lineno"> 122</span> <span class="preprocessor"> }\</span></div><div class="line"><a name="l00123"></a><span class="lineno"> 123</span> <span class="preprocessor">}</span></div><div class="line"><a name="l00124"></a><span class="lineno"> 124</span> </div><div class="line"><a name="l00125"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3"> 125</a></span> <span class="preprocessor">#define OLEData_Get_Struct(obj, pole) {\</span></div><div class="line"><a name="l00126"></a><span class="lineno"> 126</span> <span class="preprocessor"> Data_Get_Struct(obj, struct oledata, pole);\</span></div><div class="line"><a name="l00127"></a><span class="lineno"> 127</span> <span class="preprocessor"> if(!pole->pDispatch) {\</span></div><div class="line"><a name="l00128"></a><span class="lineno"> 128</span> <span class="preprocessor"> rb_raise(rb_eRuntimeError, "failed to get Dispatch Interface");\</span></div><div class="line"><a name="l00129"></a><span class="lineno"> 129</span> <span class="preprocessor"> }\</span></div><div class="line"><a name="l00130"></a><span class="lineno"> 130</span> <span class="preprocessor">}</span></div><div class="line"><a name="l00131"></a><span class="lineno"> 131</span> </div><div class="line"><a name="l00132"></a><span class="lineno"> 132</span> <span class="preprocessor">#ifdef HAVE_LONG_LONG</span></div><div class="line"><a name="l00133"></a><span class="lineno"> 133</span> <span class="preprocessor">#define I8_2_NUM LL2NUM</span></div><div class="line"><a name="l00134"></a><span class="lineno"> 134</span> <span class="preprocessor">#define UI8_2_NUM ULL2NUM</span></div><div class="line"><a name="l00135"></a><span class="lineno"> 135</span> <span class="preprocessor">#define NUM2I8 NUM2LL</span></div><div class="line"><a name="l00136"></a><span class="lineno"> 136</span> <span class="preprocessor">#define NUM2UI8 NUM2ULL</span></div><div class="line"><a name="l00137"></a><span class="lineno"> 137</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00138"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a633ecb2e5bb97e8d4de926ea39ce7765"> 138</a></span> <span class="preprocessor">#define I8_2_NUM INT2NUM</span></div><div class="line"><a name="l00139"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac8532c3a9901cdf3f13325021a01fd0f"> 139</a></span> <span class="preprocessor">#define UI8_2_NUM UINT2NUM</span></div><div class="line"><a name="l00140"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6e0113d66cb81a8bd0fb0a2766e3ce2f"> 140</a></span> <span class="preprocessor">#define NUM2I8 NUM2INT</span></div><div class="line"><a name="l00141"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae1c3462eddb17b0ff24cd63f2a5c0ca6"> 141</a></span> <span class="preprocessor">#define NUM2UI8 NUM2UINT</span></div><div class="line"><a name="l00142"></a><span class="lineno"> 142</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00143"></a><span class="lineno"> 143</span> </div><div class="line"><a name="l00144"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5"> 144</a></span> <span class="preprocessor">#define WC2VSTR(x) ole_wc2vstr((x), TRUE)</span></div><div class="line"><a name="l00145"></a><span class="lineno"> 145</span> </div><div class="line"><a name="l00146"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac7331f65815deaeea30dc7a834594148"> 146</a></span> <span class="preprocessor">#define WIN32OLE_VERSION "1.5.4"</span></div><div class="line"><a name="l00147"></a><span class="lineno"> 147</span> </div><div class="line"><a name="l00148"></a><span class="lineno"> 148</span> <span class="keyword">typedef</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> (STDAPICALLTYPE FNCOCREATEINSTANCEEX)</div><div class="line"><a name="l00149"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a"> 149</a></span>  (REFCLSID, IUnknown*, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a>, COSERVERINFO*, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a>, MULTI_QI*);</div><div class="line"><a name="l00150"></a><span class="lineno"> 150</span> </div><div class="line"><a name="l00151"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a61528773fffe3438d8ce4e64bb4e5c6f"> 151</a></span> <span class="keyword">typedef</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a166bbd1a777de2ab0652286ee16e3268">HWND</a> (WINAPI FNHTMLHELP)(<a class="code" href="../../d2/d99/win32ole_8c.html#a166bbd1a777de2ab0652286ee16e3268">HWND</a> hwndCaller, LPCSTR <a class="code" href="../../d2/d99/win32ole_8c.html#ad1e2b29b5891bd4a824d39829ad426b4">pszFile</a>,</div><div class="line"><a name="l00152"></a><span class="lineno"> 152</span>  UINT <a class="code" href="../../d2/d99/win32ole_8c.html#a61528773fffe3438d8ce4e64bb4e5c6f">uCommand</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1829379decfeb26fe41ee99ea10a32ae">dwData</a>);</div><div class="line"><a name="l00153"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a41f0ea7dd0ed5bdbe6fd43e9b16ef91f"> 153</a></span> <span class="keyword">typedef</span> BOOL (<a class="code" href="../../d2/d99/win32ole_8c.html#a41f0ea7dd0ed5bdbe6fd43e9b16ef91f">FNENUMSYSEMCODEPAGES</a>) (CODEPAGE_ENUMPROC, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a>);</div><div class="line"><a name="l00154"></a><span class="lineno"><a class="line" href="../../dc/d91/struct_i_event_sink.html"> 154</a></span> <span class="keyword">typedef</span> <span class="keyword">struct </span>{</div><div class="line"><a name="l00155"></a><span class="lineno"><a class="line" href="../../dc/d91/struct_i_event_sink.html#a3fb191019af6c5d374f02cead13abd4b"> 155</a></span>  <span class="keyword">struct </span><a class="code" href="../../de/d78/struct_i_event_sink_vtbl.html">IEventSinkVtbl</a> * <a class="code" href="../../dc/d91/struct_i_event_sink.html#a3fb191019af6c5d374f02cead13abd4b">lpVtbl</a>;</div><div class="line"><a name="l00156"></a><span class="lineno"> 156</span> } <a class="code" href="../../dc/d91/struct_i_event_sink.html">IEventSink</a>, *<a class="code" href="../../d2/d99/win32ole_8c.html#a58ed2b02963206faa9aac83bf473a812">PEVENTSINK</a>;</div><div class="line"><a name="l00157"></a><span class="lineno"> 157</span> </div><div class="line"><a name="l00158"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a8a512fccb45679ed46bf77707af30989"> 158</a></span> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="../../de/d78/struct_i_event_sink_vtbl.html">IEventSinkVtbl</a> <a class="code" href="../../de/d78/struct_i_event_sink_vtbl.html">IEventSinkVtbl</a>;</div><div class="line"><a name="l00159"></a><span class="lineno"> 159</span> </div><div class="line"><a name="l00160"></a><span class="lineno"><a class="line" href="../../de/d78/struct_i_event_sink_vtbl.html"> 160</a></span> <span class="keyword">struct </span><a class="code" href="../../de/d78/struct_i_event_sink_vtbl.html">IEventSinkVtbl</a> {</div><div class="line"><a name="l00161"></a><span class="lineno"> 161</span>  STDMETHOD(<a class="code" href="../../de/d78/struct_i_event_sink_vtbl.html#ab0ef28eaafa7e679bfb0b80e98da0135">QueryInterface</a>)(</div><div class="line"><a name="l00162"></a><span class="lineno"> 162</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a58ed2b02963206faa9aac83bf473a812">PEVENTSINK</a>,</div><div class="line"><a name="l00163"></a><span class="lineno"> 163</span>  REFIID,</div><div class="line"><a name="l00164"></a><span class="lineno"> 164</span>  LPVOID *);</div><div class="line"><a name="l00165"></a><span class="lineno"> 165</span>  STDMETHOD_(<a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a>, AddRef)(<a class="code" href="../../d2/d99/win32ole_8c.html#a58ed2b02963206faa9aac83bf473a812">PEVENTSINK</a>);</div><div class="line"><a name="l00166"></a><span class="lineno"> 166</span>  STDMETHOD_(<a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a>, Release)(<a class="code" href="../../d2/d99/win32ole_8c.html#a58ed2b02963206faa9aac83bf473a812">PEVENTSINK</a>);</div><div class="line"><a name="l00167"></a><span class="lineno"> 167</span> </div><div class="line"><a name="l00168"></a><span class="lineno"> 168</span>  STDMETHOD(GetTypeInfoCount)(</div><div class="line"><a name="l00169"></a><span class="lineno"> 169</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a58ed2b02963206faa9aac83bf473a812">PEVENTSINK</a>,</div><div class="line"><a name="l00170"></a><span class="lineno"> 170</span>  UINT *);</div><div class="line"><a name="l00171"></a><span class="lineno"> 171</span>  STDMETHOD(GetTypeInfo)(</div><div class="line"><a name="l00172"></a><span class="lineno"> 172</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a58ed2b02963206faa9aac83bf473a812">PEVENTSINK</a>,</div><div class="line"><a name="l00173"></a><span class="lineno"> 173</span>  UINT,</div><div class="line"><a name="l00174"></a><span class="lineno"> 174</span>  LCID,</div><div class="line"><a name="l00175"></a><span class="lineno"> 175</span>  ITypeInfo **);</div><div class="line"><a name="l00176"></a><span class="lineno"> 176</span>  STDMETHOD(GetIDsOfNames)(</div><div class="line"><a name="l00177"></a><span class="lineno"> 177</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a58ed2b02963206faa9aac83bf473a812">PEVENTSINK</a>,</div><div class="line"><a name="l00178"></a><span class="lineno"> 178</span>  REFIID,</div><div class="line"><a name="l00179"></a><span class="lineno"> 179</span>  OLECHAR **,</div><div class="line"><a name="l00180"></a><span class="lineno"> 180</span>  UINT,</div><div class="line"><a name="l00181"></a><span class="lineno"> 181</span>  LCID,</div><div class="line"><a name="l00182"></a><span class="lineno"> 182</span>  DISPID *);</div><div class="line"><a name="l00183"></a><span class="lineno"> 183</span>  STDMETHOD(Invoke)(</div><div class="line"><a name="l00184"></a><span class="lineno"> 184</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a58ed2b02963206faa9aac83bf473a812">PEVENTSINK</a>,</div><div class="line"><a name="l00185"></a><span class="lineno"> 185</span>  DISPID,</div><div class="line"><a name="l00186"></a><span class="lineno"> 186</span>  REFIID,</div><div class="line"><a name="l00187"></a><span class="lineno"> 187</span>  LCID,</div><div class="line"><a name="l00188"></a><span class="lineno"> 188</span>  WORD,</div><div class="line"><a name="l00189"></a><span class="lineno"> 189</span>  DISPPARAMS *,</div><div class="line"><a name="l00190"></a><span class="lineno"> 190</span>  VARIANT *,</div><div class="line"><a name="l00191"></a><span class="lineno"> 191</span>  EXCEPINFO *,</div><div class="line"><a name="l00192"></a><span class="lineno"> 192</span>  UINT *);</div><div class="line"><a name="l00193"></a><span class="lineno"> 193</span> };</div><div class="line"><a name="l00194"></a><span class="lineno"> 194</span> </div><div class="line"><a name="l00195"></a><span class="lineno"><a class="line" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html"> 195</a></span> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">tagIEVENTSINKOBJ</a> {</div><div class="line"><a name="l00196"></a><span class="lineno"><a class="line" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a43db5d87802de4430819746d16b67d0a"> 196</a></span>  <a class="code" href="../../de/d78/struct_i_event_sink_vtbl.html">IEventSinkVtbl</a> *<a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a43db5d87802de4430819746d16b67d0a">lpVtbl</a>;</div><div class="line"><a name="l00197"></a><span class="lineno"><a class="line" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a22754fa974e76bbc3feb7598c4b58afe"> 197</a></span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a22754fa974e76bbc3feb7598c4b58afe">m_cRef</a>;</div><div class="line"><a name="l00198"></a><span class="lineno"><a class="line" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a43748b00fee8549ca149ced8bc12d0b9"> 198</a></span>  IID <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a43748b00fee8549ca149ced8bc12d0b9">m_iid</a>;</div><div class="line"><a name="l00199"></a><span class="lineno"><a class="line" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a860ed444261d864cf62269b6d075748c"> 199</a></span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a860ed444261d864cf62269b6d075748c">m_event_id</a>;</div><div class="line"><a name="l00200"></a><span class="lineno"><a class="line" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a1203bec2c0d25a2e73da1ed2ec8f0d26"> 200</a></span>  ITypeInfo *<a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a1203bec2c0d25a2e73da1ed2ec8f0d26">pTypeInfo</a>;</div><div class="line"><a name="l00201"></a><span class="lineno"> 201</span> }<a class="code" href="../../d2/d99/win32ole_8c.html#aa3bce24e6382845f469fcfa09a8eb36c">IEVENTSINKOBJ</a>, *<a class="code" href="../../d2/d99/win32ole_8c.html#af9b956c8687447bdff77fa11bfdeab6c">PIEVENTSINKOBJ</a>;</div><div class="line"><a name="l00202"></a><span class="lineno"> 202</span> </div><div class="line"><a name="l00203"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a"> 203</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>;</div><div class="line"><a name="l00204"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e"> 204</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>;</div><div class="line"><a name="l00205"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354"> 205</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>;</div><div class="line"><a name="l00206"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e"> 206</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>;</div><div class="line"><a name="l00207"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc"> 207</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>;</div><div class="line"><a name="l00208"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5"> 208</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>;</div><div class="line"><a name="l00209"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85"> 209</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>;</div><div class="line"><a name="l00210"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000"> 210</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>;</div><div class="line"><a name="l00211"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0"> 211</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>;</div><div class="line"><a name="l00212"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913"> 212</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>;</div><div class="line"><a name="l00213"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af32eeb4278394bc878b85c8ea4aba1b7"> 213</a></span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af32eeb4278394bc878b85c8ea4aba1b7">cWIN32OLE_PROPERTY</a>;</div><div class="line"><a name="l00214"></a><span class="lineno"> 214</span> </div><div class="line"><a name="l00215"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2af0935d4ce085aa2320acd37d10cec5"> 215</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2af0935d4ce085aa2320acd37d10cec5">ary_ole_event</a>;</div><div class="line"><a name="l00216"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a0ce01fae8d4199ffd5f3df63cf0796f8"> 216</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa5b9137f051ac26d7ccc8824f178233">ID</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a0ce01fae8d4199ffd5f3df63cf0796f8">id_events</a>;</div><div class="line"><a name="l00217"></a><span class="lineno"> 217</span> <span class="preprocessor">#if defined(RB_THREAD_SPECIFIC) && (defined(__CYGWIN__) || defined(__MINGW32__))</span></div><div class="line"><a name="l00218"></a><span class="lineno"> 218</span> <span class="keyword">static</span> RB_THREAD_SPECIFIC BOOL <a class="code" href="../../d2/d99/win32ole_8c.html#a63b4faafeb1711dd2ea21e5a7ba406d5">g_ole_initialized</a>;</div><div class="line"><a name="l00219"></a><span class="lineno"> 219</span> <span class="preprocessor"># define g_ole_initialized_init() ((void)0)</span></div><div class="line"><a name="l00220"></a><span class="lineno"> 220</span> <span class="preprocessor"># define g_ole_initialized_set(val) (g_ole_initialized = (val))</span></div><div class="line"><a name="l00221"></a><span class="lineno"> 221</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00222"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a910f5dc71d76d1c8d51e6c0f5010c6e9"> 222</a></span> <span class="keyword">static</span> <span class="keyword">volatile</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a910f5dc71d76d1c8d51e6c0f5010c6e9">g_ole_initialized_key</a> = TLS_OUT_OF_INDEXES;</div><div class="line"><a name="l00223"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a63b4faafeb1711dd2ea21e5a7ba406d5"> 223</a></span> <span class="preprocessor"># define g_ole_initialized (BOOL)TlsGetValue(g_ole_initialized_key)</span></div><div class="line"><a name="l00224"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aac13c3c50abb6519352a3398703aec8f"> 224</a></span> <span class="preprocessor"># define g_ole_initialized_init() (g_ole_initialized_key = TlsAlloc())</span></div><div class="line"><a name="l00225"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af70e34bc5bf782d9c0fe541e851a7594"> 225</a></span> <span class="preprocessor"># define g_ole_initialized_set(val) TlsSetValue(g_ole_initialized_key, (void*)(val))</span></div><div class="line"><a name="l00226"></a><span class="lineno"> 226</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00227"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2007081b1749d56e7a5ed6b196d9fa45"> 227</a></span> <span class="keyword">static</span> BOOL <a class="code" href="../../d2/d99/win32ole_8c.html#a2007081b1749d56e7a5ed6b196d9fa45">g_uninitialize_hooked</a> = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l00228"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad29426bf12565d8dea6e3f00828e8aa8"> 228</a></span> <span class="keyword">static</span> BOOL <a class="code" href="../../d2/d99/win32ole_8c.html#ad29426bf12565d8dea6e3f00828e8aa8">g_cp_installed</a> = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l00229"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad86ed24d2a7324b1bb5474f6f0782812"> 229</a></span> <span class="keyword">static</span> BOOL <a class="code" href="../../d2/d99/win32ole_8c.html#ad86ed24d2a7324b1bb5474f6f0782812">g_lcid_installed</a> = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l00230"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a78f7f599a5e13fe2d10c0b27961fa49b"> 230</a></span> <span class="keyword">static</span> HINSTANCE <a class="code" href="../../d2/d99/win32ole_8c.html#a78f7f599a5e13fe2d10c0b27961fa49b">ghhctrl</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l00231"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a77ca308cb6a605690e4b3e07afd18ce8"> 231</a></span> <span class="keyword">static</span> HINSTANCE <a class="code" href="../../d2/d99/win32ole_8c.html#a77ca308cb6a605690e4b3e07afd18ce8">gole32</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l00232"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a56ab313527b706f895cb18faf492cdf4"> 232</a></span> <span class="keyword">static</span> FNCOCREATEINSTANCEEX *<a class="code" href="../../d2/d99/win32ole_8c.html#a56ab313527b706f895cb18faf492cdf4">gCoCreateInstanceEx</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l00233"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9e1526602f12196f5bf394832700029a"> 233</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a9e1526602f12196f5bf394832700029a">com_hash</a>;</div><div class="line"><a name="l00234"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808"> 234</a></span> <span class="keyword">static</span> IDispatchVtbl <a class="code" href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808">com_vtbl</a>;</div><div class="line"><a name="l00235"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501"> 235</a></span> <span class="keyword">static</span> UINT <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a> = CP_ACP;</div><div class="line"><a name="l00236"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5"> 236</a></span> <span class="keyword">static</span> LCID <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a> = LOCALE_SYSTEM_DEFAULT;</div><div class="line"><a name="l00237"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a047992a0ec88c62f680c1d484e33d5c5"> 237</a></span> <span class="keyword">static</span> <a class="code" href="../../d1/d7b/struct_onig_encoding_type_s_t.html">rb_encoding</a> *<a class="code" href="../../d2/d99/win32ole_8c.html#a047992a0ec88c62f680c1d484e33d5c5">cWIN32OLE_enc</a>;</div><div class="line"><a name="l00238"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af35c14e43de709d8f72501c8b73300a6"> 238</a></span> <span class="keyword">static</span> UINT <a class="code" href="../../d2/d99/win32ole_8c.html#af35c14e43de709d8f72501c8b73300a6">g_cp_to_check</a> = CP_ACP;</div><div class="line"><a name="l00239"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa5b58331878760e9f4974a618fa4f35b"> 239</a></span> <span class="keyword">static</span> <span class="keywordtype">char</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa5b58331878760e9f4974a618fa4f35b">g_lcid_to_check</a>[8 + 1];</div><div class="line"><a name="l00240"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7c2765e64d70089c2227aa6fb7dc1eb0"> 240</a></span> <span class="keyword">static</span> VARTYPE <a class="code" href="../../d2/d99/win32ole_8c.html#a7c2765e64d70089c2227aa6fb7dc1eb0">g_nil_to</a> = VT_ERROR;</div><div class="line"><a name="l00241"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae55d84a8797460e9279316d18ed42e37"> 241</a></span> <span class="keyword">static</span> <a class="code" href="../../d0/ddd/structst__table.html">st_table</a> *<a class="code" href="../../d2/d99/win32ole_8c.html#ae55d84a8797460e9279316d18ed42e37">enc2cp_table</a>;</div><div class="line"><a name="l00242"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181"> 242</a></span> <span class="keyword">static</span> IMessageFilterVtbl <a class="code" href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181">message_filter</a>;</div><div class="line"><a name="l00243"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a752b650185811a148fde591fe97104e3"> 243</a></span> <span class="keyword">static</span> IMessageFilter <a class="code" href="../../d2/d99/win32ole_8c.html#a752b650185811a148fde591fe97104e3">imessage_filter</a> = { &<a class="code" href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181">message_filter</a> };</div><div class="line"><a name="l00244"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134"> 244</a></span> <span class="keyword">static</span> IMessageFilter* <a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>;</div><div class="line"><a name="l00245"></a><span class="lineno"> 245</span> </div><div class="line"><a name="l00246"></a><span class="lineno"> 246</span> <span class="preprocessor">#if defined(HAVE_TYPE_IMULTILANGUAGE2)</span></div><div class="line"><a name="l00247"></a><span class="lineno"> 247</span> <span class="keyword">static</span> IMultiLanguage2 *<a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l00248"></a><span class="lineno"> 248</span> <span class="preprocessor">#elif defined(HAVE_TYPE_IMULTILANGUAGE)</span></div><div class="line"><a name="l00249"></a><span class="lineno"> 249</span> <span class="keyword">static</span> IMultiLanguage *<a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l00250"></a><span class="lineno"> 250</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00251"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a"> 251</a></span> <span class="preprocessor">#define pIMultiLanguage NULL </span><span class="comment">/* dummy */</span><span class="preprocessor"></span></div><div class="line"><a name="l00252"></a><span class="lineno"> 252</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00253"></a><span class="lineno"> 253</span> </div><div class="line"><a name="l00254"></a><span class="lineno"><a class="line" href="../../d1/d03/structoledata.html"> 254</a></span> <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> {</div><div class="line"><a name="l00255"></a><span class="lineno"><a class="line" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19"> 255</a></span>  IDispatch *<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l00256"></a><span class="lineno"> 256</span> };</div><div class="line"><a name="l00257"></a><span class="lineno"> 257</span> </div><div class="line"><a name="l00258"></a><span class="lineno"><a class="line" href="../../d6/dd4/structoletypelibdata.html"> 258</a></span> <span class="keyword">struct </span><a class="code" href="../../d6/dd4/structoletypelibdata.html">oletypelibdata</a> {</div><div class="line"><a name="l00259"></a><span class="lineno"><a class="line" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2"> 259</a></span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l00260"></a><span class="lineno"> 260</span> };</div><div class="line"><a name="l00261"></a><span class="lineno"> 261</span> </div><div class="line"><a name="l00262"></a><span class="lineno"><a class="line" href="../../d9/d09/structoletypedata.html"> 262</a></span> <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> {</div><div class="line"><a name="l00263"></a><span class="lineno"><a class="line" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a"> 263</a></span>  ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>;</div><div class="line"><a name="l00264"></a><span class="lineno"> 264</span> };</div><div class="line"><a name="l00265"></a><span class="lineno"> 265</span> </div><div class="line"><a name="l00266"></a><span class="lineno"><a class="line" href="../../d4/df4/structolemethoddata.html"> 266</a></span> <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> {</div><div class="line"><a name="l00267"></a><span class="lineno"><a class="line" href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c"> 267</a></span>  ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c">pOwnerTypeInfo</a>;</div><div class="line"><a name="l00268"></a><span class="lineno"><a class="line" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f"> 268</a></span>  ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>;</div><div class="line"><a name="l00269"></a><span class="lineno"><a class="line" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e"> 269</a></span>  UINT <a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>;</div><div class="line"><a name="l00270"></a><span class="lineno"> 270</span> };</div><div class="line"><a name="l00271"></a><span class="lineno"> 271</span> </div><div class="line"><a name="l00272"></a><span class="lineno"><a class="line" href="../../d2/d9a/structolevariabledata.html"> 272</a></span> <span class="keyword">struct </span><a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a> {</div><div class="line"><a name="l00273"></a><span class="lineno"><a class="line" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5"> 273</a></span>  ITypeInfo *<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>;</div><div class="line"><a name="l00274"></a><span class="lineno"><a class="line" href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be"> 274</a></span>  UINT <a class="code" href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be">index</a>;</div><div class="line"><a name="l00275"></a><span class="lineno"> 275</span> };</div><div class="line"><a name="l00276"></a><span class="lineno"> 276</span> </div><div class="line"><a name="l00277"></a><span class="lineno"><a class="line" href="../../d6/dda/structoleparamdata.html"> 277</a></span> <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> {</div><div class="line"><a name="l00278"></a><span class="lineno"><a class="line" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134"> 278</a></span>  ITypeInfo *<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>;</div><div class="line"><a name="l00279"></a><span class="lineno"><a class="line" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2"> 279</a></span>  UINT <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>;</div><div class="line"><a name="l00280"></a><span class="lineno"><a class="line" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb"> 280</a></span>  UINT <a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>;</div><div class="line"><a name="l00281"></a><span class="lineno"> 281</span> };</div><div class="line"><a name="l00282"></a><span class="lineno"> 282</span> </div><div class="line"><a name="l00283"></a><span class="lineno"><a class="line" href="../../d1/d5d/structoleeventdata.html"> 283</a></span> <span class="keyword">struct </span><a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a> {</div><div class="line"><a name="l00284"></a><span class="lineno"><a class="line" href="../../d1/d5d/structoleeventdata.html#ae70fbdd278d71d8deb0ab81de2b82d82"> 284</a></span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d1/d5d/structoleeventdata.html#ae70fbdd278d71d8deb0ab81de2b82d82">dwCookie</a>;</div><div class="line"><a name="l00285"></a><span class="lineno"><a class="line" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f"> 285</a></span>  IConnectionPoint *<a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>;</div><div class="line"><a name="l00286"></a><span class="lineno"><a class="line" href="../../d1/d5d/structoleeventdata.html#a6a6acfb04132992781ab9d405530e9f8"> 286</a></span>  <span class="keywordtype">long</span> <a class="code" href="../../d1/d5d/structoleeventdata.html#a6a6acfb04132992781ab9d405530e9f8">event_id</a>;</div><div class="line"><a name="l00287"></a><span class="lineno"> 287</span> };</div><div class="line"><a name="l00288"></a><span class="lineno"> 288</span> </div><div class="line"><a name="l00289"></a><span class="lineno"><a class="line" href="../../d2/d5d/structoleparam.html"> 289</a></span> <span class="keyword">struct </span><a class="code" href="../../d2/d5d/structoleparam.html">oleparam</a> {</div><div class="line"><a name="l00290"></a><span class="lineno"><a class="line" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab"> 290</a></span>  DISPPARAMS <a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>;</div><div class="line"><a name="l00291"></a><span class="lineno"><a class="line" href="../../d2/d5d/structoleparam.html#a61df15975c8db1bbcd439b4579091fdc"> 291</a></span>  OLECHAR** <a class="code" href="../../d2/d5d/structoleparam.html#a61df15975c8db1bbcd439b4579091fdc">pNamedArgs</a>;</div><div class="line"><a name="l00292"></a><span class="lineno"> 292</span> };</div><div class="line"><a name="l00293"></a><span class="lineno"> 293</span> </div><div class="line"><a name="l00294"></a><span class="lineno"><a class="line" href="../../dd/dd6/structolevariantdata.html"> 294</a></span> <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> {</div><div class="line"><a name="l00295"></a><span class="lineno"><a class="line" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635"> 295</a></span>  VARIANT <a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>;</div><div class="line"><a name="l00296"></a><span class="lineno"><a class="line" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964"> 296</a></span>  VARIANT <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>;</div><div class="line"><a name="l00297"></a><span class="lineno"> 297</span> };</div><div class="line"><a name="l00298"></a><span class="lineno"> 298</span> </div><div class="line"><a name="l00299"></a><span class="lineno"> 299</span> </div><div class="line"><a name="l00300"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429"> 300</a></span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> ( STDMETHODCALLTYPE QueryInterface )(IDispatch __RPC_FAR *, REFIID <a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>, <span class="keywordtype">void</span> __RPC_FAR *__RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#ab09baffb3870e6f212e36f9b8e6709dc">ppvObject</a>);</div><div class="line"><a name="l00301"></a><span class="lineno"> 301</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> ( STDMETHODCALLTYPE AddRef )(IDispatch __RPC_FAR * This);</div><div class="line"><a name="l00302"></a><span class="lineno"> 302</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> ( STDMETHODCALLTYPE Release )(IDispatch __RPC_FAR * This);</div><div class="line"><a name="l00303"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac3e7d57a2e31cb6749fd9fb4bdac99b2"> 303</a></span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> ( STDMETHODCALLTYPE GetTypeInfoCount )(IDispatch __RPC_FAR * This, UINT __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#ac3e7d57a2e31cb6749fd9fb4bdac99b2">pctinfo</a>);</div><div class="line"><a name="l00304"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9cea82cbb2a01224a9e29ffe96527062"> 304</a></span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> ( STDMETHODCALLTYPE GetTypeInfo )(IDispatch __RPC_FAR * This, UINT <a class="code" href="../../d2/d99/win32ole_8c.html#a0603b3be2cd978771772b56d3c8a1317">iTInfo</a>, LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, ITypeInfo __RPC_FAR *__RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a9cea82cbb2a01224a9e29ffe96527062">ppTInfo</a>);</div><div class="line"><a name="l00305"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a824cc3f3a7bf2ea1137ab0b9f46ff10d"> 305</a></span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> ( STDMETHODCALLTYPE GetIDsOfNames )(IDispatch __RPC_FAR * This, REFIID <a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>, LPOLESTR __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a824cc3f3a7bf2ea1137ab0b9f46ff10d">rgszNames</a>, UINT <a class="code" href="../../d2/d99/win32ole_8c.html#ad1b2c6199f208bd8beef590eeb7e85f0">cNames</a>, LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, DISPID __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a8612f92772dd1fbb3ff187c706fd88bc">rgDispId</a>);</div><div class="line"><a name="l00306"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb"> 306</a></span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> ( STDMETHODCALLTYPE Invoke )( IDispatch __RPC_FAR * This, DISPID <a class="code" href="../../d2/d99/win32ole_8c.html#a14cb47d02a4ed02a22e79f9bcde90278">dispIdMember</a>, REFIID <a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>, LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, WORD <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a>, DISPPARAMS __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a7fc54792903a9ce527a0fb17cfdc73df">pDispParams</a>, VARIANT __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a0a03211c46ec9c69d5d0ee5187e5b295">pVarResult</a>, EXCEPINFO __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a331dfbd740eaac20e1c89cac4c1810fd">pExcepInfo</a>, UINT __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#ae417975d2b4b01e9dc4e53b1da0a0725">puArgErr</a>);</div><div class="line"><a name="l00307"></a><span class="lineno"> 307</span> <span class="keyword">static</span> IDispatch* <a class="code" href="../../d2/d99/win32ole_8c.html#ad39844f2dafaf44c62d2e05644ebae7f">val2dispatch</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l00308"></a><span class="lineno"> 308</span> <span class="keyword">static</span> <span class="keywordtype">double</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6eabe7fdb6877c4fc48f030143375f31">rbtime2vtdate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tmobj);</div><div class="line"><a name="l00309"></a><span class="lineno"> 309</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac443cf13c84997231c8cf7e81e682015">vtdate2rbtime</a>(<span class="keywordtype">double</span> date);</div><div class="line"><a name="l00310"></a><span class="lineno"> 310</span> <span class="keyword">static</span> <a class="code" href="../../d1/d7b/struct_onig_encoding_type_s_t.html">rb_encoding</a> *<a class="code" href="../../d2/d99/win32ole_8c.html#a5a3aa5d1d651d476ac780e098b058f49">ole_cp2encoding</a>(UINT cp);</div><div class="line"><a name="l00311"></a><span class="lineno"> 311</span> <span class="keyword">static</span> UINT <a class="code" href="../../d2/d99/win32ole_8c.html#a7761c680fae0129661c0bea85dd54e29">ole_encoding2cp</a>(<a class="code" href="../../d1/d7b/struct_onig_encoding_type_s_t.html">rb_encoding</a> *enc);</div><div class="line"><a name="l00312"></a><span class="lineno"> 312</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aed99a9f4a309f2e9dbf5b02f29ff8e22">NORETURN</a>(<span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a0b0961ddd6591968e023b883d9a08c33">failed_load_conv51932</a>(<span class="keywordtype">void</span>));</div><div class="line"><a name="l00313"></a><span class="lineno"> 313</span> <span class="preprocessor">#ifndef pIMultiLanguage</span></div><div class="line"><a name="l00314"></a><span class="lineno"> 314</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5411753c688404d6a96cb91c6d44d23c">load_conv_function51932</a>(<span class="keywordtype">void</span>);</div><div class="line"><a name="l00315"></a><span class="lineno"> 315</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00316"></a><span class="lineno"> 316</span> <span class="keyword">static</span> UINT <a class="code" href="../../d2/d99/win32ole_8c.html#afe5e741ee07fdc09159777facba855b5">ole_init_cp</a>(<span class="keywordtype">void</span>);</div><div class="line"><a name="l00317"></a><span class="lineno"> 317</span> <span class="keyword">static</span> <span class="keywordtype">char</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a148da008cc189df71d5b47bf1bbb6d06">ole_wc2mb</a>(LPWSTR pw);</div><div class="line"><a name="l00318"></a><span class="lineno"> 318</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad4337eb4b87a4587146ae21e3f7b7f29">ole_hresult2msg</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr);</div><div class="line"><a name="l00319"></a><span class="lineno"> 319</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a168b5a800d629d56514b2a19d39cb4a0">ole_freeexceptinfo</a>(EXCEPINFO *pExInfo);</div><div class="line"><a name="l00320"></a><span class="lineno"> 320</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ab7382ba089455a36bd5000ff84aa861f">ole_excepinfo2msg</a>(EXCEPINFO *pExInfo);</div><div class="line"><a name="l00321"></a><span class="lineno"> 321</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ecs, <span class="keyword">const</span> <span class="keywordtype">char</span> *fmt, ...);</div><div class="line"><a name="l00322"></a><span class="lineno"> 322</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a>(<span class="keywordtype">void</span>);</div><div class="line"><a name="l00323"></a><span class="lineno"> 323</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa3eea8970bbdd932344cbf86e9bbe95c">ole_msg_loop</a>(<span class="keywordtype">void</span>);</div><div class="line"><a name="l00324"></a><span class="lineno"> 324</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a9db8ac32bad3c759b157b41456e1c32a">ole_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole);</div><div class="line"><a name="l00325"></a><span class="lineno"> 325</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#afc5830d08daccd1d3e65c2a374b17a77">oletypelib_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d6/dd4/structoletypelibdata.html">oletypelibdata</a> *poletypelib);</div><div class="line"><a name="l00326"></a><span class="lineno"> 326</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa277cd78a0fd28dcdbd08a2e93b36c34">oletype_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *poletype);</div><div class="line"><a name="l00327"></a><span class="lineno"> 327</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1db0ce1c948a3568385af4333d51d21e">olemethod_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *polemethod);</div><div class="line"><a name="l00328"></a><span class="lineno"> 328</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aae0f4a590a5c1279929e891188052399">olevariable_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a> *polevar);</div><div class="line"><a name="l00329"></a><span class="lineno"> 329</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa619ede67812e724cc5e198f7790a9dd">oleparam_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pole);</div><div class="line"><a name="l00330"></a><span class="lineno"> 330</span> <span class="keyword">static</span> LPWSTR <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vstr);</div><div class="line"><a name="l00331"></a><span class="lineno"> 331</span> <span class="keyword">static</span> LPWSTR <a class="code" href="../../d2/d99/win32ole_8c.html#ad7e303f0dec303ecdef04cc6d828eb7c">ole_mb2wc</a>(<span class="keywordtype">char</span> *pm, <span class="keywordtype">int</span> len);</div><div class="line"><a name="l00332"></a><span class="lineno"> 332</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6">ole_wc2vstr</a>(LPWSTR pw, BOOL isfree);</div><div class="line"><a name="l00333"></a><span class="lineno"> 333</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#afa4d94a8fadbff668fda61cff6af208c">ole_ary_m_entry</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keywordtype">long</span> *pid);</div><div class="line"><a name="l00334"></a><span class="lineno"> 334</span> <span class="keyword">static</span> <span class="keywordtype">void</span> * <a class="code" href="../../d2/d99/win32ole_8c.html#a04a08c5718d5989071001bbb08d6bd04">get_ptr_of_variant</a>(VARIANT *pvar);</div><div class="line"><a name="l00335"></a><span class="lineno"> 335</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a12a29db3df4934ec380c22ff639bc206">is_all_index_under</a>(<span class="keywordtype">long</span> *pid, <span class="keywordtype">long</span> *pub, <span class="keywordtype">long</span> dim);</div><div class="line"><a name="l00336"></a><span class="lineno"> 336</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac8c00a4cb59ce47acdabd17199dda0fa">ole_set_safe_array</a>(<span class="keywordtype">long</span> n, SAFEARRAY *psa, <span class="keywordtype">long</span> *pid, <span class="keywordtype">long</span> *pub, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keywordtype">long</span> dim, VARTYPE vt);</div><div class="line"><a name="l00337"></a><span class="lineno"> 337</span> <span class="keyword">static</span> <span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7946b47acb9022d6a5bc20e728ed5013">dimension</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l00338"></a><span class="lineno"> 338</span> <span class="keyword">static</span> <span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a632f2bcf05d41fa60f4c4369849ddd1c">ary_len_of_dim</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, <span class="keywordtype">long</span> dim);</div><div class="line"><a name="l00339"></a><span class="lineno"> 339</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a17da1c9035e9e51a82318d5bc6511c04">ole_val_ary2variant_ary</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *var, VARTYPE vt);</div><div class="line"><a name="l00340"></a><span class="lineno"> 340</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *var);</div><div class="line"><a name="l00341"></a><span class="lineno"> 341</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab41ead361600f93bdec89d772172aae6">ole_val2variant_ex</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *var, VARTYPE vt);</div><div class="line"><a name="l00342"></a><span class="lineno"> 342</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#afc1f3a868b87bab628cd530d46f876d7">ole_val2ptr_variant</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *var);</div><div class="line"><a name="l00343"></a><span class="lineno"> 343</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab70a2b3ac84618de156452bb215ac232">ole_set_byref</a>(VARIANT *realvar, VARIANT *var, VARTYPE vt);</div><div class="line"><a name="l00344"></a><span class="lineno"> 344</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3cd351272efa990ad547562acc560dbb">ole_val2olevariantdata</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARTYPE vt, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar);</div><div class="line"><a name="l00345"></a><span class="lineno"> 345</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#add1934e43857f1911e6ff0050d8f593e">ole_val2variant2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *var);</div><div class="line"><a name="l00346"></a><span class="lineno"> 346</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#afbdc037edc37f16c9ab3e62d5c25f65f">make_inspect</a>(<span class="keyword">const</span> <span class="keywordtype">char</span> *class_name, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> detail);</div><div class="line"><a name="l00347"></a><span class="lineno"> 347</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1da595a8d1f22377435d6bd4fa5150d1">default_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <span class="keyword">const</span> <span class="keywordtype">char</span> *class_name);</div><div class="line"><a name="l00348"></a><span class="lineno"> 348</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a823003b3f886ae7d06708d5d18c20d0f">ole_set_member</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, IDispatch *dispatch);</div><div class="line"><a name="l00349"></a><span class="lineno"> 349</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2d0cf91d19e5f8f14cf8c167f4699275">fole_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass);</div><div class="line"><a name="l00350"></a><span class="lineno"> 350</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ada66e0a6c7b3c3915de52016aa828026">create_win32ole_object</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass, IDispatch *pDispatch, <span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>);</div><div class="line"><a name="l00351"></a><span class="lineno"> 351</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a27e8edc4bd92903a3f61d6d6582646f8">ary_new_dim</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> myary, <span class="keywordtype">long</span> *pid, <span class="keywordtype">long</span> *plb, <span class="keywordtype">long</span> dim);</div><div class="line"><a name="l00352"></a><span class="lineno"> 352</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a0e365aecee59aa21b999d051a4c76a2b">ary_store_dim</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> myary, <span class="keywordtype">long</span> *pid, <span class="keywordtype">long</span> *plb, <span class="keywordtype">long</span> dim, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l00353"></a><span class="lineno"> 353</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(VARIANT *pvar);</div><div class="line"><a name="l00354"></a><span class="lineno"> 354</span> <span class="keyword">static</span> LONG <a class="code" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a>(HKEY hkey, <span class="keyword">const</span> <span class="keywordtype">char</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>, HKEY *phkey);</div><div class="line"><a name="l00355"></a><span class="lineno"> 355</span> <span class="keyword">static</span> LONG <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(HKEY hkey, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>, HKEY *phkey);</div><div class="line"><a name="l00356"></a><span class="lineno"> 356</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(HKEY hkey, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l00357"></a><span class="lineno"> 357</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad1d7db020ebeab12bc94c56f82f43076">reg_get_val</a>(HKEY hkey, <span class="keyword">const</span> <span class="keywordtype">char</span> *subkey);</div><div class="line"><a name="l00358"></a><span class="lineno"> 358</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a14f4f8b53e3617452f73d78095f02a45">reg_get_typelib_file_path</a>(HKEY hkey);</div><div class="line"><a name="l00359"></a><span class="lineno"> 359</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a65bbad5ba8794f7e9bab852ee27deb65">typelib_file_from_clsid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole);</div><div class="line"><a name="l00360"></a><span class="lineno"> 360</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2f6cbb8271a4baf118c86dd9b7448c9e">typelib_file_from_typelib</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole);</div><div class="line"><a name="l00361"></a><span class="lineno"> 361</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#afe7b5c965ce1a10b205d15b8c47646d9">typelib_file</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole);</div><div class="line"><a name="l00362"></a><span class="lineno"> 362</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a714a0793c185ef6579d1db4f41c7dc2a">ole_const_load</a>(ITypeLib *pTypeLib, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00363"></a><span class="lineno"> 363</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2c2cafa30f8f59de53e58a6c03b0eff1">clsid_from_remote</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> host, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> com, CLSID *pclsid);</div><div class="line"><a name="l00364"></a><span class="lineno"> 364</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5d6d21de9fbc08c767655267b2b1140d">ole_create_dcom</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> host, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> others);</div><div class="line"><a name="l00365"></a><span class="lineno"> 365</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5f5d58cfaa0e32882b5533677620dd93">ole_bind_obj</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> moniker, <span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00366"></a><span class="lineno"> 366</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a41b6cce0ceb88f59521f6a9b5cbc903e">fole_s_connect</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00367"></a><span class="lineno"> 367</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aece2e35f468147b6d40f99a14c3c7f6a">fole_s_const_load</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00368"></a><span class="lineno"> 368</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a904af26931d02b6f49611a7201d3c9c1">ole_types_from_typelib</a>(ITypeLib *pTypeLib, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> classes);</div><div class="line"><a name="l00369"></a><span class="lineno"> 369</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6cb22e9353278e4211435ac709a92a66">reference_count</a>(<span class="keyword">struct</span> <a class="code" href="../../d1/d03/structoledata.html">oledata</a> * pole);</div><div class="line"><a name="l00370"></a><span class="lineno"> 370</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5f96c057db4987aa9d01f368539b1507">fole_s_reference_count</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj);</div><div class="line"><a name="l00371"></a><span class="lineno"> 371</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aaed28da1a2098bc9ce356c985343e7e2">fole_s_free</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj);</div><div class="line"><a name="l00372"></a><span class="lineno"> 372</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a166bbd1a777de2ab0652286ee16e3268">HWND</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a450345b808e7fd3597b3bebe5340ea59">ole_show_help</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> helpfile, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> helpcontext);</div><div class="line"><a name="l00373"></a><span class="lineno"> 373</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a71d23fe98f21177991723bbbd03b6875">fole_s_show_help</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00374"></a><span class="lineno"> 374</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a46e95b41258862662f5e02173c154a7a">fole_s_get_code_page</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00375"></a><span class="lineno"> 375</span> <span class="keyword">static</span> BOOL CALLBACK <a class="code" href="../../d2/d99/win32ole_8c.html#a4d49078fb540aae74273a6b66d3d9f34">installed_code_page_proc</a>(LPTSTR str);</div><div class="line"><a name="l00376"></a><span class="lineno"> 376</span> <span class="keyword">static</span> BOOL <a class="code" href="../../d2/d99/win32ole_8c.html#a38c94372747cca7b01ac64e76f941a2c">code_page_installed</a>(UINT cp);</div><div class="line"><a name="l00377"></a><span class="lineno"> 377</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac2cadf7c61871ef6c7d630762d3ca09d">fole_s_set_code_page</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vcp);</div><div class="line"><a name="l00378"></a><span class="lineno"> 378</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a0d9cd7ac70636cff4bfc3a398f9349">fole_s_get_locale</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00379"></a><span class="lineno"> 379</span> <span class="keyword">static</span> BOOL CALLBACK <a class="code" href="../../d2/d99/win32ole_8c.html#a3793b5d66c90dc1df5ebfb9f070d917e">installed_lcid_proc</a>(LPTSTR str);</div><div class="line"><a name="l00380"></a><span class="lineno"> 380</span> <span class="keyword">static</span> BOOL <a class="code" href="../../d2/d99/win32ole_8c.html#a3c3f3d4c55344453eeb66c7c0fbc0aec">lcid_installed</a>(LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>);</div><div class="line"><a name="l00381"></a><span class="lineno"> 381</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac0a9f64129d5836fc8f9b0195ca478ec">fole_s_set_locale</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vlcid);</div><div class="line"><a name="l00382"></a><span class="lineno"> 382</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a9ac8207bb0ee9c5e02c8a012cc00d4e2">fole_s_create_guid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00383"></a><span class="lineno"> 383</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a711bebed75d5dbef9317d46792aa8255">fole_s_ole_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00384"></a><span class="lineno"> 384</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a197b9a7e0b15c57cddf36d7950572b1a">fole_s_ole_uninitialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00385"></a><span class="lineno"> 385</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a7f8945d4358f512f72dcfc6a0298bd1c">fole_initialize</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00386"></a><span class="lineno"> 386</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aebe176e60c05479fdbc4ce192fefc5f3">hash2named_arg</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> pair, <span class="keyword">struct</span> <a class="code" href="../../d2/d5d/structoleparam.html">oleparam</a>* pOp);</div><div class="line"><a name="l00387"></a><span class="lineno"> 387</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1d7c82f61a1880fbbd308aa150767c14">set_argv</a>(VARIANTARG* realargs, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> beg, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> end);</div><div class="line"><a name="l00388"></a><span class="lineno"> 388</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac8860b58d270355634f963913731566a">ole_invoke</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, USHORT <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a>, BOOL is_bracket);</div><div class="line"><a name="l00389"></a><span class="lineno"> 389</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a950b2a90a61b3cae5543c9d93b00ead3">fole_invoke</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00390"></a><span class="lineno"> 390</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ab5e5b1edb8c7947faa9e4838b4ac0a8c">ole_invoke2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> dispid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> types, USHORT dispkind);</div><div class="line"><a name="l00391"></a><span class="lineno"> 391</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#abf52aec9001101679b74a4117347b4ce">fole_invoke2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> dispid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> types);</div><div class="line"><a name="l00392"></a><span class="lineno"> 392</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a303d4c6c980af9ead5d8e06cdf4be789">fole_getproperty2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> dispid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> types);</div><div class="line"><a name="l00393"></a><span class="lineno"> 393</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aea975e81d1fe3056985636f1fa72e8b9">fole_setproperty2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> dispid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> types);</div><div class="line"><a name="l00394"></a><span class="lineno"> 394</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a60f46a0254e9350ddf3ae68009748eb8">fole_setproperty_with_bracket</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00395"></a><span class="lineno"> 395</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a434cf8ff2ac0a88549687089a80ffb01">fole_setproperty</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00396"></a><span class="lineno"> 396</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5032240cb2729bee87cc42cb5cc23695">fole_getproperty_with_bracket</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00397"></a><span class="lineno"> 397</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aefb50e0a803b13434dbaac16c8373aec">ole_propertyput</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> property, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> value);</div><div class="line"><a name="l00398"></a><span class="lineno"> 398</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1c39e066aeecfd08aada95a49e3e48f4">fole_free</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00399"></a><span class="lineno"> 399</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a75eb5195f049c793257cb535b69e3cf2">ole_each_sub</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> pEnumV);</div><div class="line"><a name="l00400"></a><span class="lineno"> 400</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a8c70df438e210da751d123ceed590ed3">ole_ienum_free</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> pEnumV);</div><div class="line"><a name="l00401"></a><span class="lineno"> 401</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a83b4d0c7361c567ebe70479b937c3a7d">fole_each</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00402"></a><span class="lineno"> 402</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a9f2d2aeab774970ad953b6541ee96dcf">fole_missing</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00403"></a><span class="lineno"> 403</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5a5a2fee3e635b885a209374da3f640d">ole_method_sub</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeInfo *pOwnerTypeInfo, ITypeInfo *pTypeInfo, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>);</div><div class="line"><a name="l00404"></a><span class="lineno"> 404</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a35aba07c890c79964cd4b15d29589917">olemethod_from_typeinfo</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeInfo *pTypeInfo, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>);</div><div class="line"><a name="l00405"></a><span class="lineno"> 405</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a09f78a0da33127d288dcd07efc6692c7">ole_methods_sub</a>(ITypeInfo *pOwnerTypeInfo, ITypeInfo *pTypeInfo, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> methods, <span class="keywordtype">int</span> mask);</div><div class="line"><a name="l00406"></a><span class="lineno"> 406</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aad5717d16ab405a0b4b7d3211ff72527">ole_methods_from_typeinfo</a>(ITypeInfo *pTypeInfo, <span class="keywordtype">int</span> mask);</div><div class="line"><a name="l00407"></a><span class="lineno"> 407</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a4709657c93f560e08e25dc95bc54f689">typeinfo_from_ole</a>(<span class="keyword">struct</span> <a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole, ITypeInfo **ppti);</div><div class="line"><a name="l00408"></a><span class="lineno"> 408</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aa75ee71798a27c50db9f316e59e77b27">ole_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <span class="keywordtype">int</span> mask);</div><div class="line"><a name="l00409"></a><span class="lineno"> 409</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a7172b0aee359977f81f71251db26edc5">fole_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00410"></a><span class="lineno"> 410</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aaff897843a1cf2bfb5857b77f78bd7f2">fole_get_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00411"></a><span class="lineno"> 411</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1a1d911e7d192419a0bc563c1134e1f1">fole_put_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00412"></a><span class="lineno"> 412</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6a99140a5476f0da87c2c9aba0752f0f">fole_func_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00413"></a><span class="lineno"> 413</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5e12333be1ac8271835f370a58abb6b2">ole_type_from_itypeinfo</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00414"></a><span class="lineno"> 414</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a190323bc253935196667f23146769fb3">fole_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00415"></a><span class="lineno"> 415</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a06b2abe1d4bcdc1f68258fff57e08f68">ole_typelib_from_itypeinfo</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00416"></a><span class="lineno"> 416</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#abcd6997bfbcd8f8c44472b2f05480e39">fole_typelib</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00417"></a><span class="lineno"> 417</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1c2427bf2f78d7dc92d556bea85123ce">fole_query_interface</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> str_iid);</div><div class="line"><a name="l00418"></a><span class="lineno"> 418</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af8996048ad14314fa7aef6d4d775731b">fole_respond_to</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> method);</div><div class="line"><a name="l00419"></a><span class="lineno"> 419</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> <a class="code" href="../../d2/d99/win32ole_8c.html#abb98c7449dc683552d93e0ab76a4d8ee">ole_docinfo_from_type</a>(ITypeInfo *pTypeInfo, BSTR *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>, BSTR *helpstr, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> *helpcontext, BSTR *helpfile);</div><div class="line"><a name="l00420"></a><span class="lineno"> 420</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af41d300448e793508177e5b703c4d0eb">ole_usertype2val</a>(ITypeInfo *pTypeInfo, TYPEDESC *pTypeDesc, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typedetails);</div><div class="line"><a name="l00421"></a><span class="lineno"> 421</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3270db47af757cbdea41b2e897fd5b63">ole_ptrtype2val</a>(ITypeInfo *pTypeInfo, TYPEDESC *pTypeDesc, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typedetails);</div><div class="line"><a name="l00422"></a><span class="lineno"> 422</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a>(ITypeInfo *pTypeInfo, TYPEDESC *pTypeDesc, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typedetails);</div><div class="line"><a name="l00423"></a><span class="lineno"> 423</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a14d93d21d7208d39e5c3c63d50214abd">fole_method_help</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> cmdname);</div><div class="line"><a name="l00424"></a><span class="lineno"> 424</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a60fc00d3ccda920f10703894be73a31d">fole_activex_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00425"></a><span class="lineno"> 425</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6aba758cd00cea749b2a7e1ae22098df">foletype_s_ole_classes</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib);</div><div class="line"><a name="l00426"></a><span class="lineno"> 426</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad7869cc5544dece10a158bb1e6340e1e">foletype_s_typelibs</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00427"></a><span class="lineno"> 427</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a900802f6db162dab47ccf45555a9905d">foletype_s_progids</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00428"></a><span class="lineno"> 428</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac3ae981871b66fdb4efa0a05ad712256">foletype_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass);</div><div class="line"><a name="l00429"></a><span class="lineno"> 429</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a4ddfcdbb09e0396eab8089feb9923abd">oletype_set_member</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeInfo *pTypeInfo, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>);</div><div class="line"><a name="l00430"></a><span class="lineno"> 430</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a78014010885156d66440be3692ea4a13">oleclass_from_typelib</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeLib *pTypeLib, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> oleclass);</div><div class="line"><a name="l00431"></a><span class="lineno"> 431</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a9b6b7a1648ea3f09e2572eaa5ee4ca94">oletypelib_set_member</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeLib *pTypeLib);</div><div class="line"><a name="l00432"></a><span class="lineno"> 432</span> <span class="keyword">static</span> ITypeLib * <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00433"></a><span class="lineno"> 433</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6c5c0d1bde5f2871dc2127dacd9205fb">oletypelib_get_libattr</a>(ITypeLib *pTypeLib, TLIBATTR **ppTLibAttr);</div><div class="line"><a name="l00434"></a><span class="lineno"> 434</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac1a1bad5f7ad2818c0d660068ab44e8a">foletypelib_s_typelibs</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00435"></a><span class="lineno"> 435</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ab92641d2d72c638085831df508b86b3f">make_version_str</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a>);</div><div class="line"><a name="l00436"></a><span class="lineno"> 436</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ae41de633323c960996403584ec558f81">oletypelib_search_registry2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l00437"></a><span class="lineno"> 437</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a88485f594ddcf839c3057757d8d91b53">oletypelib_search_registry</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib);</div><div class="line"><a name="l00438"></a><span class="lineno"> 438</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a038baf72fddd2f2f0317efe9f0b4c2ad">foletypelib_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass);</div><div class="line"><a name="l00439"></a><span class="lineno"> 439</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a9429c757d4fe15ece52d69edf0e094e2">foletypelib_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l00440"></a><span class="lineno"> 440</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3757bad3ebff1b9c19971d2b364625b4">foletypelib_guid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00441"></a><span class="lineno"> 441</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a91f2817851c7bb20c0fe5bd881163956">foletypelib_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00442"></a><span class="lineno"> 442</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a11c9249c3a3713391907080d3e9d9d9b">foletypelib_version</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00443"></a><span class="lineno"> 443</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a9a574ecfa512cc905e0c882fe0413b43">foletypelib_major_version</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00444"></a><span class="lineno"> 444</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aff402c8fcf8df12ad99c93c4ba96abd4">foletypelib_minor_version</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00445"></a><span class="lineno"> 445</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1132f433eef2a0ab23bdf4d990799dc4">oletypelib_path</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> guid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a>);</div><div class="line"><a name="l00446"></a><span class="lineno"> 446</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2e4070a13ab6ee3c4453a57d34362a91">oletypelib_from_guid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> guid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a>, ITypeLib **ppTypeLib);</div><div class="line"><a name="l00447"></a><span class="lineno"> 447</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a55c610157abbd413fa24145b5705907d">foletypelib_path</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00448"></a><span class="lineno"> 448</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a60cc14e6fb03174de0b20323e13afcdd">foletypelib_visible</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00449"></a><span class="lineno"> 449</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a31f75b0afdb68143a0ea46798c10b413">foletypelib_library_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00450"></a><span class="lineno"> 450</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad954f499199716efcb6d3656d6874aea">foletypelib_ole_types</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00451"></a><span class="lineno"> 451</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aa01105060883846e72031eed6131b7d7">foletypelib_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00452"></a><span class="lineno"> 452</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2fdc77d63c0a1d101a2597e9d13da037">foletype_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> oleclass);</div><div class="line"><a name="l00453"></a><span class="lineno"> 453</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ae702a671c49f24709fcec4962b540fbd">foletype_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00454"></a><span class="lineno"> 454</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aaa4e0270632c9307fd04b301c488cee1">ole_ole_type</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00455"></a><span class="lineno"> 455</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af7405fc306fc6dd47d3718be25b547b7">foletype_ole_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00456"></a><span class="lineno"> 456</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5f7b09d5d74e06de5f6c89beae493338">ole_type_guid</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00457"></a><span class="lineno"> 457</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a55b1c52400f549decd28910adf9534b0">foletype_guid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00458"></a><span class="lineno"> 458</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ade95b6654fa8f56b6d40a6773d2331ad">ole_type_progid</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00459"></a><span class="lineno"> 459</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6f887102a87a5c6e8f1155ea69bd02a1">foletype_progid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00460"></a><span class="lineno"> 460</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a53606d594d28df92bb76a6afb1ae94fe">ole_type_visible</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00461"></a><span class="lineno"> 461</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a67538b99589f8465d34e18df229b9700">foletype_visible</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00462"></a><span class="lineno"> 462</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2d695e7b75d0ffd71513ceebaa6b0d3e">ole_type_major_version</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00463"></a><span class="lineno"> 463</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a198156271b35da99714f298e4885d34c">foletype_major_version</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00464"></a><span class="lineno"> 464</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac0c506b36e89c160b8d9bb7b5877a103">ole_type_minor_version</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00465"></a><span class="lineno"> 465</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aad76daf1fd7ba9e72d79d2906bb41254">foletype_minor_version</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00466"></a><span class="lineno"> 466</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a742e80085d039b7877e50611a81e9dda">ole_type_typekind</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00467"></a><span class="lineno"> 467</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a8b4f3db715ec27ff1b90d5a594e17556">foletype_typekind</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00468"></a><span class="lineno"> 468</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#acf83d71ee993025e217320481f0c146d">ole_type_helpstring</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00469"></a><span class="lineno"> 469</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a536bbe39f587ff60fd0cee5db26dc333">foletype_helpstring</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00470"></a><span class="lineno"> 470</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aa1d0781d2d7caceef543c9e4d584c614">ole_type_src_type</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00471"></a><span class="lineno"> 471</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1a24f6def4ff0e89e8f3884381b49be2">foletype_src_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00472"></a><span class="lineno"> 472</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1aa2ee3a59a0ec370676af5858be7215">ole_type_helpfile</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00473"></a><span class="lineno"> 473</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a0f560d82cf2e4604437fc3bb7280cec3">foletype_helpfile</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00474"></a><span class="lineno"> 474</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6ea161e7d9af7836343b5fc9078e45d4">ole_type_helpcontext</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00475"></a><span class="lineno"> 475</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a17402178059917f6dd6803ee73df6426">foletype_helpcontext</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00476"></a><span class="lineno"> 476</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ae383fe3eb9655495e30cac84b29e6168">foletype_ole_typelib</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00477"></a><span class="lineno"> 477</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a029768b0134384136ccb8fec098031a7">ole_type_impl_ole_types</a>(ITypeInfo *pTypeInfo, <span class="keywordtype">int</span> implflags);</div><div class="line"><a name="l00478"></a><span class="lineno"> 478</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad0f95a9f48f7af93146a71963663ec1d">foletype_impl_ole_types</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00479"></a><span class="lineno"> 479</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6a2bfa6c8da64466fb5babc49837e561">foletype_source_ole_types</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00480"></a><span class="lineno"> 480</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2ea06a0d884fd9971f1540791dadb03a">foletype_default_event_sources</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00481"></a><span class="lineno"> 481</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1aa9cb27ad3f5c039b159d04221c2730">foletype_default_ole_types</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00482"></a><span class="lineno"> 482</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a865684be9919637fc636e618fcfc34c0">foletype_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00483"></a><span class="lineno"> 483</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a7262dc332f64e74ef33ab4f1c804f6d6">ole_variables</a>(ITypeInfo *pTypeInfo);</div><div class="line"><a name="l00484"></a><span class="lineno"> 484</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a7601c0e4082bdf69b36e4b712c71d849">foletype_variables</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00485"></a><span class="lineno"> 485</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a80ab193b9c367a2c3582c7b8513d0ccf">foletype_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00486"></a><span class="lineno"> 486</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2e6e042a244e5434dd410a469ed351c9">folevariable_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00487"></a><span class="lineno"> 487</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af239c482ec64dc4a3ae7f782792b8ee2">ole_variable_ole_type</a>(ITypeInfo *pTypeInfo, UINT var_index);</div><div class="line"><a name="l00488"></a><span class="lineno"> 488</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a20fb23da064c1347bccf49c1e676ddbb">folevariable_ole_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00489"></a><span class="lineno"> 489</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a19cdf5ad474e3d5a5e1eb768bc1863ab">ole_variable_ole_type_detail</a>(ITypeInfo *pTypeInfo, UINT var_index);</div><div class="line"><a name="l00490"></a><span class="lineno"> 490</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a7fd47663ce9b04a6aab54fbeb42a8298">folevariable_ole_type_detail</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00491"></a><span class="lineno"> 491</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6b9cb77954f22e0de4393538501f8619">ole_variable_value</a>(ITypeInfo *pTypeInfo, UINT var_index);</div><div class="line"><a name="l00492"></a><span class="lineno"> 492</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a0b0b26c0997cc209fd7a7f6aa8f7f21c">folevariable_value</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00493"></a><span class="lineno"> 493</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a193adc17c1530bdbca68249ac0761baa">ole_variable_visible</a>(ITypeInfo *pTypeInfo, UINT var_index);</div><div class="line"><a name="l00494"></a><span class="lineno"> 494</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad362e99b0e786cf59de8ca21b1509d9e">folevariable_visible</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00495"></a><span class="lineno"> 495</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a23d4b2b48618ab5d151662931e221172">ole_variable_kind</a>(ITypeInfo *pTypeInfo, UINT var_index);</div><div class="line"><a name="l00496"></a><span class="lineno"> 496</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a0fc97ff3ba5a68010e19aac6920897cc">folevariable_variable_kind</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00497"></a><span class="lineno"> 497</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a54ad2dbeaac58c98d5aab369aacc7650">ole_variable_varkind</a>(ITypeInfo *pTypeInfo, UINT var_index);</div><div class="line"><a name="l00498"></a><span class="lineno"> 498</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af2f972ca981683bd7a3e06d766776420">folevariable_varkind</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00499"></a><span class="lineno"> 499</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aca6350a62c8eea366d1df29eca78dc48">folevariable_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00500"></a><span class="lineno"> 500</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a8c02b8f9190decc7b4077cb122d313fa">olemethod_set_member</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeInfo *pTypeInfo, ITypeInfo *pOwnerTypeInfo, <span class="keywordtype">int</span> index, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>);</div><div class="line"><a name="l00501"></a><span class="lineno"> 501</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#afb37c29e28b1f960fbf22b605993354d">folemethod_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass);</div><div class="line"><a name="l00502"></a><span class="lineno"> 502</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a7b85e610d07b34c298cf33157d20744f">folemethod_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> oletype, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> method);</div><div class="line"><a name="l00503"></a><span class="lineno"> 503</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6c0faebe3e31e28f7202288a1ec72573">folemethod_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00504"></a><span class="lineno"> 504</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#adf6ebc9719fb08963aa1e8bc253e7f33">ole_method_return_type</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00505"></a><span class="lineno"> 505</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a69aa8b97b2991bba847a006ba8a683ff">folemethod_return_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00506"></a><span class="lineno"> 506</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#abadfae1ced24da452479079a0b01da5b">ole_method_return_vtype</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00507"></a><span class="lineno"> 507</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ae4836afb8566d0ed610b9360d6f50990">folemethod_return_vtype</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00508"></a><span class="lineno"> 508</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2be33b87e96e8ef4c0498e91f76aa3e4">ole_method_return_type_detail</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00509"></a><span class="lineno"> 509</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a4143de391103e02d12818baedff3f685">folemethod_return_type_detail</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00510"></a><span class="lineno"> 510</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a7c43bce680b77e3dd2a1df61a36cf2f5">ole_method_invkind</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00511"></a><span class="lineno"> 511</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a51487ccbc2afad1399d12fcf846949a7">ole_method_invoke_kind</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00512"></a><span class="lineno"> 512</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#afda17c1fafb5c5da6cf2467641cb41a7">folemethod_invkind</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00513"></a><span class="lineno"> 513</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a0faf86c7524111112f60229f8da59d14">folemethod_invoke_kind</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00514"></a><span class="lineno"> 514</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aa6977439cb75f72440c305fd1e49ef28">ole_method_visible</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00515"></a><span class="lineno"> 515</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2f15f8ec2d25451fb0a2d74f0f2a1b7f">folemethod_visible</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00516"></a><span class="lineno"> 516</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a456f7cf14bf360940a0ab80340a30a5c">ole_method_event</a>(ITypeInfo *pTypeInfo, UINT method_index, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d3/dda/proc_8c.html#abc4c96af7623d1ba9cc053d18639621e">method_name</a>);</div><div class="line"><a name="l00517"></a><span class="lineno"> 517</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aaa3aba20914a6077714e3aec036c162b">folemethod_event</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00518"></a><span class="lineno"> 518</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ae54179477459ef72c2885549ff5e40e6">folemethod_event_interface</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00519"></a><span class="lineno"> 519</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#add636780fc2c908c73df7810de7f2ec3">ole_method_docinfo_from_type</a>(ITypeInfo *pTypeInfo, UINT method_index, BSTR *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>, BSTR *helpstr, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> *helpcontext, BSTR *helpfile);</div><div class="line"><a name="l00520"></a><span class="lineno"> 520</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac55a53518c2466ce34726828649d10bc">ole_method_helpstring</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00521"></a><span class="lineno"> 521</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af476ba7b3bb2b432ef6e7e772ec7a6f8">folemethod_helpstring</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00522"></a><span class="lineno"> 522</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a09549d1a72c129044395c7ae8e97e2fd">ole_method_helpfile</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00523"></a><span class="lineno"> 523</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6f9ef6641c628823181498337f6d8db5">folemethod_helpfile</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00524"></a><span class="lineno"> 524</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a39508fb2e2d971ed2197b2df7e282e29">ole_method_helpcontext</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00525"></a><span class="lineno"> 525</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#afacb5c1ecde95354cfd6a6be1415c5b8">folemethod_helpcontext</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00526"></a><span class="lineno"> 526</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5e173ea2107da10dde0bf63b92f32ec2">ole_method_dispid</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00527"></a><span class="lineno"> 527</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a48e776cb94d0c16741489a9c9450a398">folemethod_dispid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00528"></a><span class="lineno"> 528</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af66ca3fc604e4bfb7cfc7c5513826c25">ole_method_offset_vtbl</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00529"></a><span class="lineno"> 529</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ab72c16ea0e701d5685275b1a9aed1585">folemethod_offset_vtbl</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00530"></a><span class="lineno"> 530</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ab23a842ced22241faa160ec00ae03eea">ole_method_size_params</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00531"></a><span class="lineno"> 531</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3aca3c33d649f21caec07ab0fac207ae">folemethod_size_params</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00532"></a><span class="lineno"> 532</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a17949113bb77a6cf53c1efe7bdc878b6">ole_method_size_opt_params</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00533"></a><span class="lineno"> 533</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af36a9f22dfbb15239480f833541fb2d6">folemethod_size_opt_params</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00534"></a><span class="lineno"> 534</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bc1f046c48db0bdb1d581731ddfd2f8">ole_method_params</a>(ITypeInfo *pTypeInfo, UINT method_index);</div><div class="line"><a name="l00535"></a><span class="lineno"> 535</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac95137c8f13aece1fc5c9e6480062b68">folemethod_params</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00536"></a><span class="lineno"> 536</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6946f44fe8fd3dc52c25b9138ce1329f">folemethod_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00537"></a><span class="lineno"> 537</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ada8d032e43fda83f47fc1dc5d67b7e42">foleparam_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass);</div><div class="line"><a name="l00538"></a><span class="lineno"> 538</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ab9a7923050876f53298475fba0ad03af">oleparam_ole_param_from_index</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeInfo *pTypeInfo, UINT method_index, <span class="keywordtype">int</span> param_index);</div><div class="line"><a name="l00539"></a><span class="lineno"> 539</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6f774f9af58d93389160a187b06f4f38">oleparam_ole_param</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> olemethod, <span class="keywordtype">int</span> n);</div><div class="line"><a name="l00540"></a><span class="lineno"> 540</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a28a014fe0e5748d97ce5df5aca42ae00">foleparam_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> olemethod, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> n);</div><div class="line"><a name="l00541"></a><span class="lineno"> 541</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aaf29c43a083c4cb50d8e2e24bdde16b6">foleparam_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00542"></a><span class="lineno"> 542</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a71135dca3dcc348b7732333f34ef4bf3">ole_param_ole_type</a>(ITypeInfo *pTypeInfo, UINT method_index, UINT index);</div><div class="line"><a name="l00543"></a><span class="lineno"> 543</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1d906af605a6180e2e90b662b1932879">foleparam_ole_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00544"></a><span class="lineno"> 544</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6df154c28f729fc7a4fd0f817798fac3">ole_param_ole_type_detail</a>(ITypeInfo *pTypeInfo, UINT method_index, UINT index);</div><div class="line"><a name="l00545"></a><span class="lineno"> 545</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5d3bde90e102b667d712389285c5d200">foleparam_ole_type_detail</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00546"></a><span class="lineno"> 546</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a4bf6dbe617bdbaa7cb3af5b84d8b89da">ole_param_flag_mask</a>(ITypeInfo *pTypeInfo, UINT method_index, UINT index, USHORT mask);</div><div class="line"><a name="l00547"></a><span class="lineno"> 547</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af7bc1b360651a48a8b08d6baaee78905">foleparam_input</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00548"></a><span class="lineno"> 548</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af263844f08ace69c092c8ab5a0839892">foleparam_output</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00549"></a><span class="lineno"> 549</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a4c2d586120bd8d98112b6be60e4f8294">foleparam_optional</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00550"></a><span class="lineno"> 550</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac6ec24a19ac346216e24b0033d8bd202">foleparam_retval</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00551"></a><span class="lineno"> 551</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a63f5b3e6a1512326da04e41b6b0e5b78">ole_param_default</a>(ITypeInfo *pTypeInfo, UINT method_index, UINT index);</div><div class="line"><a name="l00552"></a><span class="lineno"> 552</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3fd59f1b292db308f516fe025a5cd446">foleparam_default</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00553"></a><span class="lineno"> 553</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5079f1cd6dbfb8ce2b112d4f4de56970">foleparam_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00554"></a><span class="lineno"> 554</span> <span class="keyword">static</span> <span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab70ec6922b3edc7f24e281108abf3a62">ole_search_event_at</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>);</div><div class="line"><a name="l00555"></a><span class="lineno"> 555</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a8517a117cf55ece0f972c1c4bbe11d55">ole_search_event</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>, BOOL *is_default);</div><div class="line"><a name="l00556"></a><span class="lineno"> 556</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3caf5ac5f0932872736edc5d35bd71e6">ole_search_handler_method</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> handler, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>, BOOL *is_default_handler);</div><div class="line"><a name="l00557"></a><span class="lineno"> 557</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a81d5683f19a2b3e891115a7005223ecf">ole_delete_event</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>);</div><div class="line"><a name="l00558"></a><span class="lineno"> 558</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a0b0eacb7bacb31262f8dfc3c7f283a44">hash2ptr_dispparams</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>, ITypeInfo *pTypeInfo, DISPID dispid, DISPPARAMS *pdispparams);</div><div class="line"><a name="l00559"></a><span class="lineno"> 559</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#adf669ce09db7c38c26c9a1ee0e8e85d8">hash2result</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>);</div><div class="line"><a name="l00560"></a><span class="lineno"> 560</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a43b0f9585d36ca61eb5ecd98fad874d7">ary2ptr_dispparams</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, DISPPARAMS *pdispparams);</div><div class="line"><a name="l00561"></a><span class="lineno"> 561</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3c5d3561abdd51b3a85d88c44603876b">exec_callback</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> arg);</div><div class="line"><a name="l00562"></a><span class="lineno"> 562</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a4b75e2f9c1ab1d0efeae3781011c699a">rescue_callback</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> arg);</div><div class="line"><a name="l00563"></a><span class="lineno"> 563</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a31a904a59156f31da8443d0d06ad1154">find_iid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole, <span class="keywordtype">char</span> *pitf, IID *piid, ITypeInfo **ppTypeInfo);</div><div class="line"><a name="l00564"></a><span class="lineno"> 564</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aefa742f168b66b0f6f438656c8704e0a">find_coclass</a>(ITypeInfo *pTypeInfo, TYPEATTR *pTypeAttr, ITypeInfo **pTypeInfo2, TYPEATTR **pTypeAttr2);</div><div class="line"><a name="l00565"></a><span class="lineno"> 565</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad04a677a5615054a1486ccbcf5312d90">find_default_source_from_typeinfo</a>(ITypeInfo *pTypeInfo, TYPEATTR *pTypeAttr, ITypeInfo **ppTypeInfo);</div><div class="line"><a name="l00566"></a><span class="lineno"> 566</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aa667691c99d3a2eca3c54e53df289a9a">find_default_source</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole, IID *piid, ITypeInfo **ppTypeInfo);</div><div class="line"><a name="l00567"></a><span class="lineno"> 567</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a93abd4f6b8ab587be4f474c40cc630f1">ole_event_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a> *poleev);</div><div class="line"><a name="l00568"></a><span class="lineno"> 568</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad2e1b59fa7e18c47b5de24b1a58b6ff7">fev_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass);</div><div class="line"><a name="l00569"></a><span class="lineno"> 569</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5f4caca75a1ca7971310c4f7909bda33">ev_advise</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00570"></a><span class="lineno"> 570</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6bcacff9ce50a9417b8b262dba751248">fev_initialize</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00571"></a><span class="lineno"> 571</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a593b161d7b4621b0e6b31434cec8d8cc">fev_s_msg_loop</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass);</div><div class="line"><a name="l00572"></a><span class="lineno"> 572</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6f226d1adae4b7b9897502c69e03520a">add_event_call_back</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> event, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> data);</div><div class="line"><a name="l00573"></a><span class="lineno"> 573</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac7520bee4cf7fecac67c8ad2fa6659b8">ev_on_event</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> is_ary_arg);</div><div class="line"><a name="l00574"></a><span class="lineno"> 574</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aab8c56df7fcad310b56c1785e2beae95">fev_on_event</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00575"></a><span class="lineno"> 575</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1f53a6e31877dd97034b00483513dd88">fev_on_event_with_outargs</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00576"></a><span class="lineno"> 576</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a2fe63f55350b20cc7532caf5ad0e7ccc">fev_off_event</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00577"></a><span class="lineno"> 577</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a03d0ad12a5dfd5fe6dfb820a2fcf4ca7">fev_unadvise</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00578"></a><span class="lineno"> 578</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ae384ff6b7496bc19a6cc419461cf61f5">fev_set_handler</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l00579"></a><span class="lineno"> 579</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aee60a56e4ca92f2f597dbc14483ccfeb">fev_get_handler</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00580"></a><span class="lineno"> 580</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aaac85a21f4e352281fef326427354f95">evs_push</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>);</div><div class="line"><a name="l00581"></a><span class="lineno"> 581</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5e253cdeb9cfec5844f163f53f08e3d2">evs_delete</a>(<span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l00582"></a><span class="lineno"> 582</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a038616b5c7a8bb7d26e06c5b16a0a643">evs_entry</a>(<span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l00583"></a><span class="lineno"> 583</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad369fee2d0d724ef2fe3535240b981c7">evs_length</a>(<span class="keywordtype">void</span>);</div><div class="line"><a name="l00584"></a><span class="lineno"> 584</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6830759afb9b256096ce2cfd625762a9">olevariant_free</a>(<span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar);</div><div class="line"><a name="l00585"></a><span class="lineno"> 585</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3e39523be2bde7adc51ab796000cdec9">folevariant_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass);</div><div class="line"><a name="l00586"></a><span class="lineno"> 586</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a5c16d87bf1711b15fc92a2a26773a3ea">folevariant_s_array</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> dims, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vvt);</div><div class="line"><a name="l00587"></a><span class="lineno"> 587</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a58954f48574ac2b42e8e9d2b96f930aa">folevariant_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l00588"></a><span class="lineno"> 588</span> <span class="keyword">static</span> <span class="keywordtype">long</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a251af5930d14dc9c03f0ec689aaae38f">ary2safe_array_index</a>(<span class="keywordtype">int</span> ary_size, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *ary, SAFEARRAY *psa);</div><div class="line"><a name="l00589"></a><span class="lineno"> 589</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad85fa2cce60ae4f1915b162471096a66">unlock_safe_array</a>(SAFEARRAY *psa);</div><div class="line"><a name="l00590"></a><span class="lineno"> 590</span> <span class="keyword">static</span> SAFEARRAY *<a class="code" href="../../d2/d99/win32ole_8c.html#a17a347d953c452aabf9e16be24f4a582">get_locked_safe_array</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l00591"></a><span class="lineno"> 591</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a52007ffd60bf368cb33f51b4ece83379">folevariant_ary_aref</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00592"></a><span class="lineno"> 592</span> <span class="keyword">static</span> VOID * <a class="code" href="../../d2/d99/win32ole_8c.html#ac4baf3ffd7d85c0541bb0313f6da9b5d">val2variant_ptr</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *var, VARTYPE vt);</div><div class="line"><a name="l00593"></a><span class="lineno"> 593</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a8bc9e5d97cd25261219ffa5642187da8">folevariant_ary_aset</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00594"></a><span class="lineno"> 594</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#aadf36ab75f655cbc860c9e88e37db822">folevariant_value</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00595"></a><span class="lineno"> 595</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a23d7c602c87c1e61b5495de603979936">folevariant_vartype</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>);</div><div class="line"><a name="l00596"></a><span class="lineno"> 596</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a50260416a5f8ae64ee1b630148f19160">folevariant_set_value</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l00597"></a><span class="lineno"> 597</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#abfd24c730b491591cb4cbd90bfb104a6">init_enc2cp</a>(<span class="keywordtype">void</span>);</div><div class="line"><a name="l00598"></a><span class="lineno"> 598</span> <span class="keyword">static</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2f7320fdc7ec16f02bffe3ad3d996024">free_enc2cp</a>(<span class="keywordtype">void</span>);</div><div class="line"><a name="l00599"></a><span class="lineno"> 599</span> </div><div class="line"><a name="l00600"></a><span class="lineno"> 600</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> (STDMETHODCALLTYPE mf_QueryInterface)(</div><div class="line"><a name="l00601"></a><span class="lineno"> 601</span>  IMessageFilter __RPC_FAR * This,</div><div class="line"><a name="l00602"></a><span class="lineno"> 602</span>  <span class="comment">/* [in] */</span> REFIID <a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>,</div><div class="line"><a name="l00603"></a><span class="lineno"> 603</span>  <span class="comment">/* [iid_is][out] */</span> <span class="keywordtype">void</span> __RPC_FAR *__RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#ab09baffb3870e6f212e36f9b8e6709dc">ppvObject</a>)</div><div class="line"><a name="l00604"></a><span class="lineno"> 604</span> {</div><div class="line"><a name="l00605"></a><span class="lineno"> 605</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a42f38632bba2bb73abb03716754f3230">MEMCMP</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>, &IID_IUnknown, GUID, 1) == 0</div><div class="line"><a name="l00606"></a><span class="lineno"> 606</span>  || <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a42f38632bba2bb73abb03716754f3230">MEMCMP</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>, &IID_IMessageFilter, GUID, 1) == 0)</div><div class="line"><a name="l00607"></a><span class="lineno"> 607</span>  {</div><div class="line"><a name="l00608"></a><span class="lineno"> 608</span>  *<a class="code" href="../../d2/d99/win32ole_8c.html#ab09baffb3870e6f212e36f9b8e6709dc">ppvObject</a> = &<a class="code" href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181">message_filter</a>;</div><div class="line"><a name="l00609"></a><span class="lineno"> 609</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l00610"></a><span class="lineno"> 610</span>  }</div><div class="line"><a name="l00611"></a><span class="lineno"> 611</span>  <span class="keywordflow">return</span> E_NOINTERFACE;</div><div class="line"><a name="l00612"></a><span class="lineno"> 612</span> }</div><div class="line"><a name="l00613"></a><span class="lineno"> 613</span> </div><div class="line"><a name="l00614"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0"> 614</a></span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> (STDMETHODCALLTYPE mf_AddRef)(</div><div class="line"><a name="l00615"></a><span class="lineno"> 615</span>  IMessageFilter __RPC_FAR * This)</div><div class="line"><a name="l00616"></a><span class="lineno"> 616</span> {</div><div class="line"><a name="l00617"></a><span class="lineno"> 617</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l00618"></a><span class="lineno"> 618</span> }</div><div class="line"><a name="l00619"></a><span class="lineno"> 619</span> </div><div class="line"><a name="l00620"></a><span class="lineno"> 620</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> (STDMETHODCALLTYPE mf_Release)(</div><div class="line"><a name="l00621"></a><span class="lineno"> 621</span>  IMessageFilter __RPC_FAR * This)</div><div class="line"><a name="l00622"></a><span class="lineno"> 622</span> {</div><div class="line"><a name="l00623"></a><span class="lineno"> 623</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l00624"></a><span class="lineno"> 624</span> }</div><div class="line"><a name="l00625"></a><span class="lineno"> 625</span> </div><div class="line"><a name="l00626"></a><span class="lineno"> 626</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> (STDMETHODCALLTYPE mf_HandleInComingCall)(</div><div class="line"><a name="l00627"></a><span class="lineno"> 627</span>  IMessageFilter __RPC_FAR * pThis,</div><div class="line"><a name="l00628"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a4d150110b1820ce46e1164b14094cfe9"> 628</a></span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a19f090a02e7c5b155208ba5b16572ce9">dwCallType</a>, <span class="comment">//Type of incoming call</span></div><div class="line"><a name="l00629"></a><span class="lineno"> 629</span>  HTASK <a class="code" href="../../d2/d99/win32ole_8c.html#a4d150110b1820ce46e1164b14094cfe9">threadIDCaller</a>, <span class="comment">//Task handle calling this task</span></div><div class="line"><a name="l00630"></a><span class="lineno"> 630</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ae833f13bbe5720ef229048b72cf34712">dwTickCount</a>, <span class="comment">//Elapsed tick count</span></div><div class="line"><a name="l00631"></a><span class="lineno"> 631</span>  LPINTERFACEINFO <a class="code" href="../../d2/d99/win32ole_8c.html#a820b1eeb09d0a8b2c2bac453a22f3805">lpInterfaceInfo</a> <span class="comment">//Pointer to INTERFACEINFO structure</span></div><div class="line"><a name="l00632"></a><span class="lineno"> 632</span>  )</div><div class="line"><a name="l00633"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a820b1eeb09d0a8b2c2bac453a22f3805"> 633</a></span> {</div><div class="line"><a name="l00634"></a><span class="lineno"> 634</span> <span class="preprocessor">#ifdef DEBUG_MESSAGEFILTER</span></div><div class="line"><a name="l00635"></a><span class="lineno"> 635</span>  printf(<span class="stringliteral">"incoming %08X, %08X, %d\n"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a19f090a02e7c5b155208ba5b16572ce9">dwCallType</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a4d150110b1820ce46e1164b14094cfe9">threadIDCaller</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#ae833f13bbe5720ef229048b72cf34712">dwTickCount</a>);</div><div class="line"><a name="l00636"></a><span class="lineno"> 636</span>  fflush(stdout);</div><div class="line"><a name="l00637"></a><span class="lineno"> 637</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00638"></a><span class="lineno"> 638</span>  <span class="keywordflow">switch</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a19f090a02e7c5b155208ba5b16572ce9">dwCallType</a>)</div><div class="line"><a name="l00639"></a><span class="lineno"> 639</span>  {</div><div class="line"><a name="l00640"></a><span class="lineno"> 640</span>  <span class="keywordflow">case</span> CALLTYPE_ASYNC:</div><div class="line"><a name="l00641"></a><span class="lineno"> 641</span>  <span class="keywordflow">case</span> CALLTYPE_TOPLEVEL_CALLPENDING:</div><div class="line"><a name="l00642"></a><span class="lineno"> 642</span>  <span class="keywordflow">case</span> CALLTYPE_ASYNC_CALLPENDING:</div><div class="line"><a name="l00643"></a><span class="lineno"> 643</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d8/d16/gc_8c.html#a481b1446700e95e49f9531c653543c85">rb_during_gc</a>()) {</div><div class="line"><a name="l00644"></a><span class="lineno"> 644</span>  <span class="keywordflow">return</span> SERVERCALL_RETRYLATER;</div><div class="line"><a name="l00645"></a><span class="lineno"> 645</span>  }</div><div class="line"><a name="l00646"></a><span class="lineno"> 646</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l00647"></a><span class="lineno"> 647</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l00648"></a><span class="lineno"> 648</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l00649"></a><span class="lineno"> 649</span>  }</div><div class="line"><a name="l00650"></a><span class="lineno"> 650</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>) {</div><div class="line"><a name="l00651"></a><span class="lineno"> 651</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>->lpVtbl->HandleInComingCall(<a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>,</div><div class="line"><a name="l00652"></a><span class="lineno"> 652</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a19f090a02e7c5b155208ba5b16572ce9">dwCallType</a>,</div><div class="line"><a name="l00653"></a><span class="lineno"> 653</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4d150110b1820ce46e1164b14094cfe9">threadIDCaller</a>,</div><div class="line"><a name="l00654"></a><span class="lineno"> 654</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae833f13bbe5720ef229048b72cf34712">dwTickCount</a>,</div><div class="line"><a name="l00655"></a><span class="lineno"> 655</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a820b1eeb09d0a8b2c2bac453a22f3805">lpInterfaceInfo</a>);</div><div class="line"><a name="l00656"></a><span class="lineno"> 656</span>  }</div><div class="line"><a name="l00657"></a><span class="lineno"> 657</span>  <span class="keywordflow">return</span> SERVERCALL_ISHANDLED;</div><div class="line"><a name="l00658"></a><span class="lineno"> 658</span> }</div><div class="line"><a name="l00659"></a><span class="lineno"> 659</span> </div><div class="line"><a name="l00660"></a><span class="lineno"> 660</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> (STDMETHODCALLTYPE mf_RetryRejectedCall)(</div><div class="line"><a name="l00661"></a><span class="lineno"> 661</span>  IMessageFilter* pThis,</div><div class="line"><a name="l00662"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a65439140996baa0857d23174dde5dac8"> 662</a></span>  HTASK <a class="code" href="../../d2/d99/win32ole_8c.html#a65439140996baa0857d23174dde5dac8">threadIDCallee</a>, <span class="comment">//Server task handle</span></div><div class="line"><a name="l00663"></a><span class="lineno"> 663</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ae833f13bbe5720ef229048b72cf34712">dwTickCount</a>, <span class="comment">//Elapsed tick count</span></div><div class="line"><a name="l00664"></a><span class="lineno"> 664</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac06e7f99025c41080bc6127bed3a933c">dwRejectType</a> <span class="comment">//Returned rejection message</span></div><div class="line"><a name="l00665"></a><span class="lineno"> 665</span>  )</div><div class="line"><a name="l00666"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac06e7f99025c41080bc6127bed3a933c"> 666</a></span> {</div><div class="line"><a name="l00667"></a><span class="lineno"> 667</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>) {</div><div class="line"><a name="l00668"></a><span class="lineno"> 668</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>->lpVtbl->RetryRejectedCall(<a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>,</div><div class="line"><a name="l00669"></a><span class="lineno"> 669</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a65439140996baa0857d23174dde5dac8">threadIDCallee</a>,</div><div class="line"><a name="l00670"></a><span class="lineno"> 670</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae833f13bbe5720ef229048b72cf34712">dwTickCount</a>,</div><div class="line"><a name="l00671"></a><span class="lineno"> 671</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ac06e7f99025c41080bc6127bed3a933c">dwRejectType</a>);</div><div class="line"><a name="l00672"></a><span class="lineno"> 672</span>  }</div><div class="line"><a name="l00673"></a><span class="lineno"> 673</span>  <span class="keywordflow">return</span> 1000;</div><div class="line"><a name="l00674"></a><span class="lineno"> 674</span> }</div><div class="line"><a name="l00675"></a><span class="lineno"> 675</span> </div><div class="line"><a name="l00676"></a><span class="lineno"> 676</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> (STDMETHODCALLTYPE mf_MessagePending)(</div><div class="line"><a name="l00677"></a><span class="lineno"> 677</span>  IMessageFilter* pThis,</div><div class="line"><a name="l00678"></a><span class="lineno"> 678</span>  HTASK <a class="code" href="../../d2/d99/win32ole_8c.html#a65439140996baa0857d23174dde5dac8">threadIDCallee</a>, <span class="comment">//Called applications task handle</span></div><div class="line"><a name="l00679"></a><span class="lineno"> 679</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ae833f13bbe5720ef229048b72cf34712">dwTickCount</a>, <span class="comment">//Elapsed tick count</span></div><div class="line"><a name="l00680"></a><span class="lineno"> 680</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6d457f96e6144f1981999a6c5e6d07e1">dwPendingType</a> <span class="comment">//Call type</span></div><div class="line"><a name="l00681"></a><span class="lineno"> 681</span>  )</div><div class="line"><a name="l00682"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6d457f96e6144f1981999a6c5e6d07e1"> 682</a></span> {</div><div class="line"><a name="l00683"></a><span class="lineno"> 683</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d8/d16/gc_8c.html#a481b1446700e95e49f9531c653543c85">rb_during_gc</a>()) {</div><div class="line"><a name="l00684"></a><span class="lineno"> 684</span>  <span class="keywordflow">return</span> PENDINGMSG_WAITNOPROCESS;</div><div class="line"><a name="l00685"></a><span class="lineno"> 685</span>  }</div><div class="line"><a name="l00686"></a><span class="lineno"> 686</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>) {</div><div class="line"><a name="l00687"></a><span class="lineno"> 687</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>->lpVtbl->MessagePending(<a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>,</div><div class="line"><a name="l00688"></a><span class="lineno"> 688</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a65439140996baa0857d23174dde5dac8">threadIDCallee</a>,</div><div class="line"><a name="l00689"></a><span class="lineno"> 689</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae833f13bbe5720ef229048b72cf34712">dwTickCount</a>,</div><div class="line"><a name="l00690"></a><span class="lineno"> 690</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a6d457f96e6144f1981999a6c5e6d07e1">dwPendingType</a>);</div><div class="line"><a name="l00691"></a><span class="lineno"> 691</span>  }</div><div class="line"><a name="l00692"></a><span class="lineno"> 692</span>  <span class="keywordflow">return</span> PENDINGMSG_WAITNOPROCESS;</div><div class="line"><a name="l00693"></a><span class="lineno"> 693</span> }</div><div class="line"><a name="l00694"></a><span class="lineno"> 694</span> </div><div class="line"><a name="l00695"></a><span class="lineno"><a class="line" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html"> 695</a></span> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">_Win32OLEIDispatch</a></div><div class="line"><a name="l00696"></a><span class="lineno"> 696</span> {</div><div class="line"><a name="l00697"></a><span class="lineno"><a class="line" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a5103156aae6ce459d1b1a55d32c8233b"> 697</a></span>  IDispatch <a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a5103156aae6ce459d1b1a55d32c8233b">dispatch</a>;</div><div class="line"><a name="l00698"></a><span class="lineno"><a class="line" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a78456213cddd8a467016276c988698a6"> 698</a></span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> <a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a78456213cddd8a467016276c988698a6">refcount</a>;</div><div class="line"><a name="l00699"></a><span class="lineno"><a class="line" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#ac822787106ceaeca7d783ac7ee604db8"> 699</a></span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#ac822787106ceaeca7d783ac7ee604db8">obj</a>;</div><div class="line"><a name="l00700"></a><span class="lineno"> 700</span> } <a class="code" href="../../d2/d99/win32ole_8c.html#a81b81a3a3c4a8c09c871e89792faa0fe">Win32OLEIDispatch</a>;</div><div class="line"><a name="l00701"></a><span class="lineno"> 701</span> </div><div class="line"><a name="l00702"></a><span class="lineno"> 702</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> ( STDMETHODCALLTYPE QueryInterface )(</div><div class="line"><a name="l00703"></a><span class="lineno"> 703</span>  IDispatch __RPC_FAR * This,</div><div class="line"><a name="l00704"></a><span class="lineno"> 704</span>  <span class="comment">/* [in] */</span> REFIID <a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>,</div><div class="line"><a name="l00705"></a><span class="lineno"> 705</span>  <span class="comment">/* [iid_is][out] */</span> <span class="keywordtype">void</span> __RPC_FAR *__RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#ab09baffb3870e6f212e36f9b8e6709dc">ppvObject</a>)</div><div class="line"><a name="l00706"></a><span class="lineno"> 706</span> {</div><div class="line"><a name="l00707"></a><span class="lineno"> 707</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a42f38632bba2bb73abb03716754f3230">MEMCMP</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>, &IID_IUnknown, GUID, 1) == 0</div><div class="line"><a name="l00708"></a><span class="lineno"> 708</span>  || <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a42f38632bba2bb73abb03716754f3230">MEMCMP</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>, &IID_IDispatch, GUID, 1) == 0)</div><div class="line"><a name="l00709"></a><span class="lineno"> 709</span>  {</div><div class="line"><a name="l00710"></a><span class="lineno"> 710</span>  <a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a>* <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = (<a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a>*)This;</div><div class="line"><a name="l00711"></a><span class="lineno"> 711</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>-><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a78456213cddd8a467016276c988698a6">refcount</a>++;</div><div class="line"><a name="l00712"></a><span class="lineno"> 712</span>  *<a class="code" href="../../d2/d99/win32ole_8c.html#ab09baffb3870e6f212e36f9b8e6709dc">ppvObject</a> = This;</div><div class="line"><a name="l00713"></a><span class="lineno"> 713</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l00714"></a><span class="lineno"> 714</span>  }</div><div class="line"><a name="l00715"></a><span class="lineno"> 715</span>  <span class="keywordflow">return</span> E_NOINTERFACE;</div><div class="line"><a name="l00716"></a><span class="lineno"> 716</span> }</div><div class="line"><a name="l00717"></a><span class="lineno"> 717</span> </div><div class="line"><a name="l00718"></a><span class="lineno"> 718</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> ( STDMETHODCALLTYPE AddRef )(</div><div class="line"><a name="l00719"></a><span class="lineno"> 719</span>  IDispatch __RPC_FAR * This)</div><div class="line"><a name="l00720"></a><span class="lineno"> 720</span> {</div><div class="line"><a name="l00721"></a><span class="lineno"> 721</span>  <a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a>* <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = (<a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a>*)This;</div><div class="line"><a name="l00722"></a><span class="lineno"> 722</span>  <span class="keywordflow">return</span> ++(<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>-><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a78456213cddd8a467016276c988698a6">refcount</a>);</div><div class="line"><a name="l00723"></a><span class="lineno"> 723</span> }</div><div class="line"><a name="l00724"></a><span class="lineno"> 724</span> </div><div class="line"><a name="l00725"></a><span class="lineno"> 725</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> ( STDMETHODCALLTYPE Release )(</div><div class="line"><a name="l00726"></a><span class="lineno"> 726</span>  IDispatch __RPC_FAR * This)</div><div class="line"><a name="l00727"></a><span class="lineno"> 727</span> {</div><div class="line"><a name="l00728"></a><span class="lineno"> 728</span>  <a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a>* <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = (<a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a>*)This;</div><div class="line"><a name="l00729"></a><span class="lineno"> 729</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> u = --(<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>-><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a78456213cddd8a467016276c988698a6">refcount</a>);</div><div class="line"><a name="l00730"></a><span class="lineno"> 730</span>  <span class="keywordflow">if</span> (u == 0) {</div><div class="line"><a name="l00731"></a><span class="lineno"> 731</span>  <a class="code" href="../../dd/d24/st_8h.html#a1c527e6d80aae369aeda64b1080e5feb">st_data_t</a> <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>-><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#ac822787106ceaeca7d783ac7ee604db8">obj</a>;</div><div class="line"><a name="l00732"></a><span class="lineno"> 732</span>  <a class="code" href="../../dd/d24/st_8h.html#aa04e4ee0a6e1f19e64f3be4668f41234">st_delete</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#abb509cfdf6560a9f795b1f6932d93691">DATA_PTR</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a9e1526602f12196f5bf394832700029a">com_hash</a>), &<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>, 0);</div><div class="line"><a name="l00733"></a><span class="lineno"> 733</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l00734"></a><span class="lineno"> 734</span>  }</div><div class="line"><a name="l00735"></a><span class="lineno"> 735</span>  <span class="keywordflow">return</span> u;</div><div class="line"><a name="l00736"></a><span class="lineno"> 736</span> }</div><div class="line"><a name="l00737"></a><span class="lineno"> 737</span> </div><div class="line"><a name="l00738"></a><span class="lineno"> 738</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> ( STDMETHODCALLTYPE GetTypeInfoCount )(</div><div class="line"><a name="l00739"></a><span class="lineno"> 739</span>  IDispatch __RPC_FAR * This,</div><div class="line"><a name="l00740"></a><span class="lineno"> 740</span>  <span class="comment">/* [out] */</span> UINT __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#ac3e7d57a2e31cb6749fd9fb4bdac99b2">pctinfo</a>)</div><div class="line"><a name="l00741"></a><span class="lineno"> 741</span> {</div><div class="line"><a name="l00742"></a><span class="lineno"> 742</span>  <span class="keywordflow">return</span> E_NOTIMPL;</div><div class="line"><a name="l00743"></a><span class="lineno"> 743</span> }</div><div class="line"><a name="l00744"></a><span class="lineno"> 744</span> </div><div class="line"><a name="l00745"></a><span class="lineno"> 745</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> ( STDMETHODCALLTYPE GetTypeInfo )(</div><div class="line"><a name="l00746"></a><span class="lineno"> 746</span>  IDispatch __RPC_FAR * This,</div><div class="line"><a name="l00747"></a><span class="lineno"> 747</span>  <span class="comment">/* [in] */</span> UINT <a class="code" href="../../d2/d99/win32ole_8c.html#a0603b3be2cd978771772b56d3c8a1317">iTInfo</a>,</div><div class="line"><a name="l00748"></a><span class="lineno"> 748</span>  <span class="comment">/* [in] */</span> LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>,</div><div class="line"><a name="l00749"></a><span class="lineno"> 749</span>  <span class="comment">/* [out] */</span> ITypeInfo __RPC_FAR *__RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a9cea82cbb2a01224a9e29ffe96527062">ppTInfo</a>)</div><div class="line"><a name="l00750"></a><span class="lineno"> 750</span> {</div><div class="line"><a name="l00751"></a><span class="lineno"> 751</span>  <span class="keywordflow">return</span> E_NOTIMPL;</div><div class="line"><a name="l00752"></a><span class="lineno"> 752</span> }</div><div class="line"><a name="l00753"></a><span class="lineno"> 753</span> </div><div class="line"><a name="l00754"></a><span class="lineno"> 754</span> </div><div class="line"><a name="l00755"></a><span class="lineno"> 755</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> ( STDMETHODCALLTYPE GetIDsOfNames )(</div><div class="line"><a name="l00756"></a><span class="lineno"> 756</span>  IDispatch __RPC_FAR * This,</div><div class="line"><a name="l00757"></a><span class="lineno"> 757</span>  <span class="comment">/* [in] */</span> REFIID <a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>,</div><div class="line"><a name="l00758"></a><span class="lineno"> 758</span>  <span class="comment">/* [size_is][in] */</span> LPOLESTR __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a824cc3f3a7bf2ea1137ab0b9f46ff10d">rgszNames</a>,</div><div class="line"><a name="l00759"></a><span class="lineno"> 759</span>  <span class="comment">/* [in] */</span> UINT <a class="code" href="../../d2/d99/win32ole_8c.html#ad1b2c6199f208bd8beef590eeb7e85f0">cNames</a>,</div><div class="line"><a name="l00760"></a><span class="lineno"> 760</span>  <span class="comment">/* [in] */</span> LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>,</div><div class="line"><a name="l00761"></a><span class="lineno"> 761</span>  <span class="comment">/* [size_is][out] */</span> DISPID __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a8612f92772dd1fbb3ff187c706fd88bc">rgDispId</a>)</div><div class="line"><a name="l00762"></a><span class="lineno"> 762</span> {</div><div class="line"><a name="l00763"></a><span class="lineno"> 763</span>  <span class="comment">/*</span></div><div class="line"><a name="l00764"></a><span class="lineno"> 764</span> <span class="comment"> Win32OLEIDispatch* p = (Win32OLEIDispatch*)This;</span></div><div class="line"><a name="l00765"></a><span class="lineno"> 765</span> <span class="comment"> */</span></div><div class="line"><a name="l00766"></a><span class="lineno"> 766</span>  <span class="keywordtype">char</span>* psz = <a class="code" href="../../d2/d99/win32ole_8c.html#a148da008cc189df71d5b47bf1bbb6d06">ole_wc2mb</a>(*<a class="code" href="../../d2/d99/win32ole_8c.html#a824cc3f3a7bf2ea1137ab0b9f46ff10d">rgszNames</a>); <span class="comment">// support only one method</span></div><div class="line"><a name="l00767"></a><span class="lineno"> 767</span>  *<a class="code" href="../../d2/d99/win32ole_8c.html#a8612f92772dd1fbb3ff187c706fd88bc">rgDispId</a> = <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(psz);</div><div class="line"><a name="l00768"></a><span class="lineno"> 768</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(psz);</div><div class="line"><a name="l00769"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa"> 769</a></span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l00770"></a><span class="lineno"> 770</span> }</div><div class="line"><a name="l00771"></a><span class="lineno"> 771</span> </div><div class="line"><a name="l00772"></a><span class="lineno"> 772</span> <span class="keyword">static</span> <span class="comment">/* [local] */</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> ( STDMETHODCALLTYPE Invoke )(</div><div class="line"><a name="l00773"></a><span class="lineno"> 773</span>  IDispatch __RPC_FAR * This,</div><div class="line"><a name="l00774"></a><span class="lineno"> 774</span>  <span class="comment">/* [in] */</span> DISPID <a class="code" href="../../d2/d99/win32ole_8c.html#a14cb47d02a4ed02a22e79f9bcde90278">dispIdMember</a>,</div><div class="line"><a name="l00775"></a><span class="lineno"> 775</span>  <span class="comment">/* [in] */</span> REFIID <a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>,</div><div class="line"><a name="l00776"></a><span class="lineno"> 776</span>  <span class="comment">/* [in] */</span> LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>,</div><div class="line"><a name="l00777"></a><span class="lineno"> 777</span>  <span class="comment">/* [in] */</span> WORD <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a>,</div><div class="line"><a name="l00778"></a><span class="lineno"> 778</span>  <span class="comment">/* [out][in] */</span> DISPPARAMS __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a7fc54792903a9ce527a0fb17cfdc73df">pDispParams</a>,</div><div class="line"><a name="l00779"></a><span class="lineno"> 779</span>  <span class="comment">/* [out] */</span> VARIANT __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a0a03211c46ec9c69d5d0ee5187e5b295">pVarResult</a>,</div><div class="line"><a name="l00780"></a><span class="lineno"> 780</span>  <span class="comment">/* [out] */</span> EXCEPINFO __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#a331dfbd740eaac20e1c89cac4c1810fd">pExcepInfo</a>,</div><div class="line"><a name="l00781"></a><span class="lineno"> 781</span>  <span class="comment">/* [out] */</span> UINT __RPC_FAR *<a class="code" href="../../d2/d99/win32ole_8c.html#ae417975d2b4b01e9dc4e53b1da0a0725">puArgErr</a>)</div><div class="line"><a name="l00782"></a><span class="lineno"> 782</span> {</div><div class="line"><a name="l00783"></a><span class="lineno"> 783</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>;</div><div class="line"><a name="l00784"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392"> 784</a></span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l00785"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6"> 785</a></span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a7fc54792903a9ce527a0fb17cfdc73df">pDispParams</a>->cArgs;</div><div class="line"><a name="l00786"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48"> 786</a></span>  <a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a>* <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = (<a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a>*)This;</div><div class="line"><a name="l00787"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a109f95c06b2a46aede695fbec7ab46ef"> 787</a></span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>* <a class="code" href="../../d2/d99/win32ole_8c.html#a109f95c06b2a46aede695fbec7ab46ef">parg</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l00788"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad74cc48d8fb0f66ea548685b05341c8a"> 788</a></span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l00789"></a><span class="lineno"> 789</span>  *(<a class="code" href="../../d2/d99/win32ole_8c.html#a109f95c06b2a46aede695fbec7ab46ef">parg</a> + <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>) = <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(&<a class="code" href="../../d2/d99/win32ole_8c.html#a7fc54792903a9ce527a0fb17cfdc73df">pDispParams</a>->rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a> - <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> - 1]);</div><div class="line"><a name="l00790"></a><span class="lineno"> 790</span>  }</div><div class="line"><a name="l00791"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a0b353ee5ed67ad8974a850ea3f2a224b"> 791</a></span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a14cb47d02a4ed02a22e79f9bcde90278">dispIdMember</a> == DISPID_VALUE) {</div><div class="line"><a name="l00792"></a><span class="lineno"> 792</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a> == DISPATCH_METHOD) {</div><div class="line"><a name="l00793"></a><span class="lineno"> 793</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a14cb47d02a4ed02a22e79f9bcde90278">dispIdMember</a> = <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"call"</span>);</div><div class="line"><a name="l00794"></a><span class="lineno"> 794</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a> & DISPATCH_PROPERTYGET) {</div><div class="line"><a name="l00795"></a><span class="lineno"> 795</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a14cb47d02a4ed02a22e79f9bcde90278">dispIdMember</a> = <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"value"</span>);</div><div class="line"><a name="l00796"></a><span class="lineno"> 796</span>  }</div><div class="line"><a name="l00797"></a><span class="lineno"> 797</span>  }</div><div class="line"><a name="l00798"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c"> 798</a></span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#adafa8fd17636821445380e7e1881355e">rb_funcall2</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>-><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#ac822787106ceaeca7d783ac7ee604db8">obj</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a14cb47d02a4ed02a22e79f9bcde90278">dispIdMember</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a109f95c06b2a46aede695fbec7ab46ef">parg</a>);</div><div class="line"><a name="l00799"></a><span class="lineno"> 799</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a0a03211c46ec9c69d5d0ee5187e5b295">pVarResult</a>);</div><div class="line"><a name="l00800"></a><span class="lineno"> 800</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l00801"></a><span class="lineno"> 801</span> }</div><div class="line"><a name="l00802"></a><span class="lineno"> 802</span> </div><div class="line"><a name="l00803"></a><span class="lineno"> 803</span> <span class="keyword">static</span> IDispatch*</div><div class="line"><a name="l00804"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad39844f2dafaf44c62d2e05644ebae7f"> 804</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad39844f2dafaf44c62d2e05644ebae7f">val2dispatch</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)</div><div class="line"><a name="l00805"></a><span class="lineno"> 805</span> {</div><div class="line"><a name="l00806"></a><span class="lineno"> 806</span>  <span class="keyword">struct </span><a class="code" href="../../d0/ddd/structst__table.html">st_table</a> *tbl = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abb509cfdf6560a9f795b1f6932d93691">DATA_PTR</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a9e1526602f12196f5bf394832700029a">com_hash</a>);</div><div class="line"><a name="l00807"></a><span class="lineno"> 807</span>  <a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a>* pdisp;</div><div class="line"><a name="l00808"></a><span class="lineno"> 808</span>  <a class="code" href="../../dd/d24/st_8h.html#a1c527e6d80aae369aeda64b1080e5feb">st_data_t</a> data;</div><div class="line"><a name="l00809"></a><span class="lineno"> 809</span> </div><div class="line"><a name="l00810"></a><span class="lineno"> 810</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dd/d24/st_8h.html#a2d85287fbdaf7dcbc22d45e925c29fea">st_lookup</a>(tbl, <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, &data)) {</div><div class="line"><a name="l00811"></a><span class="lineno"> 811</span>  pdisp = (<a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a> *)(data & ~<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a5a54e4921ce5d7fc253339e79eb6f0b7">FIXNUM_FLAG</a>);</div><div class="line"><a name="l00812"></a><span class="lineno"> 812</span>  pdisp-><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a78456213cddd8a467016276c988698a6">refcount</a>++;</div><div class="line"><a name="l00813"></a><span class="lineno"> 813</span>  }</div><div class="line"><a name="l00814"></a><span class="lineno"> 814</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00815"></a><span class="lineno"> 815</span>  pdisp = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac8df5a8a8961bd9e16be385fef28c2f2">ALLOC</a>(<a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">Win32OLEIDispatch</a>);</div><div class="line"><a name="l00816"></a><span class="lineno"> 816</span>  pdisp-><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a5103156aae6ce459d1b1a55d32c8233b">dispatch</a>.lpVtbl = &<a class="code" href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808">com_vtbl</a>;</div><div class="line"><a name="l00817"></a><span class="lineno"> 817</span>  pdisp-><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a78456213cddd8a467016276c988698a6">refcount</a> = 1;</div><div class="line"><a name="l00818"></a><span class="lineno"> 818</span>  pdisp-><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#ac822787106ceaeca7d783ac7ee604db8">obj</a> = <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l00819"></a><span class="lineno"> 819</span>  <a class="code" href="../../dd/d24/st_8h.html#acdc42c01229b7537ea5a4c6965c7e47a">st_insert</a>(tbl, <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>)pdisp | <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a5a54e4921ce5d7fc253339e79eb6f0b7">FIXNUM_FLAG</a>);</div><div class="line"><a name="l00820"></a><span class="lineno"> 820</span>  }</div><div class="line"><a name="l00821"></a><span class="lineno"> 821</span>  <span class="keywordflow">return</span> &pdisp-><a class="code" href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a5103156aae6ce459d1b1a55d32c8233b">dispatch</a>;</div><div class="line"><a name="l00822"></a><span class="lineno"> 822</span> }</div><div class="line"><a name="l00823"></a><span class="lineno"> 823</span> </div><div class="line"><a name="l00824"></a><span class="lineno"> 824</span> <span class="keyword">static</span> <span class="keywordtype">double</span></div><div class="line"><a name="l00825"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6eabe7fdb6877c4fc48f030143375f31"> 825</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6eabe7fdb6877c4fc48f030143375f31">rbtime2vtdate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tmobj)</div><div class="line"><a name="l00826"></a><span class="lineno"> 826</span> {</div><div class="line"><a name="l00827"></a><span class="lineno"> 827</span>  SYSTEMTIME st;</div><div class="line"><a name="l00828"></a><span class="lineno"> 828</span>  <span class="keywordtype">double</span> t = 0;</div><div class="line"><a name="l00829"></a><span class="lineno"> 829</span>  memset(&st, 0, <span class="keyword">sizeof</span>(SYSTEMTIME));</div><div class="line"><a name="l00830"></a><span class="lineno"> 830</span>  st.wYear = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(tmobj, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"year"</span>), 0));</div><div class="line"><a name="l00831"></a><span class="lineno"> 831</span>  st.wMonth = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(tmobj, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"month"</span>), 0));</div><div class="line"><a name="l00832"></a><span class="lineno"> 832</span>  st.wDay = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(tmobj, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"mday"</span>), 0));</div><div class="line"><a name="l00833"></a><span class="lineno"> 833</span>  st.wHour = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(tmobj, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"hour"</span>), 0));</div><div class="line"><a name="l00834"></a><span class="lineno"> 834</span>  st.wMinute = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(tmobj, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"min"</span>), 0));</div><div class="line"><a name="l00835"></a><span class="lineno"> 835</span>  st.wSecond = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(tmobj, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"sec"</span>), 0));</div><div class="line"><a name="l00836"></a><span class="lineno"> 836</span>  st.wMilliseconds = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(tmobj, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"nsec"</span>), 0)) / 1000000;</div><div class="line"><a name="l00837"></a><span class="lineno"> 837</span>  SystemTimeToVariantTime(&st, &t);</div><div class="line"><a name="l00838"></a><span class="lineno"> 838</span>  <span class="keywordflow">return</span> t;</div><div class="line"><a name="l00839"></a><span class="lineno"> 839</span> }</div><div class="line"><a name="l00840"></a><span class="lineno"> 840</span> </div><div class="line"><a name="l00841"></a><span class="lineno"> 841</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l00842"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac443cf13c84997231c8cf7e81e682015"> 842</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac443cf13c84997231c8cf7e81e682015">vtdate2rbtime</a>(<span class="keywordtype">double</span> date)</div><div class="line"><a name="l00843"></a><span class="lineno"> 843</span> {</div><div class="line"><a name="l00844"></a><span class="lineno"> 844</span>  SYSTEMTIME st;</div><div class="line"><a name="l00845"></a><span class="lineno"> 845</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>;</div><div class="line"><a name="l00846"></a><span class="lineno"> 846</span>  VariantTimeToSystemTime(date, &st);</div><div class="line"><a name="l00847"></a><span class="lineno"> 847</span> </div><div class="line"><a name="l00848"></a><span class="lineno"> 848</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a66f2d68e8b195fed5d03f60cb42ba31b">rb_cTime</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"new"</span>), 6,</div><div class="line"><a name="l00849"></a><span class="lineno"> 849</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(st.wYear),</div><div class="line"><a name="l00850"></a><span class="lineno"> 850</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(st.wMonth),</div><div class="line"><a name="l00851"></a><span class="lineno"> 851</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(st.wDay),</div><div class="line"><a name="l00852"></a><span class="lineno"> 852</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(st.wHour),</div><div class="line"><a name="l00853"></a><span class="lineno"> 853</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(st.wMinute),</div><div class="line"><a name="l00854"></a><span class="lineno"> 854</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(st.wSecond));</div><div class="line"><a name="l00855"></a><span class="lineno"> 855</span>  <span class="keywordflow">if</span> (st.wMilliseconds > 0) {</div><div class="line"><a name="l00856"></a><span class="lineno"> 856</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"+"</span>), 1, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a5cc507d59bd5812216cff9aa85238e5a">rb_float_new</a>((<span class="keywordtype">double</span>)(st.wMilliseconds / 1000.0)));</div><div class="line"><a name="l00857"></a><span class="lineno"> 857</span>  }</div><div class="line"><a name="l00858"></a><span class="lineno"> 858</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>;</div><div class="line"><a name="l00859"></a><span class="lineno"> 859</span> }</div><div class="line"><a name="l00860"></a><span class="lineno"> 860</span> </div><div class="line"><a name="l00861"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3"> 861</a></span> <span class="preprocessor">#define ENC_MACHING_CP(enc,encname,cp) if(strcasecmp(rb_enc_name((enc)),(encname)) == 0) return cp</span></div><div class="line"><a name="l00862"></a><span class="lineno"> 862</span> </div><div class="line"><a name="l00863"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7761c680fae0129661c0bea85dd54e29"> 863</a></span> <span class="keyword">static</span> UINT <a class="code" href="../../d2/d99/win32ole_8c.html#a7761c680fae0129661c0bea85dd54e29">ole_encoding2cp</a>(<a class="code" href="../../d1/d7b/struct_onig_encoding_type_s_t.html">rb_encoding</a> *enc)</div><div class="line"><a name="l00864"></a><span class="lineno"> 864</span> {</div><div class="line"><a name="l00865"></a><span class="lineno"> 865</span>  <span class="comment">/*</span></div><div class="line"><a name="l00866"></a><span class="lineno"> 866</span> <span class="comment"> * Is there any better solution to convert</span></div><div class="line"><a name="l00867"></a><span class="lineno"> 867</span> <span class="comment"> * Ruby encoding to Windows codepage???</span></div><div class="line"><a name="l00868"></a><span class="lineno"> 868</span> <span class="comment"> */</span></div><div class="line"><a name="l00869"></a><span class="lineno"> 869</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Big5"</span>, 950);</div><div class="line"><a name="l00870"></a><span class="lineno"> 870</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"CP51932"</span>, 51932);</div><div class="line"><a name="l00871"></a><span class="lineno"> 871</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"CP850"</span>, 850);</div><div class="line"><a name="l00872"></a><span class="lineno"> 872</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"CP852"</span>, 852);</div><div class="line"><a name="l00873"></a><span class="lineno"> 873</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"CP855"</span>, 855);</div><div class="line"><a name="l00874"></a><span class="lineno"> 874</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"CP949"</span>, 949);</div><div class="line"><a name="l00875"></a><span class="lineno"> 875</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"EUC-JP"</span>, 20932);</div><div class="line"><a name="l00876"></a><span class="lineno"> 876</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"EUC-KR"</span>, 51949);</div><div class="line"><a name="l00877"></a><span class="lineno"> 877</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"EUC-TW"</span>, 51950);</div><div class="line"><a name="l00878"></a><span class="lineno"> 878</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"GB18030"</span>, 54936);</div><div class="line"><a name="l00879"></a><span class="lineno"> 879</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"GB2312"</span>, 20936);</div><div class="line"><a name="l00880"></a><span class="lineno"> 880</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"GBK"</span>, 936);</div><div class="line"><a name="l00881"></a><span class="lineno"> 881</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM437"</span>, 437);</div><div class="line"><a name="l00882"></a><span class="lineno"> 882</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM737"</span>, 737);</div><div class="line"><a name="l00883"></a><span class="lineno"> 883</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM775"</span>, 775);</div><div class="line"><a name="l00884"></a><span class="lineno"> 884</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM852"</span>, 852);</div><div class="line"><a name="l00885"></a><span class="lineno"> 885</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM855"</span>, 855);</div><div class="line"><a name="l00886"></a><span class="lineno"> 886</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM857"</span>, 857);</div><div class="line"><a name="l00887"></a><span class="lineno"> 887</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM860"</span>, 860);</div><div class="line"><a name="l00888"></a><span class="lineno"> 888</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM861"</span>, 861);</div><div class="line"><a name="l00889"></a><span class="lineno"> 889</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM862"</span>, 862);</div><div class="line"><a name="l00890"></a><span class="lineno"> 890</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM863"</span>, 863);</div><div class="line"><a name="l00891"></a><span class="lineno"> 891</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM864"</span>, 864);</div><div class="line"><a name="l00892"></a><span class="lineno"> 892</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM865"</span>, 865);</div><div class="line"><a name="l00893"></a><span class="lineno"> 893</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM866"</span>, 866);</div><div class="line"><a name="l00894"></a><span class="lineno"> 894</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"IBM869"</span>, 869);</div><div class="line"><a name="l00895"></a><span class="lineno"> 895</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-2022-JP"</span>, 50220);</div><div class="line"><a name="l00896"></a><span class="lineno"> 896</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-8859-1"</span>, 28591);</div><div class="line"><a name="l00897"></a><span class="lineno"> 897</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-8859-15"</span>, 28605);</div><div class="line"><a name="l00898"></a><span class="lineno"> 898</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-8859-2"</span>, 28592);</div><div class="line"><a name="l00899"></a><span class="lineno"> 899</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-8859-3"</span>, 28593);</div><div class="line"><a name="l00900"></a><span class="lineno"> 900</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-8859-4"</span>, 28594);</div><div class="line"><a name="l00901"></a><span class="lineno"> 901</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-8859-5"</span>, 28595);</div><div class="line"><a name="l00902"></a><span class="lineno"> 902</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-8859-6"</span>, 28596);</div><div class="line"><a name="l00903"></a><span class="lineno"> 903</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-8859-7"</span>, 28597);</div><div class="line"><a name="l00904"></a><span class="lineno"> 904</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-8859-8"</span>, 28598);</div><div class="line"><a name="l00905"></a><span class="lineno"> 905</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"ISO-8859-9"</span>, 28599);</div><div class="line"><a name="l00906"></a><span class="lineno"> 906</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"KOI8-R"</span>, 20866);</div><div class="line"><a name="l00907"></a><span class="lineno"> 907</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"KOI8-U"</span>, 21866);</div><div class="line"><a name="l00908"></a><span class="lineno"> 908</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Shift_JIS"</span>, 932);</div><div class="line"><a name="l00909"></a><span class="lineno"> 909</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"UTF-16BE"</span>, 1201);</div><div class="line"><a name="l00910"></a><span class="lineno"> 910</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"UTF-16LE"</span>, 1200);</div><div class="line"><a name="l00911"></a><span class="lineno"> 911</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"UTF-7"</span>, 65000);</div><div class="line"><a name="l00912"></a><span class="lineno"> 912</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"UTF-8"</span>, 65001);</div><div class="line"><a name="l00913"></a><span class="lineno"> 913</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-1250"</span>, 1250);</div><div class="line"><a name="l00914"></a><span class="lineno"> 914</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-1251"</span>, 1251);</div><div class="line"><a name="l00915"></a><span class="lineno"> 915</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-1252"</span>, 1252);</div><div class="line"><a name="l00916"></a><span class="lineno"> 916</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-1253"</span>, 1253);</div><div class="line"><a name="l00917"></a><span class="lineno"> 917</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-1254"</span>, 1254);</div><div class="line"><a name="l00918"></a><span class="lineno"> 918</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-1255"</span>, 1255);</div><div class="line"><a name="l00919"></a><span class="lineno"> 919</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-1256"</span>, 1256);</div><div class="line"><a name="l00920"></a><span class="lineno"> 920</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-1257"</span>, 1257);</div><div class="line"><a name="l00921"></a><span class="lineno"> 921</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-1258"</span>, 1258);</div><div class="line"><a name="l00922"></a><span class="lineno"> 922</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-31J"</span>, 932);</div><div class="line"><a name="l00923"></a><span class="lineno"> 923</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"Windows-874"</span>, 874);</div><div class="line"><a name="l00924"></a><span class="lineno"> 924</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a>(enc, <span class="stringliteral">"eucJP-ms"</span>, 20932);</div><div class="line"><a name="l00925"></a><span class="lineno"> 925</span>  <span class="keywordflow">return</span> CP_ACP;</div><div class="line"><a name="l00926"></a><span class="lineno"> 926</span> }</div><div class="line"><a name="l00927"></a><span class="lineno"> 927</span> </div><div class="line"><a name="l00928"></a><span class="lineno"> 928</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00929"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a0b0961ddd6591968e023b883d9a08c33"> 929</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a0b0961ddd6591968e023b883d9a08c33">failed_load_conv51932</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l00930"></a><span class="lineno"> 930</span> {</div><div class="line"><a name="l00931"></a><span class="lineno"> 931</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"fail to load convert function for CP51932"</span>);</div><div class="line"><a name="l00932"></a><span class="lineno"> 932</span> }</div><div class="line"><a name="l00933"></a><span class="lineno"> 933</span> </div><div class="line"><a name="l00934"></a><span class="lineno"> 934</span> <span class="preprocessor">#ifndef pIMultiLanguage</span></div><div class="line"><a name="l00935"></a><span class="lineno"> 935</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00936"></a><span class="lineno"> 936</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5411753c688404d6a96cb91c6d44d23c">load_conv_function51932</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l00937"></a><span class="lineno"> 937</span> {</div><div class="line"><a name="l00938"></a><span class="lineno"> 938</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = E_NOINTERFACE;</div><div class="line"><a name="l00939"></a><span class="lineno"> 939</span>  <span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l00940"></a><span class="lineno"> 940</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>) {</div><div class="line"><a name="l00941"></a><span class="lineno"> 941</span> <span class="preprocessor">#if defined(HAVE_TYPE_IMULTILANGUAGE2)</span></div><div class="line"><a name="l00942"></a><span class="lineno"> 942</span>  hr = CoCreateInstance(&CLSID_CMultiLanguage, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, CLSCTX_INPROC_SERVER,</div><div class="line"><a name="l00943"></a><span class="lineno"> 943</span>  &IID_IMultiLanguage2, &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l00944"></a><span class="lineno"> 944</span> <span class="preprocessor">#elif defined(HAVE_TYPE_IMULTILANGUAGE)</span></div><div class="line"><a name="l00945"></a><span class="lineno"> 945</span>  hr = CoCreateInstance(&CLSID_CMultiLanguage, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, CLSCTX_INPROC_SERVER,</div><div class="line"><a name="l00946"></a><span class="lineno"> 946</span>  &IID_IMultiLanguage, &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l00947"></a><span class="lineno"> 947</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00948"></a><span class="lineno"> 948</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l00949"></a><span class="lineno"> 949</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a0b0961ddd6591968e023b883d9a08c33">failed_load_conv51932</a>();</div><div class="line"><a name="l00950"></a><span class="lineno"> 950</span>  }</div><div class="line"><a name="l00951"></a><span class="lineno"> 951</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l00952"></a><span class="lineno"> 952</span>  }</div><div class="line"><a name="l00953"></a><span class="lineno"> 953</span> }</div><div class="line"><a name="l00954"></a><span class="lineno"> 954</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00955"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5411753c688404d6a96cb91c6d44d23c"> 955</a></span> <span class="preprocessor">#define load_conv_function51932() failed_load_conv51932()</span></div><div class="line"><a name="l00956"></a><span class="lineno"> 956</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00957"></a><span class="lineno"> 957</span> </div><div class="line"><a name="l00958"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa5d777648e7f6a6be4e3f2a2cb51f0d0"> 958</a></span> <span class="preprocessor">#define conv_51932(cp) ((cp) == 51932 && (load_conv_function51932(), 1))</span></div><div class="line"><a name="l00959"></a><span class="lineno"> 959</span> </div><div class="line"><a name="l00960"></a><span class="lineno"> 960</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00961"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1335e192faf93015dc32985436d60f7e"> 961</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1335e192faf93015dc32985436d60f7e">set_ole_codepage</a>(UINT cp)</div><div class="line"><a name="l00962"></a><span class="lineno"> 962</span> {</div><div class="line"><a name="l00963"></a><span class="lineno"> 963</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a38c94372747cca7b01ac64e76f941a2c">code_page_installed</a>(cp)) {</div><div class="line"><a name="l00964"></a><span class="lineno"> 964</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a> = cp;</div><div class="line"><a name="l00965"></a><span class="lineno"> 965</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l00966"></a><span class="lineno"> 966</span>  <span class="keywordflow">switch</span>(cp) {</div><div class="line"><a name="l00967"></a><span class="lineno"> 967</span>  <span class="keywordflow">case</span> CP_ACP:</div><div class="line"><a name="l00968"></a><span class="lineno"> 968</span>  <span class="keywordflow">case</span> CP_OEMCP:</div><div class="line"><a name="l00969"></a><span class="lineno"> 969</span>  <span class="keywordflow">case</span> CP_MACCP:</div><div class="line"><a name="l00970"></a><span class="lineno"> 970</span>  <span class="keywordflow">case</span> CP_THREAD_ACP:</div><div class="line"><a name="l00971"></a><span class="lineno"> 971</span>  <span class="keywordflow">case</span> CP_SYMBOL:</div><div class="line"><a name="l00972"></a><span class="lineno"> 972</span>  <span class="keywordflow">case</span> CP_UTF7:</div><div class="line"><a name="l00973"></a><span class="lineno"> 973</span>  <span class="keywordflow">case</span> CP_UTF8:</div><div class="line"><a name="l00974"></a><span class="lineno"> 974</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a> = cp;</div><div class="line"><a name="l00975"></a><span class="lineno"> 975</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l00976"></a><span class="lineno"> 976</span>  <span class="keywordflow">case</span> 51932:</div><div class="line"><a name="l00977"></a><span class="lineno"> 977</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a> = cp;</div><div class="line"><a name="l00978"></a><span class="lineno"> 978</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5411753c688404d6a96cb91c6d44d23c">load_conv_function51932</a>();</div><div class="line"><a name="l00979"></a><span class="lineno"> 979</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l00980"></a><span class="lineno"> 980</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l00981"></a><span class="lineno"> 981</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"codepage should be WIN32OLE::CP_ACP, WIN32OLE::CP_OEMCP, WIN32OLE::CP_MACCP, WIN32OLE::CP_THREAD_ACP, WIN32OLE::CP_SYMBOL, WIN32OLE::CP_UTF7, WIN32OLE::CP_UTF8, or installed codepage."</span>);</div><div class="line"><a name="l00982"></a><span class="lineno"> 982</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l00983"></a><span class="lineno"> 983</span>  }</div><div class="line"><a name="l00984"></a><span class="lineno"> 984</span>  }</div><div class="line"><a name="l00985"></a><span class="lineno"> 985</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a047992a0ec88c62f680c1d484e33d5c5">cWIN32OLE_enc</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a5a3aa5d1d651d476ac780e098b058f49">ole_cp2encoding</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>);</div><div class="line"><a name="l00986"></a><span class="lineno"> 986</span> }</div><div class="line"><a name="l00987"></a><span class="lineno"> 987</span> </div><div class="line"><a name="l00988"></a><span class="lineno"> 988</span> </div><div class="line"><a name="l00989"></a><span class="lineno"> 989</span> <span class="keyword">static</span> UINT</div><div class="line"><a name="l00990"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afe5e741ee07fdc09159777facba855b5"> 990</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#afe5e741ee07fdc09159777facba855b5">ole_init_cp</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l00991"></a><span class="lineno"> 991</span> {</div><div class="line"><a name="l00992"></a><span class="lineno"> 992</span>  UINT cp;</div><div class="line"><a name="l00993"></a><span class="lineno"> 993</span>  <a class="code" href="../../d1/d7b/struct_onig_encoding_type_s_t.html">rb_encoding</a> *encdef;</div><div class="line"><a name="l00994"></a><span class="lineno"> 994</span>  encdef = <a class="code" href="../../d5/db5/encoding_8c.html#a62b808940b1049f1af6233cbbb828bd6">rb_default_internal_encoding</a>();</div><div class="line"><a name="l00995"></a><span class="lineno"> 995</span>  <span class="keywordflow">if</span> (!encdef) {</div><div class="line"><a name="l00996"></a><span class="lineno"> 996</span>  encdef = <a class="code" href="../../d5/db5/encoding_8c.html#a0724183879562529f7d3365ef5115b6d">rb_default_external_encoding</a>();</div><div class="line"><a name="l00997"></a><span class="lineno"> 997</span>  }</div><div class="line"><a name="l00998"></a><span class="lineno"> 998</span>  cp = <a class="code" href="../../d2/d99/win32ole_8c.html#a7761c680fae0129661c0bea85dd54e29">ole_encoding2cp</a>(encdef);</div><div class="line"><a name="l00999"></a><span class="lineno"> 999</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a1335e192faf93015dc32985436d60f7e">set_ole_codepage</a>(cp);</div><div class="line"><a name="l01000"></a><span class="lineno"> 1000</span>  <span class="keywordflow">return</span> cp;</div><div class="line"><a name="l01001"></a><span class="lineno"> 1001</span> }</div><div class="line"><a name="l01002"></a><span class="lineno"> 1002</span> </div><div class="line"><a name="l01003"></a><span class="lineno"><a class="line" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html"> 1003</a></span> <span class="keyword">struct </span><a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html">myCPINFOEX</a> {</div><div class="line"><a name="l01004"></a><span class="lineno"><a class="line" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#ae39d7dcd68304c5fc3f04d962afd7cd4"> 1004</a></span>  UINT <a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#ae39d7dcd68304c5fc3f04d962afd7cd4">MaxCharSize</a>;</div><div class="line"><a name="l01005"></a><span class="lineno"><a class="line" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#a8e704040d664147757f082f19c19d409"> 1005</a></span>  BYTE <a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#a8e704040d664147757f082f19c19d409">DefaultChar</a>[2];</div><div class="line"><a name="l01006"></a><span class="lineno"><a class="line" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#a178dbbc1282de54a58ba0a6d46b35123"> 1006</a></span>  BYTE <a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#a178dbbc1282de54a58ba0a6d46b35123">LeadByte</a>[12];</div><div class="line"><a name="l01007"></a><span class="lineno"><a class="line" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#ad1f4b72dcf5155a59ee238622798bf1c"> 1007</a></span>  WCHAR <a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#ad1f4b72dcf5155a59ee238622798bf1c">UnicodeDefaultChar</a>;</div><div class="line"><a name="l01008"></a><span class="lineno"><a class="line" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#aaef248f630f4dedd2bac5abe46ee6271"> 1008</a></span>  UINT <a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#aaef248f630f4dedd2bac5abe46ee6271">CodePage</a>;</div><div class="line"><a name="l01009"></a><span class="lineno"><a class="line" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#ace3c4d7aeedd1b2094b1e43e00f5ef70"> 1009</a></span>  <span class="keywordtype">char</span> <a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#ace3c4d7aeedd1b2094b1e43e00f5ef70">CodePageName</a>[MAX_PATH];</div><div class="line"><a name="l01010"></a><span class="lineno"> 1010</span> };</div><div class="line"><a name="l01011"></a><span class="lineno"> 1011</span> </div><div class="line"><a name="l01012"></a><span class="lineno"> 1012</span> <span class="keyword">static</span> <a class="code" href="../../d1/d7b/struct_onig_encoding_type_s_t.html">rb_encoding</a> *</div><div class="line"><a name="l01013"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5a3aa5d1d651d476ac780e098b058f49"> 1013</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5a3aa5d1d651d476ac780e098b058f49">ole_cp2encoding</a>(UINT cp)</div><div class="line"><a name="l01014"></a><span class="lineno"> 1014</span> {</div><div class="line"><a name="l01015"></a><span class="lineno"> 1015</span>  <span class="keyword">static</span> BOOL (*pGetCPInfoEx)(UINT, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a>, <span class="keyword">struct </span><a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html">myCPINFOEX</a> *) = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01016"></a><span class="lineno"> 1016</span>  <span class="keyword">struct </span><a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html">myCPINFOEX</a>* <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>;</div><div class="line"><a name="l01017"></a><span class="lineno"> 1017</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/db5/encoding_8c.html#aa020a886cff98ea2edead4231ff72973">enc_name</a>;</div><div class="line"><a name="l01018"></a><span class="lineno"> 1018</span>  <span class="keywordtype">char</span> *enc_cstr;</div><div class="line"><a name="l01019"></a><span class="lineno"> 1019</span>  <span class="keywordtype">int</span> idx;</div><div class="line"><a name="l01020"></a><span class="lineno"> 1020</span> </div><div class="line"><a name="l01021"></a><span class="lineno"> 1021</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d2/d99/win32ole_8c.html#a38c94372747cca7b01ac64e76f941a2c">code_page_installed</a>(cp)) {</div><div class="line"><a name="l01022"></a><span class="lineno"> 1022</span>  <span class="keywordflow">switch</span>(cp) {</div><div class="line"><a name="l01023"></a><span class="lineno"> 1023</span>  <span class="keywordflow">case</span> CP_ACP:</div><div class="line"><a name="l01024"></a><span class="lineno"> 1024</span>  cp = GetACP();</div><div class="line"><a name="l01025"></a><span class="lineno"> 1025</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01026"></a><span class="lineno"> 1026</span>  <span class="keywordflow">case</span> CP_OEMCP:</div><div class="line"><a name="l01027"></a><span class="lineno"> 1027</span>  cp = GetOEMCP();</div><div class="line"><a name="l01028"></a><span class="lineno"> 1028</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01029"></a><span class="lineno"> 1029</span>  <span class="keywordflow">case</span> CP_MACCP:</div><div class="line"><a name="l01030"></a><span class="lineno"> 1030</span>  <span class="keywordflow">case</span> CP_THREAD_ACP:</div><div class="line"><a name="l01031"></a><span class="lineno"> 1031</span>  <span class="keywordflow">if</span> (!pGetCPInfoEx) {</div><div class="line"><a name="l01032"></a><span class="lineno"> 1032</span>  pGetCPInfoEx = (BOOL (*)(UINT, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a>, <span class="keyword">struct </span><a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html">myCPINFOEX</a> *))</div><div class="line"><a name="l01033"></a><span class="lineno"> 1033</span>  GetProcAddress(GetModuleHandle(<span class="stringliteral">"kernel32"</span>), <span class="stringliteral">"GetCPInfoEx"</span>);</div><div class="line"><a name="l01034"></a><span class="lineno"> 1034</span>  <span class="keywordflow">if</span> (!pGetCPInfoEx) {</div><div class="line"><a name="l01035"></a><span class="lineno"> 1035</span>  pGetCPInfoEx = (<span class="keywordtype">void</span>*)-1;</div><div class="line"><a name="l01036"></a><span class="lineno"> 1036</span>  }</div><div class="line"><a name="l01037"></a><span class="lineno"> 1037</span>  }</div><div class="line"><a name="l01038"></a><span class="lineno"> 1038</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(<span class="keyword">struct</span> <a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html">myCPINFOEX</a>, 1);</div><div class="line"><a name="l01039"></a><span class="lineno"> 1039</span>  ZeroMemory(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, <span class="keyword">sizeof</span>(<span class="keyword">struct</span> <a class="code" href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html">myCPINFOEX</a>));</div><div class="line"><a name="l01040"></a><span class="lineno"> 1040</span>  <span class="keywordflow">if</span> (pGetCPInfoEx == (<span class="keywordtype">void</span>*)-1 || !pGetCPInfoEx(cp, 0, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>)) {</div><div class="line"><a name="l01041"></a><span class="lineno"> 1041</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"cannot map codepage to encoding."</span>);</div><div class="line"><a name="l01042"></a><span class="lineno"> 1042</span>  <span class="keywordflow">break</span>; <span class="comment">/* never reach here */</span></div><div class="line"><a name="l01043"></a><span class="lineno"> 1043</span>  }</div><div class="line"><a name="l01044"></a><span class="lineno"> 1044</span>  cp = <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>->CodePage;</div><div class="line"><a name="l01045"></a><span class="lineno"> 1045</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01046"></a><span class="lineno"> 1046</span>  <span class="keywordflow">case</span> CP_SYMBOL:</div><div class="line"><a name="l01047"></a><span class="lineno"> 1047</span>  <span class="keywordflow">case</span> CP_UTF7:</div><div class="line"><a name="l01048"></a><span class="lineno"> 1048</span>  <span class="keywordflow">case</span> CP_UTF8:</div><div class="line"><a name="l01049"></a><span class="lineno"> 1049</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01050"></a><span class="lineno"> 1050</span>  <span class="keywordflow">case</span> 51932:</div><div class="line"><a name="l01051"></a><span class="lineno"> 1051</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5411753c688404d6a96cb91c6d44d23c">load_conv_function51932</a>();</div><div class="line"><a name="l01052"></a><span class="lineno"> 1052</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01053"></a><span class="lineno"> 1053</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01054"></a><span class="lineno"> 1054</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"codepage should be WIN32OLE::CP_ACP, WIN32OLE::CP_OEMCP, WIN32OLE::CP_MACCP, WIN32OLE::CP_THREAD_ACP, WIN32OLE::CP_SYMBOL, WIN32OLE::CP_UTF7, WIN32OLE::CP_UTF8, or installed codepage."</span>);</div><div class="line"><a name="l01055"></a><span class="lineno"> 1055</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01056"></a><span class="lineno"> 1056</span>  }</div><div class="line"><a name="l01057"></a><span class="lineno"> 1057</span>  }</div><div class="line"><a name="l01058"></a><span class="lineno"> 1058</span> </div><div class="line"><a name="l01059"></a><span class="lineno"> 1059</span>  <a class="code" href="../../d5/db5/encoding_8c.html#aa020a886cff98ea2edead4231ff72973">enc_name</a> = <a class="code" href="../../d9/d2d/sprintf_8c.html#a05c34a91ab36c6a463c861df47808fae">rb_sprintf</a>(<span class="stringliteral">"CP%d"</span>, cp);</div><div class="line"><a name="l01060"></a><span class="lineno"> 1060</span>  idx = <a class="code" href="../../d5/db5/encoding_8c.html#adeb5f5b97ea43528a55d717add8f64c5">rb_enc_find_index</a>(enc_cstr = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afc32c1526ac6cb40ec33cad8782c0bae">StringValueCStr</a>(<a class="code" href="../../d5/db5/encoding_8c.html#aa020a886cff98ea2edead4231ff72973">enc_name</a>));</div><div class="line"><a name="l01061"></a><span class="lineno"> 1061</span>  <span class="keywordflow">if</span> (idx < 0)</div><div class="line"><a name="l01062"></a><span class="lineno"> 1062</span>  idx = <a class="code" href="../../d5/db5/encoding_8c.html#a873f1c2ba114f13f45b84990a5a595b7">rb_define_dummy_encoding</a>(enc_cstr);</div><div class="line"><a name="l01063"></a><span class="lineno"> 1063</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/db5/encoding_8c.html#aef9c377b2d9d78b9f88e890b77593109">rb_enc_from_index</a>(idx);</div><div class="line"><a name="l01064"></a><span class="lineno"> 1064</span> }</div><div class="line"><a name="l01065"></a><span class="lineno"> 1065</span> </div><div class="line"><a name="l01066"></a><span class="lineno"> 1066</span> <span class="keyword">static</span> <span class="keywordtype">char</span> *</div><div class="line"><a name="l01067"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a148da008cc189df71d5b47bf1bbb6d06"> 1067</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a148da008cc189df71d5b47bf1bbb6d06">ole_wc2mb</a>(LPWSTR pw)</div><div class="line"><a name="l01068"></a><span class="lineno"> 1068</span> {</div><div class="line"><a name="l01069"></a><span class="lineno"> 1069</span>  LPSTR pm;</div><div class="line"><a name="l01070"></a><span class="lineno"> 1070</span>  UINT <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = 0;</div><div class="line"><a name="l01071"></a><span class="lineno"> 1071</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#aa5d777648e7f6a6be4e3f2a2cb51f0d0">conv_51932</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>)) {</div><div class="line"><a name="l01072"></a><span class="lineno"> 1072</span> <span class="preprocessor">#ifndef pIMultiLanguage</span></div><div class="line"><a name="l01073"></a><span class="lineno"> 1073</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> dw = 0;</div><div class="line"><a name="l01074"></a><span class="lineno"> 1074</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>->lpVtbl->ConvertStringFromUnicode(<a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>,</div><div class="line"><a name="l01075"></a><span class="lineno"> 1075</span>  &dw, <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>, pw, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01076"></a><span class="lineno"> 1076</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l01077"></a><span class="lineno"> 1077</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"fail to convert Unicode to CP%d"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>);</div><div class="line"><a name="l01078"></a><span class="lineno"> 1078</span>  }</div><div class="line"><a name="l01079"></a><span class="lineno"> 1079</span>  pm = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">char</span>, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> + 1);</div><div class="line"><a name="l01080"></a><span class="lineno"> 1080</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>->lpVtbl->ConvertStringFromUnicode(<a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>,</div><div class="line"><a name="l01081"></a><span class="lineno"> 1081</span>  &dw, <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>, pw, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, pm, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01082"></a><span class="lineno"> 1082</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l01083"></a><span class="lineno"> 1083</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"fail to convert Unicode to CP%d"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>);</div><div class="line"><a name="l01084"></a><span class="lineno"> 1084</span>  }</div><div class="line"><a name="l01085"></a><span class="lineno"> 1085</span>  pm[<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>] = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l01086"></a><span class="lineno"> 1086</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01087"></a><span class="lineno"> 1087</span>  <span class="keywordflow">return</span> pm;</div><div class="line"><a name="l01088"></a><span class="lineno"> 1088</span>  }</div><div class="line"><a name="l01089"></a><span class="lineno"> 1089</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = WideCharToMultiByte(<a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>, 0, pw, -1, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, 0, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l01090"></a><span class="lineno"> 1090</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>) {</div><div class="line"><a name="l01091"></a><span class="lineno"> 1091</span>  pm = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">char</span>, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> + 1);</div><div class="line"><a name="l01092"></a><span class="lineno"> 1092</span>  WideCharToMultiByte(<a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>, 0, pw, -1, pm, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l01093"></a><span class="lineno"> 1093</span>  pm[<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>] = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l01094"></a><span class="lineno"> 1094</span>  }</div><div class="line"><a name="l01095"></a><span class="lineno"> 1095</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01096"></a><span class="lineno"> 1096</span>  pm = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">char</span>, 1);</div><div class="line"><a name="l01097"></a><span class="lineno"> 1097</span>  *pm = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l01098"></a><span class="lineno"> 1098</span>  }</div><div class="line"><a name="l01099"></a><span class="lineno"> 1099</span>  <span class="keywordflow">return</span> pm;</div><div class="line"><a name="l01100"></a><span class="lineno"> 1100</span> }</div><div class="line"><a name="l01101"></a><span class="lineno"> 1101</span> </div><div class="line"><a name="l01102"></a><span class="lineno"> 1102</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l01103"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad4337eb4b87a4587146ae21e3f7b7f29"> 1103</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad4337eb4b87a4587146ae21e3f7b7f29">ole_hresult2msg</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr)</div><div class="line"><a name="l01104"></a><span class="lineno"> 1104</span> {</div><div class="line"><a name="l01105"></a><span class="lineno"> 1105</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l01106"></a><span class="lineno"> 1106</span>  <span class="keywordtype">char</span> *p_msg = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01107"></a><span class="lineno"> 1107</span>  <span class="keywordtype">char</span> *term = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01108"></a><span class="lineno"> 1108</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> dwCount;</div><div class="line"><a name="l01109"></a><span class="lineno"> 1109</span> </div><div class="line"><a name="l01110"></a><span class="lineno"> 1110</span>  <span class="keywordtype">char</span> strhr[100];</div><div class="line"><a name="l01111"></a><span class="lineno"> 1111</span>  sprintf(strhr, <span class="stringliteral">" HRESULT error code:0x%08x\n "</span>, (<span class="keywordtype">unsigned</span>)hr);</div><div class="line"><a name="l01112"></a><span class="lineno"> 1112</span>  <a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(strhr);</div><div class="line"><a name="l01113"></a><span class="lineno"> 1113</span>  dwCount = FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER |</div><div class="line"><a name="l01114"></a><span class="lineno"> 1114</span>  FORMAT_MESSAGE_FROM_SYSTEM |</div><div class="line"><a name="l01115"></a><span class="lineno"> 1115</span>  FORMAT_MESSAGE_IGNORE_INSERTS,</div><div class="line"><a name="l01116"></a><span class="lineno"> 1116</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, hr,</div><div class="line"><a name="l01117"></a><span class="lineno"> 1117</span>  MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US),</div><div class="line"><a name="l01118"></a><span class="lineno"> 1118</span>  (LPTSTR)&p_msg, 0, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l01119"></a><span class="lineno"> 1119</span>  <span class="keywordflow">if</span> (dwCount == 0) {</div><div class="line"><a name="l01120"></a><span class="lineno"> 1120</span>  dwCount = FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER |</div><div class="line"><a name="l01121"></a><span class="lineno"> 1121</span>  FORMAT_MESSAGE_FROM_SYSTEM |</div><div class="line"><a name="l01122"></a><span class="lineno"> 1122</span>  FORMAT_MESSAGE_IGNORE_INSERTS,</div><div class="line"><a name="l01123"></a><span class="lineno"> 1123</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, hr, <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>,</div><div class="line"><a name="l01124"></a><span class="lineno"> 1124</span>  (LPTSTR)&p_msg, 0, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l01125"></a><span class="lineno"> 1125</span>  }</div><div class="line"><a name="l01126"></a><span class="lineno"> 1126</span>  <span class="keywordflow">if</span> (dwCount > 0) {</div><div class="line"><a name="l01127"></a><span class="lineno"> 1127</span>  term = p_msg + <a class="code" href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a>(p_msg);</div><div class="line"><a name="l01128"></a><span class="lineno"> 1128</span>  <span class="keywordflow">while</span> (p_msg < term) {</div><div class="line"><a name="l01129"></a><span class="lineno"> 1129</span>  term--;</div><div class="line"><a name="l01130"></a><span class="lineno"> 1130</span>  <span class="keywordflow">if</span> (*term == <span class="charliteral">'\r'</span> || *term == <span class="charliteral">'\n'</span>)</div><div class="line"><a name="l01131"></a><span class="lineno"> 1131</span>  *term = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l01132"></a><span class="lineno"> 1132</span>  <span class="keywordflow">else</span> <span class="keywordflow">break</span>;</div><div class="line"><a name="l01133"></a><span class="lineno"> 1133</span>  }</div><div class="line"><a name="l01134"></a><span class="lineno"> 1134</span>  <span class="keywordflow">if</span> (p_msg[0] != <span class="charliteral">'\0'</span>) {</div><div class="line"><a name="l01135"></a><span class="lineno"> 1135</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(<a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>, p_msg);</div><div class="line"><a name="l01136"></a><span class="lineno"> 1136</span>  }</div><div class="line"><a name="l01137"></a><span class="lineno"> 1137</span>  }</div><div class="line"><a name="l01138"></a><span class="lineno"> 1138</span>  LocalFree(p_msg);</div><div class="line"><a name="l01139"></a><span class="lineno"> 1139</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>;</div><div class="line"><a name="l01140"></a><span class="lineno"> 1140</span> }</div><div class="line"><a name="l01141"></a><span class="lineno"> 1141</span> </div><div class="line"><a name="l01142"></a><span class="lineno"> 1142</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01143"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a168b5a800d629d56514b2a19d39cb4a0"> 1143</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a168b5a800d629d56514b2a19d39cb4a0">ole_freeexceptinfo</a>(EXCEPINFO *pExInfo)</div><div class="line"><a name="l01144"></a><span class="lineno"> 1144</span> {</div><div class="line"><a name="l01145"></a><span class="lineno"> 1145</span>  SysFreeString(pExInfo->bstrDescription);</div><div class="line"><a name="l01146"></a><span class="lineno"> 1146</span>  SysFreeString(pExInfo->bstrSource);</div><div class="line"><a name="l01147"></a><span class="lineno"> 1147</span>  SysFreeString(pExInfo->bstrHelpFile);</div><div class="line"><a name="l01148"></a><span class="lineno"> 1148</span> }</div><div class="line"><a name="l01149"></a><span class="lineno"> 1149</span> </div><div class="line"><a name="l01150"></a><span class="lineno"> 1150</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l01151"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab7382ba089455a36bd5000ff84aa861f"> 1151</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab7382ba089455a36bd5000ff84aa861f">ole_excepinfo2msg</a>(EXCEPINFO *pExInfo)</div><div class="line"><a name="l01152"></a><span class="lineno"> 1152</span> {</div><div class="line"><a name="l01153"></a><span class="lineno"> 1153</span>  <span class="keywordtype">char</span> error_code[40];</div><div class="line"><a name="l01154"></a><span class="lineno"> 1154</span>  <span class="keywordtype">char</span> *pSource = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01155"></a><span class="lineno"> 1155</span>  <span class="keywordtype">char</span> *pDescription = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01156"></a><span class="lineno"> 1156</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> error_msg;</div><div class="line"><a name="l01157"></a><span class="lineno"> 1157</span>  <span class="keywordflow">if</span>(pExInfo->pfnDeferredFillIn != <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l01158"></a><span class="lineno"> 1158</span>  (*pExInfo->pfnDeferredFillIn)(pExInfo);</div><div class="line"><a name="l01159"></a><span class="lineno"> 1159</span>  }</div><div class="line"><a name="l01160"></a><span class="lineno"> 1160</span>  <span class="keywordflow">if</span> (pExInfo->bstrSource != <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l01161"></a><span class="lineno"> 1161</span>  pSource = <a class="code" href="../../d2/d99/win32ole_8c.html#a148da008cc189df71d5b47bf1bbb6d06">ole_wc2mb</a>(pExInfo->bstrSource);</div><div class="line"><a name="l01162"></a><span class="lineno"> 1162</span>  }</div><div class="line"><a name="l01163"></a><span class="lineno"> 1163</span>  <span class="keywordflow">if</span> (pExInfo->bstrDescription != <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l01164"></a><span class="lineno"> 1164</span>  pDescription = <a class="code" href="../../d2/d99/win32ole_8c.html#a148da008cc189df71d5b47bf1bbb6d06">ole_wc2mb</a>(pExInfo->bstrDescription);</div><div class="line"><a name="l01165"></a><span class="lineno"> 1165</span>  }</div><div class="line"><a name="l01166"></a><span class="lineno"> 1166</span>  <span class="keywordflow">if</span>(pExInfo->wCode == 0) {</div><div class="line"><a name="l01167"></a><span class="lineno"> 1167</span>  sprintf(error_code, <span class="stringliteral">"\n OLE error code:%lX in "</span>, pExInfo->scode);</div><div class="line"><a name="l01168"></a><span class="lineno"> 1168</span>  }</div><div class="line"><a name="l01169"></a><span class="lineno"> 1169</span>  <span class="keywordflow">else</span>{</div><div class="line"><a name="l01170"></a><span class="lineno"> 1170</span>  sprintf(error_code, <span class="stringliteral">"\n OLE error code:%u in "</span>, pExInfo->wCode);</div><div class="line"><a name="l01171"></a><span class="lineno"> 1171</span>  }</div><div class="line"><a name="l01172"></a><span class="lineno"> 1172</span>  error_msg = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(error_code);</div><div class="line"><a name="l01173"></a><span class="lineno"> 1173</span>  <span class="keywordflow">if</span>(pSource != <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l01174"></a><span class="lineno"> 1174</span>  <a class="code" href="../../db/d2e/intern_8h.html#a4e3e3ccf959b5db6c125a68e1e1db0a3">rb_str_cat</a>(error_msg, pSource, <a class="code" href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a>(pSource));</div><div class="line"><a name="l01175"></a><span class="lineno"> 1175</span>  }</div><div class="line"><a name="l01176"></a><span class="lineno"> 1176</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01177"></a><span class="lineno"> 1177</span>  <a class="code" href="../../db/d2e/intern_8h.html#a4e3e3ccf959b5db6c125a68e1e1db0a3">rb_str_cat</a>(error_msg, <span class="stringliteral">"<Unknown>"</span>, 9);</div><div class="line"><a name="l01178"></a><span class="lineno"> 1178</span>  }</div><div class="line"><a name="l01179"></a><span class="lineno"> 1179</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(error_msg, <span class="stringliteral">"\n "</span>);</div><div class="line"><a name="l01180"></a><span class="lineno"> 1180</span>  <span class="keywordflow">if</span>(pDescription != <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l01181"></a><span class="lineno"> 1181</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(error_msg, pDescription);</div><div class="line"><a name="l01182"></a><span class="lineno"> 1182</span>  }</div><div class="line"><a name="l01183"></a><span class="lineno"> 1183</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01184"></a><span class="lineno"> 1184</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(error_msg, <span class="stringliteral">"<No Description>"</span>);</div><div class="line"><a name="l01185"></a><span class="lineno"> 1185</span>  }</div><div class="line"><a name="l01186"></a><span class="lineno"> 1186</span>  <span class="keywordflow">if</span>(pSource) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pSource);</div><div class="line"><a name="l01187"></a><span class="lineno"> 1187</span>  <span class="keywordflow">if</span>(pDescription) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pDescription);</div><div class="line"><a name="l01188"></a><span class="lineno"> 1188</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a168b5a800d629d56514b2a19d39cb4a0">ole_freeexceptinfo</a>(pExInfo);</div><div class="line"><a name="l01189"></a><span class="lineno"> 1189</span>  <span class="keywordflow">return</span> error_msg;</div><div class="line"><a name="l01190"></a><span class="lineno"> 1190</span> }</div><div class="line"><a name="l01191"></a><span class="lineno"> 1191</span> </div><div class="line"><a name="l01192"></a><span class="lineno"> 1192</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01193"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e"> 1193</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ecs, <span class="keyword">const</span> <span class="keywordtype">char</span> *fmt, ...)</div><div class="line"><a name="l01194"></a><span class="lineno"> 1194</span> {</div><div class="line"><a name="l01195"></a><span class="lineno"> 1195</span>  va_list <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>;</div><div class="line"><a name="l01196"></a><span class="lineno"> 1196</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>;</div><div class="line"><a name="l01197"></a><span class="lineno"> 1197</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> err_msg;</div><div class="line"><a name="l01198"></a><span class="lineno"> 1198</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a0a28ba6e22644006c9bafb793f8a2c">va_init_list</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, fmt);</div><div class="line"><a name="l01199"></a><span class="lineno"> 1199</span>  <a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a> = <a class="code" href="../../db/d2e/intern_8h.html#a13e29e5637f1d2fdf778399849da0d34">rb_vsprintf</a>(fmt, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l01200"></a><span class="lineno"> 1200</span>  va_end(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l01201"></a><span class="lineno"> 1201</span> </div><div class="line"><a name="l01202"></a><span class="lineno"> 1202</span>  err_msg = <a class="code" href="../../d2/d99/win32ole_8c.html#ad4337eb4b87a4587146ae21e3f7b7f29">ole_hresult2msg</a>(hr);</div><div class="line"><a name="l01203"></a><span class="lineno"> 1203</span>  <span class="keywordflow">if</span>(err_msg != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l01204"></a><span class="lineno"> 1204</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(<a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>, <span class="stringliteral">"\n"</span>);</div><div class="line"><a name="l01205"></a><span class="lineno"> 1205</span>  <a class="code" href="../../db/d2e/intern_8h.html#ab592dcd9e193dea76fb0ff58b5d907e4">rb_str_append</a>(<a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>, err_msg);</div><div class="line"><a name="l01206"></a><span class="lineno"> 1206</span>  }</div><div class="line"><a name="l01207"></a><span class="lineno"> 1207</span>  <a class="code" href="../../d3/d57/eval_8c.html#a237939d28c83950b84fb6a45ccca53a0">rb_exc_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a4989eeb5742cad6359a2ed77859674de">rb_exc_new3</a>(ecs, <a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>));</div><div class="line"><a name="l01208"></a><span class="lineno"> 1208</span> }</div><div class="line"><a name="l01209"></a><span class="lineno"> 1209</span> </div><div class="line"><a name="l01210"></a><span class="lineno"> 1210</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01211"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3e5e3cd75e1b8e8ca190dc84b7a232e4"> 1211</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3e5e3cd75e1b8e8ca190dc84b7a232e4">ole_uninitialize</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l01212"></a><span class="lineno"> 1212</span> {</div><div class="line"><a name="l01213"></a><span class="lineno"> 1213</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d2/d99/win32ole_8c.html#a63b4faafeb1711dd2ea21e5a7ba406d5">g_ole_initialized</a>) <span class="keywordflow">return</span>;</div><div class="line"><a name="l01214"></a><span class="lineno"> 1214</span>  OleUninitialize();</div><div class="line"><a name="l01215"></a><span class="lineno"> 1215</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#af70e34bc5bf782d9c0fe541e851a7594">g_ole_initialized_set</a>(<a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l01216"></a><span class="lineno"> 1216</span> }</div><div class="line"><a name="l01217"></a><span class="lineno"> 1217</span> </div><div class="line"><a name="l01218"></a><span class="lineno"> 1218</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01219"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aec5bd42c3df2556e0a864fd127c84986"> 1219</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aec5bd42c3df2556e0a864fd127c84986">ole_uninitialize_hook</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a76a842035af1200c4d9d124d0eba2b95">rb_event_flag_t</a> evflag, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> data, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa5b9137f051ac26d7ccc8824f178233">ID</a> mid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass)</div><div class="line"><a name="l01220"></a><span class="lineno"> 1220</span> {</div><div class="line"><a name="l01221"></a><span class="lineno"> 1221</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3e5e3cd75e1b8e8ca190dc84b7a232e4">ole_uninitialize</a>();</div><div class="line"><a name="l01222"></a><span class="lineno"> 1222</span> }</div><div class="line"><a name="l01223"></a><span class="lineno"> 1223</span> </div><div class="line"><a name="l01224"></a><span class="lineno"> 1224</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01225"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e"> 1225</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l01226"></a><span class="lineno"> 1226</span> {</div><div class="line"><a name="l01227"></a><span class="lineno"> 1227</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l01228"></a><span class="lineno"> 1228</span> </div><div class="line"><a name="l01229"></a><span class="lineno"> 1229</span>  <span class="keywordflow">if</span>(!<a class="code" href="../../d2/d99/win32ole_8c.html#a2007081b1749d56e7a5ed6b196d9fa45">g_uninitialize_hooked</a>) {</div><div class="line"><a name="l01230"></a><span class="lineno"> 1230</span>  <a class="code" href="../../db/d16/debug_8h.html#a0f3a87f7fe46934bc85e4cd076f754ce">rb_add_event_hook</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aec5bd42c3df2556e0a864fd127c84986">ole_uninitialize_hook</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aeba7d84cad44c2c53c038db249ca6d37">RUBY_EVENT_THREAD_END</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>);</div><div class="line"><a name="l01231"></a><span class="lineno"> 1231</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a2007081b1749d56e7a5ed6b196d9fa45">g_uninitialize_hooked</a> = <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l01232"></a><span class="lineno"> 1232</span>  }</div><div class="line"><a name="l01233"></a><span class="lineno"> 1233</span> </div><div class="line"><a name="l01234"></a><span class="lineno"> 1234</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#a63b4faafeb1711dd2ea21e5a7ba406d5">g_ole_initialized</a> == <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>) {</div><div class="line"><a name="l01235"></a><span class="lineno"> 1235</span>  hr = OleInitialize(<a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l01236"></a><span class="lineno"> 1236</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l01237"></a><span class="lineno"> 1237</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"fail: OLE initialize"</span>);</div><div class="line"><a name="l01238"></a><span class="lineno"> 1238</span>  }</div><div class="line"><a name="l01239"></a><span class="lineno"> 1239</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#af70e34bc5bf782d9c0fe541e851a7594">g_ole_initialized_set</a>(<a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>);</div><div class="line"><a name="l01240"></a><span class="lineno"> 1240</span> </div><div class="line"><a name="l01241"></a><span class="lineno"> 1241</span>  hr = CoRegisterMessageFilter(&<a class="code" href="../../d2/d99/win32ole_8c.html#a752b650185811a148fde591fe97104e3">imessage_filter</a>, &<a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a>);</div><div class="line"><a name="l01242"></a><span class="lineno"> 1242</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l01243"></a><span class="lineno"> 1243</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01244"></a><span class="lineno"> 1244</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"fail: install OLE MessageFilter"</span>);</div><div class="line"><a name="l01245"></a><span class="lineno"> 1245</span>  }</div><div class="line"><a name="l01246"></a><span class="lineno"> 1246</span>  }</div><div class="line"><a name="l01247"></a><span class="lineno"> 1247</span> }</div><div class="line"><a name="l01248"></a><span class="lineno"> 1248</span> </div><div class="line"><a name="l01249"></a><span class="lineno"> 1249</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01250"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa3eea8970bbdd932344cbf86e9bbe95c"> 1250</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa3eea8970bbdd932344cbf86e9bbe95c">ole_msg_loop</a>() {</div><div class="line"><a name="l01251"></a><span class="lineno"> 1251</span>  MSG <a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>;</div><div class="line"><a name="l01252"></a><span class="lineno"> 1252</span>  <span class="keywordflow">while</span>(PeekMessage(&<a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>,<a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>,0,0,PM_REMOVE)) {</div><div class="line"><a name="l01253"></a><span class="lineno"> 1253</span>  TranslateMessage(&<a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>);</div><div class="line"><a name="l01254"></a><span class="lineno"> 1254</span>  DispatchMessage(&<a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>);</div><div class="line"><a name="l01255"></a><span class="lineno"> 1255</span>  }</div><div class="line"><a name="l01256"></a><span class="lineno"> 1256</span> }</div><div class="line"><a name="l01257"></a><span class="lineno"> 1257</span> </div><div class="line"><a name="l01258"></a><span class="lineno"> 1258</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01259"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9db8ac32bad3c759b157b41456e1c32a"> 1259</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a9db8ac32bad3c759b157b41456e1c32a">ole_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole)</div><div class="line"><a name="l01260"></a><span class="lineno"> 1260</span> {</div><div class="line"><a name="l01261"></a><span class="lineno"> 1261</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a7979d0bf1755bd9d1e72709d8fd3ff89">OLE_FREE</a>(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>);</div><div class="line"><a name="l01262"></a><span class="lineno"> 1262</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pole);</div><div class="line"><a name="l01263"></a><span class="lineno"> 1263</span> }</div><div class="line"><a name="l01264"></a><span class="lineno"> 1264</span> </div><div class="line"><a name="l01265"></a><span class="lineno"> 1265</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01266"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afc5830d08daccd1d3e65c2a374b17a77"> 1266</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#afc5830d08daccd1d3e65c2a374b17a77">oletypelib_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d6/dd4/structoletypelibdata.html">oletypelibdata</a> *poletypelib)</div><div class="line"><a name="l01267"></a><span class="lineno"> 1267</span> {</div><div class="line"><a name="l01268"></a><span class="lineno"> 1268</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a7979d0bf1755bd9d1e72709d8fd3ff89">OLE_FREE</a>(poletypelib-><a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l01269"></a><span class="lineno"> 1269</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(poletypelib);</div><div class="line"><a name="l01270"></a><span class="lineno"> 1270</span> }</div><div class="line"><a name="l01271"></a><span class="lineno"> 1271</span> </div><div class="line"><a name="l01272"></a><span class="lineno"> 1272</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01273"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa277cd78a0fd28dcdbd08a2e93b36c34"> 1273</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa277cd78a0fd28dcdbd08a2e93b36c34">oletype_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *poletype)</div><div class="line"><a name="l01274"></a><span class="lineno"> 1274</span> {</div><div class="line"><a name="l01275"></a><span class="lineno"> 1275</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a7979d0bf1755bd9d1e72709d8fd3ff89">OLE_FREE</a>(poletype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l01276"></a><span class="lineno"> 1276</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(poletype);</div><div class="line"><a name="l01277"></a><span class="lineno"> 1277</span> }</div><div class="line"><a name="l01278"></a><span class="lineno"> 1278</span> </div><div class="line"><a name="l01279"></a><span class="lineno"> 1279</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01280"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1db0ce1c948a3568385af4333d51d21e"> 1280</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1db0ce1c948a3568385af4333d51d21e">olemethod_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *polemethod)</div><div class="line"><a name="l01281"></a><span class="lineno"> 1281</span> {</div><div class="line"><a name="l01282"></a><span class="lineno"> 1282</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a7979d0bf1755bd9d1e72709d8fd3ff89">OLE_FREE</a>(polemethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>);</div><div class="line"><a name="l01283"></a><span class="lineno"> 1283</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a7979d0bf1755bd9d1e72709d8fd3ff89">OLE_FREE</a>(polemethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c">pOwnerTypeInfo</a>);</div><div class="line"><a name="l01284"></a><span class="lineno"> 1284</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(polemethod);</div><div class="line"><a name="l01285"></a><span class="lineno"> 1285</span> }</div><div class="line"><a name="l01286"></a><span class="lineno"> 1286</span> </div><div class="line"><a name="l01287"></a><span class="lineno"> 1287</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01288"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aae0f4a590a5c1279929e891188052399"> 1288</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aae0f4a590a5c1279929e891188052399">olevariable_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a> *polevar)</div><div class="line"><a name="l01289"></a><span class="lineno"> 1289</span> {</div><div class="line"><a name="l01290"></a><span class="lineno"> 1290</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a7979d0bf1755bd9d1e72709d8fd3ff89">OLE_FREE</a>(polevar-><a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>);</div><div class="line"><a name="l01291"></a><span class="lineno"> 1291</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(polevar);</div><div class="line"><a name="l01292"></a><span class="lineno"> 1292</span> }</div><div class="line"><a name="l01293"></a><span class="lineno"> 1293</span> </div><div class="line"><a name="l01294"></a><span class="lineno"> 1294</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01295"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa619ede67812e724cc5e198f7790a9dd"> 1295</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa619ede67812e724cc5e198f7790a9dd">oleparam_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pole)</div><div class="line"><a name="l01296"></a><span class="lineno"> 1296</span> {</div><div class="line"><a name="l01297"></a><span class="lineno"> 1297</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a7979d0bf1755bd9d1e72709d8fd3ff89">OLE_FREE</a>(pole-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>);</div><div class="line"><a name="l01298"></a><span class="lineno"> 1298</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pole);</div><div class="line"><a name="l01299"></a><span class="lineno"> 1299</span> }</div><div class="line"><a name="l01300"></a><span class="lineno"> 1300</span> </div><div class="line"><a name="l01301"></a><span class="lineno"> 1301</span> </div><div class="line"><a name="l01302"></a><span class="lineno"> 1302</span> <span class="keyword">static</span> LPWSTR</div><div class="line"><a name="l01303"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f"> 1303</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vstr)</div><div class="line"><a name="l01304"></a><span class="lineno"> 1304</span> {</div><div class="line"><a name="l01305"></a><span class="lineno"> 1305</span>  <a class="code" href="../../d1/d7b/struct_onig_encoding_type_s_t.html">rb_encoding</a> *enc;</div><div class="line"><a name="l01306"></a><span class="lineno"> 1306</span>  <span class="keywordtype">int</span> cp;</div><div class="line"><a name="l01307"></a><span class="lineno"> 1307</span>  UINT <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = 0;</div><div class="line"><a name="l01308"></a><span class="lineno"> 1308</span>  LPWSTR pw;</div><div class="line"><a name="l01309"></a><span class="lineno"> 1309</span>  <a class="code" href="../../dd/d24/st_8h.html#a1c527e6d80aae369aeda64b1080e5feb">st_data_t</a> data;</div><div class="line"><a name="l01310"></a><span class="lineno"> 1310</span>  enc = <a class="code" href="../../d5/db5/encoding_8c.html#ac21ed764f3b39453b6a848dd64a19585">rb_enc_get</a>(vstr);</div><div class="line"><a name="l01311"></a><span class="lineno"> 1311</span> </div><div class="line"><a name="l01312"></a><span class="lineno"> 1312</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dd/d24/st_8h.html#a2d85287fbdaf7dcbc22d45e925c29fea">st_lookup</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae55d84a8797460e9279316d18ed42e37">enc2cp_table</a>, (<a class="code" href="../../dd/d24/st_8h.html#a1c527e6d80aae369aeda64b1080e5feb">st_data_t</a>)enc, &data)) {</div><div class="line"><a name="l01313"></a><span class="lineno"> 1313</span>  cp = data;</div><div class="line"><a name="l01314"></a><span class="lineno"> 1314</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01315"></a><span class="lineno"> 1315</span>  cp = <a class="code" href="../../d2/d99/win32ole_8c.html#a7761c680fae0129661c0bea85dd54e29">ole_encoding2cp</a>(enc);</div><div class="line"><a name="l01316"></a><span class="lineno"> 1316</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a38c94372747cca7b01ac64e76f941a2c">code_page_installed</a>(cp) ||</div><div class="line"><a name="l01317"></a><span class="lineno"> 1317</span>  cp == CP_ACP ||</div><div class="line"><a name="l01318"></a><span class="lineno"> 1318</span>  cp == CP_OEMCP ||</div><div class="line"><a name="l01319"></a><span class="lineno"> 1319</span>  cp == CP_MACCP ||</div><div class="line"><a name="l01320"></a><span class="lineno"> 1320</span>  cp == CP_THREAD_ACP ||</div><div class="line"><a name="l01321"></a><span class="lineno"> 1321</span>  cp == CP_SYMBOL ||</div><div class="line"><a name="l01322"></a><span class="lineno"> 1322</span>  cp == CP_UTF7 ||</div><div class="line"><a name="l01323"></a><span class="lineno"> 1323</span>  cp == CP_UTF8 ||</div><div class="line"><a name="l01324"></a><span class="lineno"> 1324</span>  cp == 51932) {</div><div class="line"><a name="l01325"></a><span class="lineno"> 1325</span>  <a class="code" href="../../dd/d24/st_8h.html#acdc42c01229b7537ea5a4c6965c7e47a">st_insert</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae55d84a8797460e9279316d18ed42e37">enc2cp_table</a>, (<a class="code" href="../../dd/d24/st_8h.html#a1c527e6d80aae369aeda64b1080e5feb">st_data_t</a>)enc, (<a class="code" href="../../dd/d24/st_8h.html#a1c527e6d80aae369aeda64b1080e5feb">st_data_t</a>)cp);</div><div class="line"><a name="l01326"></a><span class="lineno"> 1326</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01327"></a><span class="lineno"> 1327</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"not installed Windows codepage(%d) according to `%s'"</span>, cp, <a class="code" href="../../d5/de3/encoding_8h.html#a69d59d898802726787a168ef2e0dc92c">rb_enc_name</a>(enc));</div><div class="line"><a name="l01328"></a><span class="lineno"> 1328</span>  }</div><div class="line"><a name="l01329"></a><span class="lineno"> 1329</span>  }</div><div class="line"><a name="l01330"></a><span class="lineno"> 1330</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#aa5d777648e7f6a6be4e3f2a2cb51f0d0">conv_51932</a>(cp)) {</div><div class="line"><a name="l01331"></a><span class="lineno"> 1331</span> <span class="preprocessor">#ifndef pIMultiLanguage</span></div><div class="line"><a name="l01332"></a><span class="lineno"> 1332</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> dw = 0;</div><div class="line"><a name="l01333"></a><span class="lineno"> 1333</span>  UINT len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a5133348f689646af76f8fe8e0af547f5">RSTRING_LENINT</a>(vstr);</div><div class="line"><a name="l01334"></a><span class="lineno"> 1334</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>->lpVtbl->ConvertStringToUnicode(<a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>,</div><div class="line"><a name="l01335"></a><span class="lineno"> 1335</span>  &dw, cp, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(vstr), &len, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01336"></a><span class="lineno"> 1336</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l01337"></a><span class="lineno"> 1337</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"fail to convert CP%d to Unicode"</span>, cp);</div><div class="line"><a name="l01338"></a><span class="lineno"> 1338</span>  }</div><div class="line"><a name="l01339"></a><span class="lineno"> 1339</span>  pw = SysAllocStringLen(<a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01340"></a><span class="lineno"> 1340</span>  len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a>(vstr);</div><div class="line"><a name="l01341"></a><span class="lineno"> 1341</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>->lpVtbl->ConvertStringToUnicode(<a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>,</div><div class="line"><a name="l01342"></a><span class="lineno"> 1342</span>  &dw, cp, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(vstr), &len, pw, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01343"></a><span class="lineno"> 1343</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l01344"></a><span class="lineno"> 1344</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"fail to convert CP%d to Unicode"</span>, cp);</div><div class="line"><a name="l01345"></a><span class="lineno"> 1345</span>  }</div><div class="line"><a name="l01346"></a><span class="lineno"> 1346</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01347"></a><span class="lineno"> 1347</span>  <span class="keywordflow">return</span> pw;</div><div class="line"><a name="l01348"></a><span class="lineno"> 1348</span>  }</div><div class="line"><a name="l01349"></a><span class="lineno"> 1349</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = MultiByteToWideChar(cp, 0, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(vstr), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a>(vstr), <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, 0);</div><div class="line"><a name="l01350"></a><span class="lineno"> 1350</span>  pw = SysAllocStringLen(<a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01351"></a><span class="lineno"> 1351</span>  MultiByteToWideChar(cp, 0, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(vstr), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a>(vstr), pw, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01352"></a><span class="lineno"> 1352</span>  <span class="keywordflow">return</span> pw;</div><div class="line"><a name="l01353"></a><span class="lineno"> 1353</span> }</div><div class="line"><a name="l01354"></a><span class="lineno"> 1354</span> </div><div class="line"><a name="l01355"></a><span class="lineno"> 1355</span> <span class="keyword">static</span> LPWSTR</div><div class="line"><a name="l01356"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad7e303f0dec303ecdef04cc6d828eb7c"> 1356</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad7e303f0dec303ecdef04cc6d828eb7c">ole_mb2wc</a>(<span class="keywordtype">char</span> *pm, <span class="keywordtype">int</span> len)</div><div class="line"><a name="l01357"></a><span class="lineno"> 1357</span> {</div><div class="line"><a name="l01358"></a><span class="lineno"> 1358</span>  UINT <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = 0;</div><div class="line"><a name="l01359"></a><span class="lineno"> 1359</span>  LPWSTR pw;</div><div class="line"><a name="l01360"></a><span class="lineno"> 1360</span> </div><div class="line"><a name="l01361"></a><span class="lineno"> 1361</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#aa5d777648e7f6a6be4e3f2a2cb51f0d0">conv_51932</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>)) {</div><div class="line"><a name="l01362"></a><span class="lineno"> 1362</span> <span class="preprocessor">#ifndef pIMultiLanguage</span></div><div class="line"><a name="l01363"></a><span class="lineno"> 1363</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> dw = 0;</div><div class="line"><a name="l01364"></a><span class="lineno"> 1364</span>  UINT n = len;</div><div class="line"><a name="l01365"></a><span class="lineno"> 1365</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>->lpVtbl->ConvertStringToUnicode(<a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>,</div><div class="line"><a name="l01366"></a><span class="lineno"> 1366</span>  &dw, <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>, pm, &n, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01367"></a><span class="lineno"> 1367</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l01368"></a><span class="lineno"> 1368</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"fail to convert CP%d to Unicode"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>);</div><div class="line"><a name="l01369"></a><span class="lineno"> 1369</span>  }</div><div class="line"><a name="l01370"></a><span class="lineno"> 1370</span>  pw = SysAllocStringLen(<a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01371"></a><span class="lineno"> 1371</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>->lpVtbl->ConvertStringToUnicode(<a class="code" href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a>,</div><div class="line"><a name="l01372"></a><span class="lineno"> 1372</span>  &dw, <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>, pm, &n, pw, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01373"></a><span class="lineno"> 1373</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l01374"></a><span class="lineno"> 1374</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"fail to convert CP%d to Unicode"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>);</div><div class="line"><a name="l01375"></a><span class="lineno"> 1375</span>  }</div><div class="line"><a name="l01376"></a><span class="lineno"> 1376</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01377"></a><span class="lineno"> 1377</span>  <span class="keywordflow">return</span> pw;</div><div class="line"><a name="l01378"></a><span class="lineno"> 1378</span>  }</div><div class="line"><a name="l01379"></a><span class="lineno"> 1379</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = MultiByteToWideChar(<a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>, 0, pm, len, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, 0);</div><div class="line"><a name="l01380"></a><span class="lineno"> 1380</span>  pw = SysAllocStringLen(<a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> - 1);</div><div class="line"><a name="l01381"></a><span class="lineno"> 1381</span>  MultiByteToWideChar(<a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>, 0, pm, len, pw, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01382"></a><span class="lineno"> 1382</span>  <span class="keywordflow">return</span> pw;</div><div class="line"><a name="l01383"></a><span class="lineno"> 1383</span> }</div><div class="line"><a name="l01384"></a><span class="lineno"> 1384</span> </div><div class="line"><a name="l01385"></a><span class="lineno"> 1385</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l01386"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6"> 1386</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6">ole_wc2vstr</a>(LPWSTR pw, BOOL isfree)</div><div class="line"><a name="l01387"></a><span class="lineno"> 1387</span> {</div><div class="line"><a name="l01388"></a><span class="lineno"> 1388</span>  <span class="keywordtype">char</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a148da008cc189df71d5b47bf1bbb6d06">ole_wc2mb</a>(pw);</div><div class="line"><a name="l01389"></a><span class="lineno"> 1389</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vstr = <a class="code" href="../../d5/de3/encoding_8h.html#a6707b730597e0e614213beb11670aca2">rb_enc_str_new</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>, <a class="code" href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>), <a class="code" href="../../d2/d99/win32ole_8c.html#a047992a0ec88c62f680c1d484e33d5c5">cWIN32OLE_enc</a>);</div><div class="line"><a name="l01390"></a><span class="lineno"> 1390</span>  <span class="keywordflow">if</span>(isfree)</div><div class="line"><a name="l01391"></a><span class="lineno"> 1391</span>  SysFreeString(pw);</div><div class="line"><a name="l01392"></a><span class="lineno"> 1392</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l01393"></a><span class="lineno"> 1393</span>  <span class="keywordflow">return</span> vstr;</div><div class="line"><a name="l01394"></a><span class="lineno"> 1394</span> }</div><div class="line"><a name="l01395"></a><span class="lineno"> 1395</span> </div><div class="line"><a name="l01396"></a><span class="lineno"> 1396</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l01397"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afa4d94a8fadbff668fda61cff6af208c"> 1397</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#afa4d94a8fadbff668fda61cff6af208c">ole_ary_m_entry</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keywordtype">long</span> *pid)</div><div class="line"><a name="l01398"></a><span class="lineno"> 1398</span> {</div><div class="line"><a name="l01399"></a><span class="lineno"> 1399</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l01400"></a><span class="lineno"> 1400</span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0;</div><div class="line"><a name="l01401"></a><span class="lineno"> 1401</span>  obj = <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l01402"></a><span class="lineno"> 1402</span>  <span class="keywordflow">while</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(obj) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>) {</div><div class="line"><a name="l01403"></a><span class="lineno"> 1403</span>  obj = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(obj, pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l01404"></a><span class="lineno"> 1404</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++;</div><div class="line"><a name="l01405"></a><span class="lineno"> 1405</span>  }</div><div class="line"><a name="l01406"></a><span class="lineno"> 1406</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l01407"></a><span class="lineno"> 1407</span> }</div><div class="line"><a name="l01408"></a><span class="lineno"> 1408</span> </div><div class="line"><a name="l01409"></a><span class="lineno"> 1409</span> <span class="keyword">static</span> <span class="keywordtype">void</span> *</div><div class="line"><a name="l01410"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a04a08c5718d5989071001bbb08d6bd04"> 1410</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a04a08c5718d5989071001bbb08d6bd04">get_ptr_of_variant</a>(VARIANT *pvar)</div><div class="line"><a name="l01411"></a><span class="lineno"> 1411</span> {</div><div class="line"><a name="l01412"></a><span class="lineno"> 1412</span>  <span class="keywordflow">switch</span>(V_VT(pvar)) {</div><div class="line"><a name="l01413"></a><span class="lineno"> 1413</span>  <span class="keywordflow">case</span> VT_UI1:</div><div class="line"><a name="l01414"></a><span class="lineno"> 1414</span>  <span class="keywordflow">return</span> &V_UI1(pvar);</div><div class="line"><a name="l01415"></a><span class="lineno"> 1415</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01416"></a><span class="lineno"> 1416</span>  <span class="keywordflow">case</span> VT_I2:</div><div class="line"><a name="l01417"></a><span class="lineno"> 1417</span>  <span class="keywordflow">return</span> &V_I2(pvar);</div><div class="line"><a name="l01418"></a><span class="lineno"> 1418</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01419"></a><span class="lineno"> 1419</span>  <span class="keywordflow">case</span> VT_UI2:</div><div class="line"><a name="l01420"></a><span class="lineno"> 1420</span>  <span class="keywordflow">return</span> &V_UI2(pvar);</div><div class="line"><a name="l01421"></a><span class="lineno"> 1421</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01422"></a><span class="lineno"> 1422</span>  <span class="keywordflow">case</span> VT_I4:</div><div class="line"><a name="l01423"></a><span class="lineno"> 1423</span>  <span class="keywordflow">return</span> &V_I4(pvar);</div><div class="line"><a name="l01424"></a><span class="lineno"> 1424</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01425"></a><span class="lineno"> 1425</span>  <span class="keywordflow">case</span> VT_UI4:</div><div class="line"><a name="l01426"></a><span class="lineno"> 1426</span>  <span class="keywordflow">return</span> &V_UI4(pvar);</div><div class="line"><a name="l01427"></a><span class="lineno"> 1427</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01428"></a><span class="lineno"> 1428</span>  <span class="keywordflow">case</span> VT_R4:</div><div class="line"><a name="l01429"></a><span class="lineno"> 1429</span>  <span class="keywordflow">return</span> &V_R4(pvar);</div><div class="line"><a name="l01430"></a><span class="lineno"> 1430</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01431"></a><span class="lineno"> 1431</span>  <span class="keywordflow">case</span> VT_R8:</div><div class="line"><a name="l01432"></a><span class="lineno"> 1432</span>  <span class="keywordflow">return</span> &V_R8(pvar);</div><div class="line"><a name="l01433"></a><span class="lineno"> 1433</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01434"></a><span class="lineno"> 1434</span> <span class="preprocessor">#if (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__)</span></div><div class="line"><a name="l01435"></a><span class="lineno"> 1435</span>  <span class="keywordflow">case</span> VT_I8:</div><div class="line"><a name="l01436"></a><span class="lineno"> 1436</span>  <span class="keywordflow">return</span> &V_I8(pvar);</div><div class="line"><a name="l01437"></a><span class="lineno"> 1437</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01438"></a><span class="lineno"> 1438</span>  <span class="keywordflow">case</span> VT_UI8:</div><div class="line"><a name="l01439"></a><span class="lineno"> 1439</span>  <span class="keywordflow">return</span> &V_UI8(pvar);</div><div class="line"><a name="l01440"></a><span class="lineno"> 1440</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01441"></a><span class="lineno"> 1441</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01442"></a><span class="lineno"> 1442</span>  <span class="keywordflow">case</span> VT_INT:</div><div class="line"><a name="l01443"></a><span class="lineno"> 1443</span>  <span class="keywordflow">return</span> &<a class="code" href="../../d2/d99/win32ole_8c.html#ae28d7243617fdad03119e7f82193726d">V_INT</a>(pvar);</div><div class="line"><a name="l01444"></a><span class="lineno"> 1444</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01445"></a><span class="lineno"> 1445</span>  <span class="keywordflow">case</span> VT_UINT:</div><div class="line"><a name="l01446"></a><span class="lineno"> 1446</span>  <span class="keywordflow">return</span> &<a class="code" href="../../d2/d99/win32ole_8c.html#a1da4b972b6e7529b70cadb6077838ad2">V_UINT</a>(pvar);</div><div class="line"><a name="l01447"></a><span class="lineno"> 1447</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01448"></a><span class="lineno"> 1448</span>  <span class="keywordflow">case</span> VT_CY:</div><div class="line"><a name="l01449"></a><span class="lineno"> 1449</span>  <span class="keywordflow">return</span> &V_CY(pvar);</div><div class="line"><a name="l01450"></a><span class="lineno"> 1450</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01451"></a><span class="lineno"> 1451</span>  <span class="keywordflow">case</span> VT_DATE:</div><div class="line"><a name="l01452"></a><span class="lineno"> 1452</span>  <span class="keywordflow">return</span> &V_DATE(pvar);</div><div class="line"><a name="l01453"></a><span class="lineno"> 1453</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01454"></a><span class="lineno"> 1454</span>  <span class="keywordflow">case</span> VT_BSTR:</div><div class="line"><a name="l01455"></a><span class="lineno"> 1455</span>  <span class="keywordflow">return</span> V_BSTR(pvar);</div><div class="line"><a name="l01456"></a><span class="lineno"> 1456</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01457"></a><span class="lineno"> 1457</span>  <span class="keywordflow">case</span> VT_DISPATCH:</div><div class="line"><a name="l01458"></a><span class="lineno"> 1458</span>  <span class="keywordflow">return</span> V_DISPATCH(pvar);</div><div class="line"><a name="l01459"></a><span class="lineno"> 1459</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01460"></a><span class="lineno"> 1460</span>  <span class="keywordflow">case</span> VT_ERROR:</div><div class="line"><a name="l01461"></a><span class="lineno"> 1461</span>  <span class="keywordflow">return</span> &V_ERROR(pvar);</div><div class="line"><a name="l01462"></a><span class="lineno"> 1462</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01463"></a><span class="lineno"> 1463</span>  <span class="keywordflow">case</span> VT_BOOL:</div><div class="line"><a name="l01464"></a><span class="lineno"> 1464</span>  <span class="keywordflow">return</span> &V_BOOL(pvar);</div><div class="line"><a name="l01465"></a><span class="lineno"> 1465</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01466"></a><span class="lineno"> 1466</span>  <span class="keywordflow">case</span> VT_UNKNOWN:</div><div class="line"><a name="l01467"></a><span class="lineno"> 1467</span>  <span class="keywordflow">return</span> V_UNKNOWN(pvar);</div><div class="line"><a name="l01468"></a><span class="lineno"> 1468</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01469"></a><span class="lineno"> 1469</span>  <span class="keywordflow">case</span> VT_ARRAY:</div><div class="line"><a name="l01470"></a><span class="lineno"> 1470</span>  <span class="keywordflow">return</span> &V_ARRAY(pvar);</div><div class="line"><a name="l01471"></a><span class="lineno"> 1471</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01472"></a><span class="lineno"> 1472</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01473"></a><span class="lineno"> 1473</span>  <span class="keywordflow">return</span> <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01474"></a><span class="lineno"> 1474</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01475"></a><span class="lineno"> 1475</span>  }</div><div class="line"><a name="l01476"></a><span class="lineno"> 1476</span> }</div><div class="line"><a name="l01477"></a><span class="lineno"> 1477</span> </div><div class="line"><a name="l01478"></a><span class="lineno"> 1478</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l01479"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a12a29db3df4934ec380c22ff639bc206"> 1479</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a12a29db3df4934ec380c22ff639bc206">is_all_index_under</a>(<span class="keywordtype">long</span> *pid, <span class="keywordtype">long</span> *pub, <span class="keywordtype">long</span> dim)</div><div class="line"><a name="l01480"></a><span class="lineno"> 1480</span> {</div><div class="line"><a name="l01481"></a><span class="lineno"> 1481</span>  <span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0;</div><div class="line"><a name="l01482"></a><span class="lineno"> 1482</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < dim; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l01483"></a><span class="lineno"> 1483</span>  <span class="keywordflow">if</span> (pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] > pub[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) {</div><div class="line"><a name="l01484"></a><span class="lineno"> 1484</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l01485"></a><span class="lineno"> 1485</span>  }</div><div class="line"><a name="l01486"></a><span class="lineno"> 1486</span>  }</div><div class="line"><a name="l01487"></a><span class="lineno"> 1487</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l01488"></a><span class="lineno"> 1488</span> }</div><div class="line"><a name="l01489"></a><span class="lineno"> 1489</span> </div><div class="line"><a name="l01490"></a><span class="lineno"> 1490</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01491"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac8c00a4cb59ce47acdabd17199dda0fa"> 1491</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac8c00a4cb59ce47acdabd17199dda0fa">ole_set_safe_array</a>(<span class="keywordtype">long</span> n, SAFEARRAY *psa, <span class="keywordtype">long</span> *pid, <span class="keywordtype">long</span> *pub, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keywordtype">long</span> dim, VARTYPE vt)</div><div class="line"><a name="l01492"></a><span class="lineno"> 1492</span> {</div><div class="line"><a name="l01493"></a><span class="lineno"> 1493</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> val1;</div><div class="line"><a name="l01494"></a><span class="lineno"> 1494</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l01495"></a><span class="lineno"> 1495</span>  VARIANT var;</div><div class="line"><a name="l01496"></a><span class="lineno"> 1496</span>  VOID *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01497"></a><span class="lineno"> 1497</span>  <span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = n;</div><div class="line"><a name="l01498"></a><span class="lineno"> 1498</span>  <span class="keywordflow">while</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> >= 0) {</div><div class="line"><a name="l01499"></a><span class="lineno"> 1499</span>  val1 = <a class="code" href="../../d2/d99/win32ole_8c.html#afa4d94a8fadbff668fda61cff6af208c">ole_ary_m_entry</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, pid);</div><div class="line"><a name="l01500"></a><span class="lineno"> 1500</span>  VariantInit(&var);</div><div class="line"><a name="l01501"></a><span class="lineno"> 1501</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ac4baf3ffd7d85c0541bb0313f6da9b5d">val2variant_ptr</a>(val1, &var, vt);</div><div class="line"><a name="l01502"></a><span class="lineno"> 1502</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a12a29db3df4934ec380c22ff639bc206">is_all_index_under</a>(pid, pub, dim) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>) {</div><div class="line"><a name="l01503"></a><span class="lineno"> 1503</span>  <span class="keywordflow">if</span> ((V_VT(&var) == VT_DISPATCH && V_DISPATCH(&var) == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) ||</div><div class="line"><a name="l01504"></a><span class="lineno"> 1504</span>  (V_VT(&var) == VT_UNKNOWN && V_UNKNOWN(&var) == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)) {</div><div class="line"><a name="l01505"></a><span class="lineno"> 1505</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"element of array does not have IDispatch or IUnknown Interface"</span>);</div><div class="line"><a name="l01506"></a><span class="lineno"> 1506</span>  }</div><div class="line"><a name="l01507"></a><span class="lineno"> 1507</span>  hr = SafeArrayPutElement(psa, pid, <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l01508"></a><span class="lineno"> 1508</span>  }</div><div class="line"><a name="l01509"></a><span class="lineno"> 1509</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l01510"></a><span class="lineno"> 1510</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to SafeArrayPutElement"</span>);</div><div class="line"><a name="l01511"></a><span class="lineno"> 1511</span>  }</div><div class="line"><a name="l01512"></a><span class="lineno"> 1512</span>  pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] += 1;</div><div class="line"><a name="l01513"></a><span class="lineno"> 1513</span>  <span class="keywordflow">if</span> (pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] > pub[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) {</div><div class="line"><a name="l01514"></a><span class="lineno"> 1514</span>  pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] = 0;</div><div class="line"><a name="l01515"></a><span class="lineno"> 1515</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> -= 1;</div><div class="line"><a name="l01516"></a><span class="lineno"> 1516</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01517"></a><span class="lineno"> 1517</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = dim - 1;</div><div class="line"><a name="l01518"></a><span class="lineno"> 1518</span>  }</div><div class="line"><a name="l01519"></a><span class="lineno"> 1519</span>  }</div><div class="line"><a name="l01520"></a><span class="lineno"> 1520</span> }</div><div class="line"><a name="l01521"></a><span class="lineno"> 1521</span> </div><div class="line"><a name="l01522"></a><span class="lineno"> 1522</span> <span class="keyword">static</span> <span class="keywordtype">long</span></div><div class="line"><a name="l01523"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7946b47acb9022d6a5bc20e728ed5013"> 1523</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7946b47acb9022d6a5bc20e728ed5013">dimension</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>) {</div><div class="line"><a name="l01524"></a><span class="lineno"> 1524</span>  <span class="keywordtype">long</span> dim = 0;</div><div class="line"><a name="l01525"></a><span class="lineno"> 1525</span>  <span class="keywordtype">long</span> dim1 = 0;</div><div class="line"><a name="l01526"></a><span class="lineno"> 1526</span>  <span class="keywordtype">long</span> len = 0;</div><div class="line"><a name="l01527"></a><span class="lineno"> 1527</span>  <span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0;</div><div class="line"><a name="l01528"></a><span class="lineno"> 1528</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>) {</div><div class="line"><a name="l01529"></a><span class="lineno"> 1529</span>  len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01530"></a><span class="lineno"> 1530</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < len; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l01531"></a><span class="lineno"> 1531</span>  dim1 = <a class="code" href="../../d2/d99/win32ole_8c.html#a7946b47acb9022d6a5bc20e728ed5013">dimension</a>(<a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>));</div><div class="line"><a name="l01532"></a><span class="lineno"> 1532</span>  <span class="keywordflow">if</span> (dim < dim1) {</div><div class="line"><a name="l01533"></a><span class="lineno"> 1533</span>  dim = dim1;</div><div class="line"><a name="l01534"></a><span class="lineno"> 1534</span>  }</div><div class="line"><a name="l01535"></a><span class="lineno"> 1535</span>  }</div><div class="line"><a name="l01536"></a><span class="lineno"> 1536</span>  dim += 1;</div><div class="line"><a name="l01537"></a><span class="lineno"> 1537</span>  }</div><div class="line"><a name="l01538"></a><span class="lineno"> 1538</span>  <span class="keywordflow">return</span> dim;</div><div class="line"><a name="l01539"></a><span class="lineno"> 1539</span> }</div><div class="line"><a name="l01540"></a><span class="lineno"> 1540</span> </div><div class="line"><a name="l01541"></a><span class="lineno"> 1541</span> <span class="keyword">static</span> <span class="keywordtype">long</span></div><div class="line"><a name="l01542"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a632f2bcf05d41fa60f4c4369849ddd1c"> 1542</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a632f2bcf05d41fa60f4c4369849ddd1c">ary_len_of_dim</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, <span class="keywordtype">long</span> dim) {</div><div class="line"><a name="l01543"></a><span class="lineno"> 1543</span>  <span class="keywordtype">long</span> ary_len = 0;</div><div class="line"><a name="l01544"></a><span class="lineno"> 1544</span>  <span class="keywordtype">long</span> ary_len1 = 0;</div><div class="line"><a name="l01545"></a><span class="lineno"> 1545</span>  <span class="keywordtype">long</span> len = 0;</div><div class="line"><a name="l01546"></a><span class="lineno"> 1546</span>  <span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0;</div><div class="line"><a name="l01547"></a><span class="lineno"> 1547</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l01548"></a><span class="lineno"> 1548</span>  <span class="keywordflow">if</span> (dim == 0) {</div><div class="line"><a name="l01549"></a><span class="lineno"> 1549</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(ary) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>) {</div><div class="line"><a name="l01550"></a><span class="lineno"> 1550</span>  ary_len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(ary);</div><div class="line"><a name="l01551"></a><span class="lineno"> 1551</span>  }</div><div class="line"><a name="l01552"></a><span class="lineno"> 1552</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01553"></a><span class="lineno"> 1553</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(ary) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>) {</div><div class="line"><a name="l01554"></a><span class="lineno"> 1554</span>  len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(ary);</div><div class="line"><a name="l01555"></a><span class="lineno"> 1555</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < len; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l01556"></a><span class="lineno"> 1556</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(ary, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l01557"></a><span class="lineno"> 1557</span>  ary_len1 = <a class="code" href="../../d2/d99/win32ole_8c.html#a632f2bcf05d41fa60f4c4369849ddd1c">ary_len_of_dim</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, dim-1);</div><div class="line"><a name="l01558"></a><span class="lineno"> 1558</span>  <span class="keywordflow">if</span> (ary_len < ary_len1) {</div><div class="line"><a name="l01559"></a><span class="lineno"> 1559</span>  ary_len = ary_len1;</div><div class="line"><a name="l01560"></a><span class="lineno"> 1560</span>  }</div><div class="line"><a name="l01561"></a><span class="lineno"> 1561</span>  }</div><div class="line"><a name="l01562"></a><span class="lineno"> 1562</span>  }</div><div class="line"><a name="l01563"></a><span class="lineno"> 1563</span>  }</div><div class="line"><a name="l01564"></a><span class="lineno"> 1564</span>  <span class="keywordflow">return</span> ary_len;</div><div class="line"><a name="l01565"></a><span class="lineno"> 1565</span> }</div><div class="line"><a name="l01566"></a><span class="lineno"> 1566</span> </div><div class="line"><a name="l01567"></a><span class="lineno"> 1567</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a></div><div class="line"><a name="l01568"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a17da1c9035e9e51a82318d5bc6511c04"> 1568</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a17da1c9035e9e51a82318d5bc6511c04">ole_val_ary2variant_ary</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *var, VARTYPE vt)</div><div class="line"><a name="l01569"></a><span class="lineno"> 1569</span> {</div><div class="line"><a name="l01570"></a><span class="lineno"> 1570</span>  <span class="keywordtype">long</span> dim = 0;</div><div class="line"><a name="l01571"></a><span class="lineno"> 1571</span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0;</div><div class="line"><a name="l01572"></a><span class="lineno"> 1572</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l01573"></a><span class="lineno"> 1573</span> </div><div class="line"><a name="l01574"></a><span class="lineno"> 1574</span>  SAFEARRAYBOUND *psab = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01575"></a><span class="lineno"> 1575</span>  SAFEARRAY *psa = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01576"></a><span class="lineno"> 1576</span>  <span class="keywordtype">long</span> *pub, *pid;</div><div class="line"><a name="l01577"></a><span class="lineno"> 1577</span> </div><div class="line"><a name="l01578"></a><span class="lineno"> 1578</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad5a1e03b0a66824f95f6aaf07b4a4052">Check_Type</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>);</div><div class="line"><a name="l01579"></a><span class="lineno"> 1579</span> </div><div class="line"><a name="l01580"></a><span class="lineno"> 1580</span>  dim = <a class="code" href="../../d2/d99/win32ole_8c.html#a7946b47acb9022d6a5bc20e728ed5013">dimension</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01581"></a><span class="lineno"> 1581</span> </div><div class="line"><a name="l01582"></a><span class="lineno"> 1582</span>  psab = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(SAFEARRAYBOUND, dim);</div><div class="line"><a name="l01583"></a><span class="lineno"> 1583</span>  pub = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">long</span>, dim);</div><div class="line"><a name="l01584"></a><span class="lineno"> 1584</span>  pid = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">long</span>, dim);</div><div class="line"><a name="l01585"></a><span class="lineno"> 1585</span> </div><div class="line"><a name="l01586"></a><span class="lineno"> 1586</span>  <span class="keywordflow">if</span>(!psab || !pub || !pid) {</div><div class="line"><a name="l01587"></a><span class="lineno"> 1587</span>  <span class="keywordflow">if</span>(pub) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pub);</div><div class="line"><a name="l01588"></a><span class="lineno"> 1588</span>  <span class="keywordflow">if</span>(psab) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(psab);</div><div class="line"><a name="l01589"></a><span class="lineno"> 1589</span>  <span class="keywordflow">if</span>(pid) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pid);</div><div class="line"><a name="l01590"></a><span class="lineno"> 1590</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"memory allocation error"</span>);</div><div class="line"><a name="l01591"></a><span class="lineno"> 1591</span>  }</div><div class="line"><a name="l01592"></a><span class="lineno"> 1592</span> </div><div class="line"><a name="l01593"></a><span class="lineno"> 1593</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < dim; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l01594"></a><span class="lineno"> 1594</span>  psab[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>].cElements = <a class="code" href="../../d2/d99/win32ole_8c.html#a632f2bcf05d41fa60f4c4369849ddd1c">ary_len_of_dim</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l01595"></a><span class="lineno"> 1595</span>  psab[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>].lLbound = 0;</div><div class="line"><a name="l01596"></a><span class="lineno"> 1596</span>  pub[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] = psab[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>].cElements - 1;</div><div class="line"><a name="l01597"></a><span class="lineno"> 1597</span>  pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] = 0;</div><div class="line"><a name="l01598"></a><span class="lineno"> 1598</span>  }</div><div class="line"><a name="l01599"></a><span class="lineno"> 1599</span>  <span class="comment">/* Create and fill VARIANT array */</span></div><div class="line"><a name="l01600"></a><span class="lineno"> 1600</span>  <span class="keywordflow">if</span> ((vt & ~VT_BYREF) == VT_ARRAY) {</div><div class="line"><a name="l01601"></a><span class="lineno"> 1601</span>  vt = (vt | VT_VARIANT);</div><div class="line"><a name="l01602"></a><span class="lineno"> 1602</span>  }</div><div class="line"><a name="l01603"></a><span class="lineno"> 1603</span>  psa = SafeArrayCreate((VARTYPE)(vt & VT_TYPEMASK), dim, psab);</div><div class="line"><a name="l01604"></a><span class="lineno"> 1604</span>  <span class="keywordflow">if</span> (psa == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)</div><div class="line"><a name="l01605"></a><span class="lineno"> 1605</span>  hr = E_OUTOFMEMORY;</div><div class="line"><a name="l01606"></a><span class="lineno"> 1606</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l01607"></a><span class="lineno"> 1607</span>  hr = SafeArrayLock(psa);</div><div class="line"><a name="l01608"></a><span class="lineno"> 1608</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l01609"></a><span class="lineno"> 1609</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ac8c00a4cb59ce47acdabd17199dda0fa">ole_set_safe_array</a>(dim-1, psa, pid, pub, <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, dim, (VARTYPE)(vt & VT_TYPEMASK));</div><div class="line"><a name="l01610"></a><span class="lineno"> 1610</span>  hr = SafeArrayUnlock(psa);</div><div class="line"><a name="l01611"></a><span class="lineno"> 1611</span>  }</div><div class="line"><a name="l01612"></a><span class="lineno"> 1612</span> </div><div class="line"><a name="l01613"></a><span class="lineno"> 1613</span>  <span class="keywordflow">if</span>(pub) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pub);</div><div class="line"><a name="l01614"></a><span class="lineno"> 1614</span>  <span class="keywordflow">if</span>(psab) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(psab);</div><div class="line"><a name="l01615"></a><span class="lineno"> 1615</span>  <span class="keywordflow">if</span>(pid) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pid);</div><div class="line"><a name="l01616"></a><span class="lineno"> 1616</span> </div><div class="line"><a name="l01617"></a><span class="lineno"> 1617</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l01618"></a><span class="lineno"> 1618</span>  V_VT(var) = vt;</div><div class="line"><a name="l01619"></a><span class="lineno"> 1619</span>  V_ARRAY(var) = psa;</div><div class="line"><a name="l01620"></a><span class="lineno"> 1620</span>  }</div><div class="line"><a name="l01621"></a><span class="lineno"> 1621</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01622"></a><span class="lineno"> 1622</span>  <span class="keywordflow">if</span> (psa != <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)</div><div class="line"><a name="l01623"></a><span class="lineno"> 1623</span>  SafeArrayDestroy(psa);</div><div class="line"><a name="l01624"></a><span class="lineno"> 1624</span>  }</div><div class="line"><a name="l01625"></a><span class="lineno"> 1625</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l01626"></a><span class="lineno"> 1626</span> }</div><div class="line"><a name="l01627"></a><span class="lineno"> 1627</span> </div><div class="line"><a name="l01628"></a><span class="lineno"> 1628</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01629"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4"> 1629</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *var)</div><div class="line"><a name="l01630"></a><span class="lineno"> 1630</span> {</div><div class="line"><a name="l01631"></a><span class="lineno"> 1631</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l01632"></a><span class="lineno"> 1632</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l01633"></a><span class="lineno"> 1633</span>  <span class="keywordflow">if</span>(<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>)) {</div><div class="line"><a name="l01634"></a><span class="lineno"> 1634</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keyword">struct</span> <a class="code" href="../../d1/d03/structoledata.html">oledata</a>, pole);</div><div class="line"><a name="l01635"></a><span class="lineno"> 1635</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5">OLE_ADDREF</a>(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>);</div><div class="line"><a name="l01636"></a><span class="lineno"> 1636</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_DISPATCH;</div><div class="line"><a name="l01637"></a><span class="lineno"> 1637</span>  V_DISPATCH(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l01638"></a><span class="lineno"> 1638</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l01639"></a><span class="lineno"> 1639</span>  }</div><div class="line"><a name="l01640"></a><span class="lineno"> 1640</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>)) {</div><div class="line"><a name="l01641"></a><span class="lineno"> 1641</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>, pvar);</div><div class="line"><a name="l01642"></a><span class="lineno"> 1642</span>  VariantCopy(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>, &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l01643"></a><span class="lineno"> 1643</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l01644"></a><span class="lineno"> 1644</span>  }</div><div class="line"><a name="l01645"></a><span class="lineno"> 1645</span> </div><div class="line"><a name="l01646"></a><span class="lineno"> 1646</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a66f2d68e8b195fed5d03f60cb42ba31b">rb_cTime</a>)) {</div><div class="line"><a name="l01647"></a><span class="lineno"> 1647</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_DATE;</div><div class="line"><a name="l01648"></a><span class="lineno"> 1648</span>  V_DATE(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../d2/d99/win32ole_8c.html#a6eabe7fdb6877c4fc48f030143375f31">rbtime2vtdate</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01649"></a><span class="lineno"> 1649</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l01650"></a><span class="lineno"> 1650</span>  }</div><div class="line"><a name="l01651"></a><span class="lineno"> 1651</span>  <span class="keywordflow">switch</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) {</div><div class="line"><a name="l01652"></a><span class="lineno"> 1652</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>:</div><div class="line"><a name="l01653"></a><span class="lineno"> 1653</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a17da1c9035e9e51a82318d5bc6511c04">ole_val_ary2variant_ary</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>, VT_VARIANT|VT_ARRAY);</div><div class="line"><a name="l01654"></a><span class="lineno"> 1654</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01655"></a><span class="lineno"> 1655</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a>:</div><div class="line"><a name="l01656"></a><span class="lineno"> 1656</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_BSTR;</div><div class="line"><a name="l01657"></a><span class="lineno"> 1657</span>  V_BSTR(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01658"></a><span class="lineno"> 1658</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01659"></a><span class="lineno"> 1659</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a523855de5546c34061e030f4606db3e9">T_FIXNUM</a>:</div><div class="line"><a name="l01660"></a><span class="lineno"> 1660</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_I4;</div><div class="line"><a name="l01661"></a><span class="lineno"> 1661</span>  V_I4(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01662"></a><span class="lineno"> 1662</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01663"></a><span class="lineno"> 1663</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a41ac74a27dd1eadc2ca86d10590f2163">T_BIGNUM</a>:</div><div class="line"><a name="l01664"></a><span class="lineno"> 1664</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_R8;</div><div class="line"><a name="l01665"></a><span class="lineno"> 1665</span>  V_R8(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01666"></a><span class="lineno"> 1666</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01667"></a><span class="lineno"> 1667</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3d072e0c25cf678e9b8601b957b92eae">T_FLOAT</a>:</div><div class="line"><a name="l01668"></a><span class="lineno"> 1668</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_R8;</div><div class="line"><a name="l01669"></a><span class="lineno"> 1669</span>  V_R8(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a084521c82d2eb576d63d64bfe6b79642">NUM2DBL</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01670"></a><span class="lineno"> 1670</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01671"></a><span class="lineno"> 1671</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7fc7e09f45d0ef129ea29f3a5b0c32b8">T_TRUE</a>:</div><div class="line"><a name="l01672"></a><span class="lineno"> 1672</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_BOOL;</div><div class="line"><a name="l01673"></a><span class="lineno"> 1673</span>  V_BOOL(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VARIANT_TRUE;</div><div class="line"><a name="l01674"></a><span class="lineno"> 1674</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01675"></a><span class="lineno"> 1675</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9ab816c37c9173898ff256b7be9e5ea9">T_FALSE</a>:</div><div class="line"><a name="l01676"></a><span class="lineno"> 1676</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_BOOL;</div><div class="line"><a name="l01677"></a><span class="lineno"> 1677</span>  V_BOOL(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VARIANT_FALSE;</div><div class="line"><a name="l01678"></a><span class="lineno"> 1678</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01679"></a><span class="lineno"> 1679</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3a7d10c48d5dff0a5d4aa94acb74811a">T_NIL</a>:</div><div class="line"><a name="l01680"></a><span class="lineno"> 1680</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a7c2765e64d70089c2227aa6fb7dc1eb0">g_nil_to</a> == VT_ERROR) {</div><div class="line"><a name="l01681"></a><span class="lineno"> 1681</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_ERROR;</div><div class="line"><a name="l01682"></a><span class="lineno"> 1682</span>  V_ERROR(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = DISP_E_PARAMNOTFOUND;</div><div class="line"><a name="l01683"></a><span class="lineno"> 1683</span>  }<span class="keywordflow">else</span> {</div><div class="line"><a name="l01684"></a><span class="lineno"> 1684</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_EMPTY;</div><div class="line"><a name="l01685"></a><span class="lineno"> 1685</span>  }</div><div class="line"><a name="l01686"></a><span class="lineno"> 1686</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01687"></a><span class="lineno"> 1687</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01688"></a><span class="lineno"> 1688</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_DISPATCH;</div><div class="line"><a name="l01689"></a><span class="lineno"> 1689</span>  V_DISPATCH(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../d2/d99/win32ole_8c.html#ad39844f2dafaf44c62d2e05644ebae7f">val2dispatch</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01690"></a><span class="lineno"> 1690</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01691"></a><span class="lineno"> 1691</span>  }</div><div class="line"><a name="l01692"></a><span class="lineno"> 1692</span> }</div><div class="line"><a name="l01693"></a><span class="lineno"> 1693</span> </div><div class="line"><a name="l01694"></a><span class="lineno"> 1694</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01695"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab41ead361600f93bdec89d772172aae6"> 1695</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab41ead361600f93bdec89d772172aae6">ole_val2variant_ex</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>, VARTYPE vt)</div><div class="line"><a name="l01696"></a><span class="lineno"> 1696</span> {</div><div class="line"><a name="l01697"></a><span class="lineno"> 1697</span>  <span class="keywordflow">if</span> (<a class="code" href="../../df/d38/vm__exec_8c.html">val</a> == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l01698"></a><span class="lineno"> 1698</span>  <span class="keywordflow">if</span> (vt == VT_VARIANT) {</div><div class="line"><a name="l01699"></a><span class="lineno"> 1699</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#add1934e43857f1911e6ff0050d8f593e">ole_val2variant2</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>);</div><div class="line"><a name="l01700"></a><span class="lineno"> 1700</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01701"></a><span class="lineno"> 1701</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = (vt & ~VT_BYREF);</div><div class="line"><a name="l01702"></a><span class="lineno"> 1702</span>  <span class="keywordflow">if</span> (V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) == VT_DISPATCH) {</div><div class="line"><a name="l01703"></a><span class="lineno"> 1703</span>  V_DISPATCH(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01704"></a><span class="lineno"> 1704</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) == VT_UNKNOWN) {</div><div class="line"><a name="l01705"></a><span class="lineno"> 1705</span>  V_UNKNOWN(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01706"></a><span class="lineno"> 1706</span>  }</div><div class="line"><a name="l01707"></a><span class="lineno"> 1707</span>  }</div><div class="line"><a name="l01708"></a><span class="lineno"> 1708</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l01709"></a><span class="lineno"> 1709</span>  }</div><div class="line"><a name="l01710"></a><span class="lineno"> 1710</span> <span class="preprocessor">#if (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__)</span></div><div class="line"><a name="l01711"></a><span class="lineno"> 1711</span>  <span class="keywordflow">switch</span>(vt & ~VT_BYREF) {</div><div class="line"><a name="l01712"></a><span class="lineno"> 1712</span>  <span class="keywordflow">case</span> VT_I8:</div><div class="line"><a name="l01713"></a><span class="lineno"> 1713</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_I8;</div><div class="line"><a name="l01714"></a><span class="lineno"> 1714</span>  V_I8(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../d2/d99/win32ole_8c.html#a6e0113d66cb81a8bd0fb0a2766e3ce2f">NUM2I8</a> (<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01715"></a><span class="lineno"> 1715</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01716"></a><span class="lineno"> 1716</span>  <span class="keywordflow">case</span> VT_UI8:</div><div class="line"><a name="l01717"></a><span class="lineno"> 1717</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VT_UI8;</div><div class="line"><a name="l01718"></a><span class="lineno"> 1718</span>  V_UI8(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../d2/d99/win32ole_8c.html#ae1c3462eddb17b0ff24cd63f2a5c0ca6">NUM2UI8</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01719"></a><span class="lineno"> 1719</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01720"></a><span class="lineno"> 1720</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01721"></a><span class="lineno"> 1721</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#add1934e43857f1911e6ff0050d8f593e">ole_val2variant2</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>);</div><div class="line"><a name="l01722"></a><span class="lineno"> 1722</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01723"></a><span class="lineno"> 1723</span>  }</div><div class="line"><a name="l01724"></a><span class="lineno"> 1724</span> <span class="preprocessor">#else </span><span class="comment">/* (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__) */</span><span class="preprocessor"></span></div><div class="line"><a name="l01725"></a><span class="lineno"> 1725</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#add1934e43857f1911e6ff0050d8f593e">ole_val2variant2</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>);</div><div class="line"><a name="l01726"></a><span class="lineno"> 1726</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01727"></a><span class="lineno"> 1727</span> }</div><div class="line"><a name="l01728"></a><span class="lineno"> 1728</span> </div><div class="line"><a name="l01729"></a><span class="lineno"> 1729</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01730"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afc1f3a868b87bab628cd530d46f876d7"> 1730</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#afc1f3a868b87bab628cd530d46f876d7">ole_val2ptr_variant</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)</div><div class="line"><a name="l01731"></a><span class="lineno"> 1731</span> {</div><div class="line"><a name="l01732"></a><span class="lineno"> 1732</span>  <span class="keywordflow">switch</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) {</div><div class="line"><a name="l01733"></a><span class="lineno"> 1733</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a>:</div><div class="line"><a name="l01734"></a><span class="lineno"> 1734</span>  <span class="keywordflow">if</span> (V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) == (VT_BSTR | VT_BYREF)) {</div><div class="line"><a name="l01735"></a><span class="lineno"> 1735</span>  *V_BSTRREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01736"></a><span class="lineno"> 1736</span>  }</div><div class="line"><a name="l01737"></a><span class="lineno"> 1737</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01738"></a><span class="lineno"> 1738</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a523855de5546c34061e030f4606db3e9">T_FIXNUM</a>:</div><div class="line"><a name="l01739"></a><span class="lineno"> 1739</span>  <span class="keywordflow">switch</span>(V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) {</div><div class="line"><a name="l01740"></a><span class="lineno"> 1740</span>  <span class="keywordflow">case</span> (VT_UI1 | VT_BYREF) :</div><div class="line"><a name="l01741"></a><span class="lineno"> 1741</span>  *V_UI1REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4d78945bdd704e09ebaa6a5d4f10c88a">NUM2CHR</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01742"></a><span class="lineno"> 1742</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01743"></a><span class="lineno"> 1743</span>  <span class="keywordflow">case</span> (VT_I2 | VT_BYREF) :</div><div class="line"><a name="l01744"></a><span class="lineno"> 1744</span>  *V_I2REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = (short)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01745"></a><span class="lineno"> 1745</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01746"></a><span class="lineno"> 1746</span>  <span class="keywordflow">case</span> (VT_I4 | VT_BYREF) :</div><div class="line"><a name="l01747"></a><span class="lineno"> 1747</span>  *V_I4REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01748"></a><span class="lineno"> 1748</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01749"></a><span class="lineno"> 1749</span>  <span class="keywordflow">case</span> (VT_R4 | VT_BYREF) :</div><div class="line"><a name="l01750"></a><span class="lineno"> 1750</span>  *V_R4REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = (float)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01751"></a><span class="lineno"> 1751</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01752"></a><span class="lineno"> 1752</span>  <span class="keywordflow">case</span> (VT_R8 | VT_BYREF) :</div><div class="line"><a name="l01753"></a><span class="lineno"> 1753</span>  *V_R8REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01754"></a><span class="lineno"> 1754</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01755"></a><span class="lineno"> 1755</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01756"></a><span class="lineno"> 1756</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01757"></a><span class="lineno"> 1757</span>  }</div><div class="line"><a name="l01758"></a><span class="lineno"> 1758</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01759"></a><span class="lineno"> 1759</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3d072e0c25cf678e9b8601b957b92eae">T_FLOAT</a>:</div><div class="line"><a name="l01760"></a><span class="lineno"> 1760</span>  <span class="keywordflow">switch</span>(V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) {</div><div class="line"><a name="l01761"></a><span class="lineno"> 1761</span>  <span class="keywordflow">case</span> (VT_I2 | VT_BYREF) :</div><div class="line"><a name="l01762"></a><span class="lineno"> 1762</span>  *V_I2REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = (short)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01763"></a><span class="lineno"> 1763</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01764"></a><span class="lineno"> 1764</span>  <span class="keywordflow">case</span> (VT_I4 | VT_BYREF) :</div><div class="line"><a name="l01765"></a><span class="lineno"> 1765</span>  *V_I4REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01766"></a><span class="lineno"> 1766</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01767"></a><span class="lineno"> 1767</span>  <span class="keywordflow">case</span> (VT_R4 | VT_BYREF) :</div><div class="line"><a name="l01768"></a><span class="lineno"> 1768</span>  *V_R4REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = (float)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a084521c82d2eb576d63d64bfe6b79642">NUM2DBL</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01769"></a><span class="lineno"> 1769</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01770"></a><span class="lineno"> 1770</span>  <span class="keywordflow">case</span> (VT_R8 | VT_BYREF) :</div><div class="line"><a name="l01771"></a><span class="lineno"> 1771</span>  *V_R8REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a084521c82d2eb576d63d64bfe6b79642">NUM2DBL</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01772"></a><span class="lineno"> 1772</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01773"></a><span class="lineno"> 1773</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01774"></a><span class="lineno"> 1774</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01775"></a><span class="lineno"> 1775</span>  }</div><div class="line"><a name="l01776"></a><span class="lineno"> 1776</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01777"></a><span class="lineno"> 1777</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a41ac74a27dd1eadc2ca86d10590f2163">T_BIGNUM</a>:</div><div class="line"><a name="l01778"></a><span class="lineno"> 1778</span>  <span class="keywordflow">if</span> (V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) == (VT_R8 | VT_BYREF)) {</div><div class="line"><a name="l01779"></a><span class="lineno"> 1779</span>  *V_R8REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01780"></a><span class="lineno"> 1780</span>  }</div><div class="line"><a name="l01781"></a><span class="lineno"> 1781</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01782"></a><span class="lineno"> 1782</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7fc7e09f45d0ef129ea29f3a5b0c32b8">T_TRUE</a>:</div><div class="line"><a name="l01783"></a><span class="lineno"> 1783</span>  <span class="keywordflow">if</span> (V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) == (VT_BOOL | VT_BYREF)) {</div><div class="line"><a name="l01784"></a><span class="lineno"> 1784</span>  *V_BOOLREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VARIANT_TRUE;</div><div class="line"><a name="l01785"></a><span class="lineno"> 1785</span>  }</div><div class="line"><a name="l01786"></a><span class="lineno"> 1786</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01787"></a><span class="lineno"> 1787</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9ab816c37c9173898ff256b7be9e5ea9">T_FALSE</a>:</div><div class="line"><a name="l01788"></a><span class="lineno"> 1788</span>  <span class="keywordflow">if</span> (V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) == (VT_BOOL | VT_BYREF)) {</div><div class="line"><a name="l01789"></a><span class="lineno"> 1789</span>  *V_BOOLREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = VARIANT_FALSE;</div><div class="line"><a name="l01790"></a><span class="lineno"> 1790</span>  }</div><div class="line"><a name="l01791"></a><span class="lineno"> 1791</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01792"></a><span class="lineno"> 1792</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01793"></a><span class="lineno"> 1793</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01794"></a><span class="lineno"> 1794</span>  }</div><div class="line"><a name="l01795"></a><span class="lineno"> 1795</span> }</div><div class="line"><a name="l01796"></a><span class="lineno"> 1796</span> </div><div class="line"><a name="l01797"></a><span class="lineno"> 1797</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01798"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab70a2b3ac84618de156452bb215ac232"> 1798</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab70a2b3ac84618de156452bb215ac232">ole_set_byref</a>(VARIANT *<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>, VARIANT *<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>, VARTYPE vt)</div><div class="line"><a name="l01799"></a><span class="lineno"> 1799</span> {</div><div class="line"><a name="l01800"></a><span class="lineno"> 1800</span>  V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = vt;</div><div class="line"><a name="l01801"></a><span class="lineno"> 1801</span>  <span class="keywordflow">if</span> (vt == (VT_VARIANT|VT_BYREF)) {</div><div class="line"><a name="l01802"></a><span class="lineno"> 1802</span>  V_VARIANTREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = <a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>;</div><div class="line"><a name="l01803"></a><span class="lineno"> 1803</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01804"></a><span class="lineno"> 1804</span>  <span class="keywordflow">if</span> (V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>) != (vt & ~VT_BYREF)) {</div><div class="line"><a name="l01805"></a><span class="lineno"> 1805</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"variant type mismatch"</span>);</div><div class="line"><a name="l01806"></a><span class="lineno"> 1806</span>  }</div><div class="line"><a name="l01807"></a><span class="lineno"> 1807</span>  <span class="keywordflow">switch</span>(vt & ~VT_BYREF) {</div><div class="line"><a name="l01808"></a><span class="lineno"> 1808</span>  <span class="keywordflow">case</span> VT_I1:</div><div class="line"><a name="l01809"></a><span class="lineno"> 1809</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a36c9f535c0f4434cb2e2fea56e393384">V_I1REF</a>(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_I1(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01810"></a><span class="lineno"> 1810</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01811"></a><span class="lineno"> 1811</span>  <span class="keywordflow">case</span> VT_UI1:</div><div class="line"><a name="l01812"></a><span class="lineno"> 1812</span>  V_UI1REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_UI1(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01813"></a><span class="lineno"> 1813</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01814"></a><span class="lineno"> 1814</span>  <span class="keywordflow">case</span> VT_I2:</div><div class="line"><a name="l01815"></a><span class="lineno"> 1815</span>  V_I2REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_I2(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01816"></a><span class="lineno"> 1816</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01817"></a><span class="lineno"> 1817</span>  <span class="keywordflow">case</span> VT_UI2:</div><div class="line"><a name="l01818"></a><span class="lineno"> 1818</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a9aba4875e432f5a9e6108c4ea95e04fc">V_UI2REF</a>(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_UI2(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01819"></a><span class="lineno"> 1819</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01820"></a><span class="lineno"> 1820</span>  <span class="keywordflow">case</span> VT_I4:</div><div class="line"><a name="l01821"></a><span class="lineno"> 1821</span>  V_I4REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_I4(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01822"></a><span class="lineno"> 1822</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01823"></a><span class="lineno"> 1823</span>  <span class="keywordflow">case</span> VT_UI4:</div><div class="line"><a name="l01824"></a><span class="lineno"> 1824</span>  V_UI4REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_UI4(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01825"></a><span class="lineno"> 1825</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01826"></a><span class="lineno"> 1826</span>  <span class="keywordflow">case</span> VT_R4:</div><div class="line"><a name="l01827"></a><span class="lineno"> 1827</span>  V_R4REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_R4(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01828"></a><span class="lineno"> 1828</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01829"></a><span class="lineno"> 1829</span>  <span class="keywordflow">case</span> VT_R8:</div><div class="line"><a name="l01830"></a><span class="lineno"> 1830</span>  V_R8REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_R8(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01831"></a><span class="lineno"> 1831</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01832"></a><span class="lineno"> 1832</span> </div><div class="line"><a name="l01833"></a><span class="lineno"> 1833</span> <span class="preprocessor">#if (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__)</span></div><div class="line"><a name="l01834"></a><span class="lineno"> 1834</span> <span class="preprocessor">#ifdef V_I8REF</span></div><div class="line"><a name="l01835"></a><span class="lineno"> 1835</span>  <span class="keywordflow">case</span> VT_I8:</div><div class="line"><a name="l01836"></a><span class="lineno"> 1836</span>  V_I8REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_I8(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01837"></a><span class="lineno"> 1837</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01838"></a><span class="lineno"> 1838</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01839"></a><span class="lineno"> 1839</span> <span class="preprocessor">#ifdef V_UI8REF</span></div><div class="line"><a name="l01840"></a><span class="lineno"> 1840</span>  <span class="keywordflow">case</span> VT_UI8:</div><div class="line"><a name="l01841"></a><span class="lineno"> 1841</span>  V_UI8REF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_UI8(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01842"></a><span class="lineno"> 1842</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01843"></a><span class="lineno"> 1843</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01844"></a><span class="lineno"> 1844</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01845"></a><span class="lineno"> 1845</span>  <span class="keywordflow">case</span> VT_INT:</div><div class="line"><a name="l01846"></a><span class="lineno"> 1846</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4c4141e36eb51f6028533a97b8d484">V_INTREF</a>(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &<a class="code" href="../../d2/d99/win32ole_8c.html#ae28d7243617fdad03119e7f82193726d">V_INT</a>(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01847"></a><span class="lineno"> 1847</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01848"></a><span class="lineno"> 1848</span> </div><div class="line"><a name="l01849"></a><span class="lineno"> 1849</span>  <span class="keywordflow">case</span> VT_UINT:</div><div class="line"><a name="l01850"></a><span class="lineno"> 1850</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#afd407d8a5a6f061bb64f6797f4718975">V_UINTREF</a>(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &<a class="code" href="../../d2/d99/win32ole_8c.html#a1da4b972b6e7529b70cadb6077838ad2">V_UINT</a>(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01851"></a><span class="lineno"> 1851</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01852"></a><span class="lineno"> 1852</span> </div><div class="line"><a name="l01853"></a><span class="lineno"> 1853</span>  <span class="keywordflow">case</span> VT_CY:</div><div class="line"><a name="l01854"></a><span class="lineno"> 1854</span>  V_CYREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_CY(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01855"></a><span class="lineno"> 1855</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01856"></a><span class="lineno"> 1856</span>  <span class="keywordflow">case</span> VT_DATE:</div><div class="line"><a name="l01857"></a><span class="lineno"> 1857</span>  V_DATEREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_DATE(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01858"></a><span class="lineno"> 1858</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01859"></a><span class="lineno"> 1859</span>  <span class="keywordflow">case</span> VT_BSTR:</div><div class="line"><a name="l01860"></a><span class="lineno"> 1860</span>  V_BSTRREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_BSTR(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01861"></a><span class="lineno"> 1861</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01862"></a><span class="lineno"> 1862</span>  <span class="keywordflow">case</span> VT_DISPATCH:</div><div class="line"><a name="l01863"></a><span class="lineno"> 1863</span>  V_DISPATCHREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_DISPATCH(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01864"></a><span class="lineno"> 1864</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01865"></a><span class="lineno"> 1865</span>  <span class="keywordflow">case</span> VT_ERROR:</div><div class="line"><a name="l01866"></a><span class="lineno"> 1866</span>  V_ERRORREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_ERROR(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01867"></a><span class="lineno"> 1867</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01868"></a><span class="lineno"> 1868</span>  <span class="keywordflow">case</span> VT_BOOL:</div><div class="line"><a name="l01869"></a><span class="lineno"> 1869</span>  V_BOOLREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_BOOL(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01870"></a><span class="lineno"> 1870</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01871"></a><span class="lineno"> 1871</span>  <span class="keywordflow">case</span> VT_UNKNOWN:</div><div class="line"><a name="l01872"></a><span class="lineno"> 1872</span>  V_UNKNOWNREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_UNKNOWN(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01873"></a><span class="lineno"> 1873</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01874"></a><span class="lineno"> 1874</span>  <span class="keywordflow">case</span> VT_ARRAY:</div><div class="line"><a name="l01875"></a><span class="lineno"> 1875</span>  V_ARRAYREF(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) = &V_ARRAY(<a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>);</div><div class="line"><a name="l01876"></a><span class="lineno"> 1876</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01877"></a><span class="lineno"> 1877</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01878"></a><span class="lineno"> 1878</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"unknown type specified(setting BYREF):%d"</span>, vt);</div><div class="line"><a name="l01879"></a><span class="lineno"> 1879</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01880"></a><span class="lineno"> 1880</span>  }</div><div class="line"><a name="l01881"></a><span class="lineno"> 1881</span>  }</div><div class="line"><a name="l01882"></a><span class="lineno"> 1882</span> }</div><div class="line"><a name="l01883"></a><span class="lineno"> 1883</span> </div><div class="line"><a name="l01884"></a><span class="lineno"> 1884</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01885"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3cd351272efa990ad547562acc560dbb"> 1885</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3cd351272efa990ad547562acc560dbb">ole_val2olevariantdata</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARTYPE vt, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar)</div><div class="line"><a name="l01886"></a><span class="lineno"> 1886</span> {</div><div class="line"><a name="l01887"></a><span class="lineno"> 1887</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l01888"></a><span class="lineno"> 1888</span> </div><div class="line"><a name="l01889"></a><span class="lineno"> 1889</span>  <span class="keywordflow">if</span> (((vt & ~VT_BYREF) == (VT_ARRAY | VT_UI1)) && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a>) {</div><div class="line"><a name="l01890"></a><span class="lineno"> 1890</span>  <span class="keywordtype">long</span> len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l01891"></a><span class="lineno"> 1891</span>  <span class="keywordtype">void</span> *pdest = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01892"></a><span class="lineno"> 1892</span>  SAFEARRAY *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01893"></a><span class="lineno"> 1893</span>  SAFEARRAY *psa = SafeArrayCreateVector(VT_UI1, 0, len);</div><div class="line"><a name="l01894"></a><span class="lineno"> 1894</span>  <span class="keywordflow">if</span> (!psa) {</div><div class="line"><a name="l01895"></a><span class="lineno"> 1895</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"fail to SafeArrayCreateVector"</span>);</div><div class="line"><a name="l01896"></a><span class="lineno"> 1896</span>  }</div><div class="line"><a name="l01897"></a><span class="lineno"> 1897</span>  hr = SafeArrayAccessData(psa, &pdest);</div><div class="line"><a name="l01898"></a><span class="lineno"> 1898</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l01899"></a><span class="lineno"> 1899</span>  memcpy(pdest, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>), len);</div><div class="line"><a name="l01900"></a><span class="lineno"> 1900</span>  SafeArrayUnaccessData(psa);</div><div class="line"><a name="l01901"></a><span class="lineno"> 1901</span>  V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>)) = (vt & ~VT_BYREF);</div><div class="line"><a name="l01902"></a><span class="lineno"> 1902</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = V_ARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>));</div><div class="line"><a name="l01903"></a><span class="lineno"> 1903</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> != <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l01904"></a><span class="lineno"> 1904</span>  SafeArrayDestroy(<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l01905"></a><span class="lineno"> 1905</span>  }</div><div class="line"><a name="l01906"></a><span class="lineno"> 1906</span>  V_ARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>)) = psa;</div><div class="line"><a name="l01907"></a><span class="lineno"> 1907</span>  <span class="keywordflow">if</span> (vt & VT_BYREF) {</div><div class="line"><a name="l01908"></a><span class="lineno"> 1908</span>  V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = vt;</div><div class="line"><a name="l01909"></a><span class="lineno"> 1909</span>  V_ARRAYREF(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = &(V_ARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>)));</div><div class="line"><a name="l01910"></a><span class="lineno"> 1910</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01911"></a><span class="lineno"> 1911</span>  hr = VariantCopy(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>), &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>));</div><div class="line"><a name="l01912"></a><span class="lineno"> 1912</span>  }</div><div class="line"><a name="l01913"></a><span class="lineno"> 1913</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01914"></a><span class="lineno"> 1914</span>  <span class="keywordflow">if</span> (psa)</div><div class="line"><a name="l01915"></a><span class="lineno"> 1915</span>  SafeArrayDestroy(psa);</div><div class="line"><a name="l01916"></a><span class="lineno"> 1916</span>  }</div><div class="line"><a name="l01917"></a><span class="lineno"> 1917</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (vt & VT_ARRAY) {</div><div class="line"><a name="l01918"></a><span class="lineno"> 1918</span>  <span class="keywordflow">if</span> (<a class="code" href="../../df/d38/vm__exec_8c.html">val</a> == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l01919"></a><span class="lineno"> 1919</span>  V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = vt;</div><div class="line"><a name="l01920"></a><span class="lineno"> 1920</span>  <span class="keywordflow">if</span> (vt & VT_BYREF) {</div><div class="line"><a name="l01921"></a><span class="lineno"> 1921</span>  V_ARRAYREF(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = &(V_ARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>)));</div><div class="line"><a name="l01922"></a><span class="lineno"> 1922</span>  }</div><div class="line"><a name="l01923"></a><span class="lineno"> 1923</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01924"></a><span class="lineno"> 1924</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a17da1c9035e9e51a82318d5bc6511c04">ole_val_ary2variant_ary</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>), (VARTYPE)(vt & ~VT_BYREF));</div><div class="line"><a name="l01925"></a><span class="lineno"> 1925</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l01926"></a><span class="lineno"> 1926</span>  <span class="keywordflow">if</span> (vt & VT_BYREF) {</div><div class="line"><a name="l01927"></a><span class="lineno"> 1927</span>  V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = vt;</div><div class="line"><a name="l01928"></a><span class="lineno"> 1928</span>  V_ARRAYREF(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = &(V_ARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>)));</div><div class="line"><a name="l01929"></a><span class="lineno"> 1929</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01930"></a><span class="lineno"> 1930</span>  hr = VariantCopy(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>), &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>));</div><div class="line"><a name="l01931"></a><span class="lineno"> 1931</span>  }</div><div class="line"><a name="l01932"></a><span class="lineno"> 1932</span>  }</div><div class="line"><a name="l01933"></a><span class="lineno"> 1933</span>  }</div><div class="line"><a name="l01934"></a><span class="lineno"> 1934</span> <span class="preprocessor">#if (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__)</span></div><div class="line"><a name="l01935"></a><span class="lineno"> 1935</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span> ( (vt & ~VT_BYREF) == VT_I8 || (vt & ~VT_BYREF) == VT_UI8) {</div><div class="line"><a name="l01936"></a><span class="lineno"> 1936</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab41ead361600f93bdec89d772172aae6">ole_val2variant_ex</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>), (vt & ~VT_BYREF));</div><div class="line"><a name="l01937"></a><span class="lineno"> 1937</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab41ead361600f93bdec89d772172aae6">ole_val2variant_ex</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>), (vt & ~VT_BYREF));</div><div class="line"><a name="l01938"></a><span class="lineno"> 1938</span>  V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = vt;</div><div class="line"><a name="l01939"></a><span class="lineno"> 1939</span>  <span class="keywordflow">if</span> (vt & VT_BYREF) {</div><div class="line"><a name="l01940"></a><span class="lineno"> 1940</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab70a2b3ac84618de156452bb215ac232">ole_set_byref</a>(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>), &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>), vt);</div><div class="line"><a name="l01941"></a><span class="lineno"> 1941</span>  }</div><div class="line"><a name="l01942"></a><span class="lineno"> 1942</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01943"></a><span class="lineno"> 1943</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01944"></a><span class="lineno"> 1944</span>  <span class="keywordflow">if</span> (<a class="code" href="../../df/d38/vm__exec_8c.html">val</a> == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l01945"></a><span class="lineno"> 1945</span>  V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = vt;</div><div class="line"><a name="l01946"></a><span class="lineno"> 1946</span>  <span class="keywordflow">if</span> (vt == (VT_BYREF | VT_VARIANT)) {</div><div class="line"><a name="l01947"></a><span class="lineno"> 1947</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab70a2b3ac84618de156452bb215ac232">ole_set_byref</a>(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>), &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>), vt);</div><div class="line"><a name="l01948"></a><span class="lineno"> 1948</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01949"></a><span class="lineno"> 1949</span>  V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>)) = vt & ~VT_BYREF;</div><div class="line"><a name="l01950"></a><span class="lineno"> 1950</span>  <span class="keywordflow">if</span> (vt & VT_BYREF) {</div><div class="line"><a name="l01951"></a><span class="lineno"> 1951</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab70a2b3ac84618de156452bb215ac232">ole_set_byref</a>(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>), &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>), vt);</div><div class="line"><a name="l01952"></a><span class="lineno"> 1952</span>  }</div><div class="line"><a name="l01953"></a><span class="lineno"> 1953</span>  }</div><div class="line"><a name="l01954"></a><span class="lineno"> 1954</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01955"></a><span class="lineno"> 1955</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab41ead361600f93bdec89d772172aae6">ole_val2variant_ex</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>), (VARTYPE)(vt & ~VT_BYREF));</div><div class="line"><a name="l01956"></a><span class="lineno"> 1956</span>  <span class="keywordflow">if</span> (vt == (VT_BYREF | VT_VARIANT)) {</div><div class="line"><a name="l01957"></a><span class="lineno"> 1957</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab70a2b3ac84618de156452bb215ac232">ole_set_byref</a>(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>), &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>), vt);</div><div class="line"><a name="l01958"></a><span class="lineno"> 1958</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (vt & VT_BYREF) {</div><div class="line"><a name="l01959"></a><span class="lineno"> 1959</span>  <span class="keywordflow">if</span> ( (vt & ~VT_BYREF) != V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>))) {</div><div class="line"><a name="l01960"></a><span class="lineno"> 1960</span>  hr = VariantChangeTypeEx(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>), &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>),</div><div class="line"><a name="l01961"></a><span class="lineno"> 1961</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>, 0, (VARTYPE)(vt & ~VT_BYREF));</div><div class="line"><a name="l01962"></a><span class="lineno"> 1962</span>  }</div><div class="line"><a name="l01963"></a><span class="lineno"> 1963</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l01964"></a><span class="lineno"> 1964</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab70a2b3ac84618de156452bb215ac232">ole_set_byref</a>(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>), &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>), vt);</div><div class="line"><a name="l01965"></a><span class="lineno"> 1965</span>  }</div><div class="line"><a name="l01966"></a><span class="lineno"> 1966</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01967"></a><span class="lineno"> 1967</span>  <span class="keywordflow">if</span> (vt == V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>))) {</div><div class="line"><a name="l01968"></a><span class="lineno"> 1968</span>  hr = VariantCopy(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>), &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>));</div><div class="line"><a name="l01969"></a><span class="lineno"> 1969</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l01970"></a><span class="lineno"> 1970</span>  hr = VariantChangeTypeEx(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>), &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>),</div><div class="line"><a name="l01971"></a><span class="lineno"> 1971</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>, 0, vt);</div><div class="line"><a name="l01972"></a><span class="lineno"> 1972</span>  }</div><div class="line"><a name="l01973"></a><span class="lineno"> 1973</span>  }</div><div class="line"><a name="l01974"></a><span class="lineno"> 1974</span>  }</div><div class="line"><a name="l01975"></a><span class="lineno"> 1975</span>  }</div><div class="line"><a name="l01976"></a><span class="lineno"> 1976</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l01977"></a><span class="lineno"> 1977</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to change type"</span>);</div><div class="line"><a name="l01978"></a><span class="lineno"> 1978</span>  }</div><div class="line"><a name="l01979"></a><span class="lineno"> 1979</span> }</div><div class="line"><a name="l01980"></a><span class="lineno"> 1980</span> </div><div class="line"><a name="l01981"></a><span class="lineno"> 1981</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01982"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#add1934e43857f1911e6ff0050d8f593e"> 1982</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#add1934e43857f1911e6ff0050d8f593e">ole_val2variant2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)</div><div class="line"><a name="l01983"></a><span class="lineno"> 1983</span> {</div><div class="line"><a name="l01984"></a><span class="lineno"> 1984</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a7c2765e64d70089c2227aa6fb7dc1eb0">g_nil_to</a> = VT_EMPTY;</div><div class="line"><a name="l01985"></a><span class="lineno"> 1985</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>);</div><div class="line"><a name="l01986"></a><span class="lineno"> 1986</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a7c2765e64d70089c2227aa6fb7dc1eb0">g_nil_to</a> = VT_ERROR;</div><div class="line"><a name="l01987"></a><span class="lineno"> 1987</span> }</div><div class="line"><a name="l01988"></a><span class="lineno"> 1988</span> </div><div class="line"><a name="l01989"></a><span class="lineno"> 1989</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l01990"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afbdc037edc37f16c9ab3e62d5c25f65f"> 1990</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#afbdc037edc37f16c9ab3e62d5c25f65f">make_inspect</a>(<span class="keyword">const</span> <span class="keywordtype">char</span> *class_name, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> detail)</div><div class="line"><a name="l01991"></a><span class="lineno"> 1991</span> {</div><div class="line"><a name="l01992"></a><span class="lineno"> 1992</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> str;</div><div class="line"><a name="l01993"></a><span class="lineno"> 1993</span>  str = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"#<"</span>);</div><div class="line"><a name="l01994"></a><span class="lineno"> 1994</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(str, class_name);</div><div class="line"><a name="l01995"></a><span class="lineno"> 1995</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(str, <span class="stringliteral">":"</span>);</div><div class="line"><a name="l01996"></a><span class="lineno"> 1996</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2f12f7ad949fa2e6abb64f2311c6e2c5">rb_str_concat</a>(str, detail);</div><div class="line"><a name="l01997"></a><span class="lineno"> 1997</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(str, <span class="stringliteral">">"</span>);</div><div class="line"><a name="l01998"></a><span class="lineno"> 1998</span>  <span class="keywordflow">return</span> str;</div><div class="line"><a name="l01999"></a><span class="lineno"> 1999</span> }</div><div class="line"><a name="l02000"></a><span class="lineno"> 2000</span> </div><div class="line"><a name="l02001"></a><span class="lineno"> 2001</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02002"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1da595a8d1f22377435d6bd4fa5150d1"> 2002</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1da595a8d1f22377435d6bd4fa5150d1">default_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <span class="keyword">const</span> <span class="keywordtype">char</span> *class_name)</div><div class="line"><a name="l02003"></a><span class="lineno"> 2003</span> {</div><div class="line"><a name="l02004"></a><span class="lineno"> 2004</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> detail = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"to_s"</span>), 0);</div><div class="line"><a name="l02005"></a><span class="lineno"> 2005</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#afbdc037edc37f16c9ab3e62d5c25f65f">make_inspect</a>(class_name, detail);</div><div class="line"><a name="l02006"></a><span class="lineno"> 2006</span> }</div><div class="line"><a name="l02007"></a><span class="lineno"> 2007</span> </div><div class="line"><a name="l02008"></a><span class="lineno"> 2008</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02009"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a823003b3f886ae7d06708d5d18c20d0f"> 2009</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a823003b3f886ae7d06708d5d18c20d0f">ole_set_member</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, IDispatch *dispatch)</div><div class="line"><a name="l02010"></a><span class="lineno"> 2010</span> {</div><div class="line"><a name="l02011"></a><span class="lineno"> 2011</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l02012"></a><span class="lineno"> 2012</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d1/d03/structoledata.html">oledata</a>, pole);</div><div class="line"><a name="l02013"></a><span class="lineno"> 2013</span>  <span class="keywordflow">if</span> (pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>) {</div><div class="line"><a name="l02014"></a><span class="lineno"> 2014</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>);</div><div class="line"><a name="l02015"></a><span class="lineno"> 2015</span>  pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l02016"></a><span class="lineno"> 2016</span>  }</div><div class="line"><a name="l02017"></a><span class="lineno"> 2017</span>  pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = dispatch;</div><div class="line"><a name="l02018"></a><span class="lineno"> 2018</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l02019"></a><span class="lineno"> 2019</span> }</div><div class="line"><a name="l02020"></a><span class="lineno"> 2020</span> </div><div class="line"><a name="l02021"></a><span class="lineno"> 2021</span> </div><div class="line"><a name="l02022"></a><span class="lineno"> 2022</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02023"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2d0cf91d19e5f8f14cf8c167f4699275"> 2023</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2d0cf91d19e5f8f14cf8c167f4699275">fole_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass)</div><div class="line"><a name="l02024"></a><span class="lineno"> 2024</span> {</div><div class="line"><a name="l02025"></a><span class="lineno"> 2025</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l02026"></a><span class="lineno"> 2026</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj;</div><div class="line"><a name="l02027"></a><span class="lineno"> 2027</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a>();</div><div class="line"><a name="l02028"></a><span class="lineno"> 2028</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad80ce51081780f829134de0338821b76">Data_Make_Struct</a>(klass,<span class="keyword">struct</span> <a class="code" href="../../d1/d03/structoledata.html">oledata</a>,0,<a class="code" href="../../d2/d99/win32ole_8c.html#a9db8ac32bad3c759b157b41456e1c32a">ole_free</a>,pole);</div><div class="line"><a name="l02029"></a><span class="lineno"> 2029</span>  pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l02030"></a><span class="lineno"> 2030</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l02031"></a><span class="lineno"> 2031</span> }</div><div class="line"><a name="l02032"></a><span class="lineno"> 2032</span> </div><div class="line"><a name="l02033"></a><span class="lineno"> 2033</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02034"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ada66e0a6c7b3c3915de52016aa828026"> 2034</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ada66e0a6c7b3c3915de52016aa828026">create_win32ole_object</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass, IDispatch *<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, <span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>)</div><div class="line"><a name="l02035"></a><span class="lineno"> 2035</span> {</div><div class="line"><a name="l02036"></a><span class="lineno"> 2036</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a2d0cf91d19e5f8f14cf8c167f4699275">fole_s_allocate</a>(klass);</div><div class="line"><a name="l02037"></a><span class="lineno"> 2037</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a823003b3f886ae7d06708d5d18c20d0f">ole_set_member</a>(obj, <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>);</div><div class="line"><a name="l02038"></a><span class="lineno"> 2038</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l02039"></a><span class="lineno"> 2039</span> }</div><div class="line"><a name="l02040"></a><span class="lineno"> 2040</span> </div><div class="line"><a name="l02041"></a><span class="lineno"> 2041</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02042"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a27e8edc4bd92903a3f61d6d6582646f8"> 2042</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a27e8edc4bd92903a3f61d6d6582646f8">ary_new_dim</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> myary, <span class="keywordtype">long</span> *pid, <span class="keywordtype">long</span> *plb, <span class="keywordtype">long</span> dim) {</div><div class="line"><a name="l02043"></a><span class="lineno"> 2043</span>  <span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l02044"></a><span class="lineno"> 2044</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02045"></a><span class="lineno"> 2045</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> pobj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02046"></a><span class="lineno"> 2046</span>  <span class="keywordtype">long</span> *ids = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">long</span>, dim);</div><div class="line"><a name="l02047"></a><span class="lineno"> 2047</span>  <span class="keywordflow">if</span> (!ids) {</div><div class="line"><a name="l02048"></a><span class="lineno"> 2048</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"memory allocation error"</span>);</div><div class="line"><a name="l02049"></a><span class="lineno"> 2049</span>  }</div><div class="line"><a name="l02050"></a><span class="lineno"> 2050</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < dim; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l02051"></a><span class="lineno"> 2051</span>  ids[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] = pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] - plb[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>];</div><div class="line"><a name="l02052"></a><span class="lineno"> 2052</span>  }</div><div class="line"><a name="l02053"></a><span class="lineno"> 2053</span>  obj = myary;</div><div class="line"><a name="l02054"></a><span class="lineno"> 2054</span>  pobj = myary;</div><div class="line"><a name="l02055"></a><span class="lineno"> 2055</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < dim-1; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l02056"></a><span class="lineno"> 2056</span>  obj = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(pobj, ids[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l02057"></a><span class="lineno"> 2057</span>  <span class="keywordflow">if</span> (obj == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l02058"></a><span class="lineno"> 2058</span>  <a class="code" href="../../dc/dcc/array_8c.html#a1d7683de2cd34217808092d90ffd0869">rb_ary_store</a>(pobj, ids[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>], <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>());</div><div class="line"><a name="l02059"></a><span class="lineno"> 2059</span>  }</div><div class="line"><a name="l02060"></a><span class="lineno"> 2060</span>  obj = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(pobj, ids[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l02061"></a><span class="lineno"> 2061</span>  pobj = obj;</div><div class="line"><a name="l02062"></a><span class="lineno"> 2062</span>  }</div><div class="line"><a name="l02063"></a><span class="lineno"> 2063</span>  <span class="keywordflow">if</span> (ids) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(ids);</div><div class="line"><a name="l02064"></a><span class="lineno"> 2064</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l02065"></a><span class="lineno"> 2065</span> }</div><div class="line"><a name="l02066"></a><span class="lineno"> 2066</span> </div><div class="line"><a name="l02067"></a><span class="lineno"> 2067</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02068"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a0e365aecee59aa21b999d051a4c76a2b"> 2068</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a0e365aecee59aa21b999d051a4c76a2b">ary_store_dim</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> myary, <span class="keywordtype">long</span> *pid, <span class="keywordtype">long</span> *plb, <span class="keywordtype">long</span> dim, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>) {</div><div class="line"><a name="l02069"></a><span class="lineno"> 2069</span>  <span class="keywordtype">long</span> <span class="keywordtype">id</span> = pid[dim - 1] - plb[dim - 1];</div><div class="line"><a name="l02070"></a><span class="lineno"> 2070</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a27e8edc4bd92903a3f61d6d6582646f8">ary_new_dim</a>(myary, pid, plb, dim);</div><div class="line"><a name="l02071"></a><span class="lineno"> 2071</span>  <a class="code" href="../../dc/dcc/array_8c.html#a1d7683de2cd34217808092d90ffd0869">rb_ary_store</a>(obj, <span class="keywordtype">id</span>, <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l02072"></a><span class="lineno"> 2072</span> }</div><div class="line"><a name="l02073"></a><span class="lineno"> 2073</span> </div><div class="line"><a name="l02074"></a><span class="lineno"> 2074</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02075"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25"> 2075</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(VARIANT *pvar)</div><div class="line"><a name="l02076"></a><span class="lineno"> 2076</span> {</div><div class="line"><a name="l02077"></a><span class="lineno"> 2077</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02078"></a><span class="lineno"> 2078</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l02079"></a><span class="lineno"> 2079</span>  <span class="keywordflow">while</span> ( V_VT(pvar) == (VT_BYREF | VT_VARIANT) )</div><div class="line"><a name="l02080"></a><span class="lineno"> 2080</span>  pvar = V_VARIANTREF(pvar);</div><div class="line"><a name="l02081"></a><span class="lineno"> 2081</span> </div><div class="line"><a name="l02082"></a><span class="lineno"> 2082</span>  <span class="keywordflow">if</span>(V_ISARRAY(pvar)) {</div><div class="line"><a name="l02083"></a><span class="lineno"> 2083</span>  SAFEARRAY *psa = V_ISBYREF(pvar) ? *V_ARRAYREF(pvar) : V_ARRAY(pvar);</div><div class="line"><a name="l02084"></a><span class="lineno"> 2084</span>  UINT <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0;</div><div class="line"><a name="l02085"></a><span class="lineno"> 2085</span>  <span class="keywordtype">long</span> *pid, *plb, *pub;</div><div class="line"><a name="l02086"></a><span class="lineno"> 2086</span>  VARIANT variant;</div><div class="line"><a name="l02087"></a><span class="lineno"> 2087</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l02088"></a><span class="lineno"> 2088</span>  UINT dim = 0;</div><div class="line"><a name="l02089"></a><span class="lineno"> 2089</span>  <span class="keywordflow">if</span> (!psa) {</div><div class="line"><a name="l02090"></a><span class="lineno"> 2090</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l02091"></a><span class="lineno"> 2091</span>  }</div><div class="line"><a name="l02092"></a><span class="lineno"> 2092</span>  dim = SafeArrayGetDim(psa);</div><div class="line"><a name="l02093"></a><span class="lineno"> 2093</span>  VariantInit(&variant);</div><div class="line"><a name="l02094"></a><span class="lineno"> 2094</span>  V_VT(&variant) = (V_VT(pvar) & ~VT_ARRAY) | VT_BYREF;</div><div class="line"><a name="l02095"></a><span class="lineno"> 2095</span> </div><div class="line"><a name="l02096"></a><span class="lineno"> 2096</span>  pid = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">long</span>, dim);</div><div class="line"><a name="l02097"></a><span class="lineno"> 2097</span>  plb = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">long</span>, dim);</div><div class="line"><a name="l02098"></a><span class="lineno"> 2098</span>  pub = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">long</span>, dim);</div><div class="line"><a name="l02099"></a><span class="lineno"> 2099</span> </div><div class="line"><a name="l02100"></a><span class="lineno"> 2100</span>  <span class="keywordflow">if</span>(!pid || !plb || !pub) {</div><div class="line"><a name="l02101"></a><span class="lineno"> 2101</span>  <span class="keywordflow">if</span>(pid) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pid);</div><div class="line"><a name="l02102"></a><span class="lineno"> 2102</span>  <span class="keywordflow">if</span>(plb) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(plb);</div><div class="line"><a name="l02103"></a><span class="lineno"> 2103</span>  <span class="keywordflow">if</span>(pub) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pub);</div><div class="line"><a name="l02104"></a><span class="lineno"> 2104</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"memory allocation error"</span>);</div><div class="line"><a name="l02105"></a><span class="lineno"> 2105</span>  }</div><div class="line"><a name="l02106"></a><span class="lineno"> 2106</span> </div><div class="line"><a name="l02107"></a><span class="lineno"> 2107</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < dim; ++<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>) {</div><div class="line"><a name="l02108"></a><span class="lineno"> 2108</span>  SafeArrayGetLBound(psa, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>+1, &plb[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l02109"></a><span class="lineno"> 2109</span>  SafeArrayGetLBound(psa, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>+1, &pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l02110"></a><span class="lineno"> 2110</span>  SafeArrayGetUBound(psa, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>+1, &pub[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l02111"></a><span class="lineno"> 2111</span>  }</div><div class="line"><a name="l02112"></a><span class="lineno"> 2112</span>  hr = SafeArrayLock(psa);</div><div class="line"><a name="l02113"></a><span class="lineno"> 2113</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l02114"></a><span class="lineno"> 2114</span>  obj = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l02115"></a><span class="lineno"> 2115</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0;</div><div class="line"><a name="l02116"></a><span class="lineno"> 2116</span>  <span class="keywordflow">while</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < dim) {</div><div class="line"><a name="l02117"></a><span class="lineno"> 2117</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a27e8edc4bd92903a3f61d6d6582646f8">ary_new_dim</a>(obj, pid, plb, dim);</div><div class="line"><a name="l02118"></a><span class="lineno"> 2118</span>  hr = SafeArrayPtrOfIndex(psa, pid, &V_BYREF(&variant));</div><div class="line"><a name="l02119"></a><span class="lineno"> 2119</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l02120"></a><span class="lineno"> 2120</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(&variant);</div><div class="line"><a name="l02121"></a><span class="lineno"> 2121</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a0e365aecee59aa21b999d051a4c76a2b">ary_store_dim</a>(obj, pid, plb, dim, <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l02122"></a><span class="lineno"> 2122</span>  }</div><div class="line"><a name="l02123"></a><span class="lineno"> 2123</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < dim; ++<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>) {</div><div class="line"><a name="l02124"></a><span class="lineno"> 2124</span>  <span class="keywordflow">if</span> (++pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] <= pub[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>])</div><div class="line"><a name="l02125"></a><span class="lineno"> 2125</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02126"></a><span class="lineno"> 2126</span>  pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] = plb[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>];</div><div class="line"><a name="l02127"></a><span class="lineno"> 2127</span>  }</div><div class="line"><a name="l02128"></a><span class="lineno"> 2128</span>  }</div><div class="line"><a name="l02129"></a><span class="lineno"> 2129</span>  SafeArrayUnlock(psa);</div><div class="line"><a name="l02130"></a><span class="lineno"> 2130</span>  }</div><div class="line"><a name="l02131"></a><span class="lineno"> 2131</span>  <span class="keywordflow">if</span>(pid) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pid);</div><div class="line"><a name="l02132"></a><span class="lineno"> 2132</span>  <span class="keywordflow">if</span>(plb) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(plb);</div><div class="line"><a name="l02133"></a><span class="lineno"> 2133</span>  <span class="keywordflow">if</span>(pub) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pub);</div><div class="line"><a name="l02134"></a><span class="lineno"> 2134</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l02135"></a><span class="lineno"> 2135</span>  }</div><div class="line"><a name="l02136"></a><span class="lineno"> 2136</span>  <span class="keywordflow">switch</span>(V_VT(pvar) & ~VT_BYREF){</div><div class="line"><a name="l02137"></a><span class="lineno"> 2137</span>  <span class="keywordflow">case</span> VT_EMPTY:</div><div class="line"><a name="l02138"></a><span class="lineno"> 2138</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02139"></a><span class="lineno"> 2139</span>  <span class="keywordflow">case</span> VT_NULL:</div><div class="line"><a name="l02140"></a><span class="lineno"> 2140</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02141"></a><span class="lineno"> 2141</span>  <span class="keywordflow">case</span> VT_I1:</div><div class="line"><a name="l02142"></a><span class="lineno"> 2142</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02143"></a><span class="lineno"> 2143</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)*<a class="code" href="../../d2/d99/win32ole_8c.html#a36c9f535c0f4434cb2e2fea56e393384">V_I1REF</a>(pvar));</div><div class="line"><a name="l02144"></a><span class="lineno"> 2144</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02145"></a><span class="lineno"> 2145</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)V_I1(pvar));</div><div class="line"><a name="l02146"></a><span class="lineno"> 2146</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02147"></a><span class="lineno"> 2147</span> </div><div class="line"><a name="l02148"></a><span class="lineno"> 2148</span>  <span class="keywordflow">case</span> VT_UI1:</div><div class="line"><a name="l02149"></a><span class="lineno"> 2149</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02150"></a><span class="lineno"> 2150</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)*V_UI1REF(pvar));</div><div class="line"><a name="l02151"></a><span class="lineno"> 2151</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02152"></a><span class="lineno"> 2152</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)V_UI1(pvar));</div><div class="line"><a name="l02153"></a><span class="lineno"> 2153</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02154"></a><span class="lineno"> 2154</span> </div><div class="line"><a name="l02155"></a><span class="lineno"> 2155</span>  <span class="keywordflow">case</span> VT_I2:</div><div class="line"><a name="l02156"></a><span class="lineno"> 2156</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02157"></a><span class="lineno"> 2157</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)*V_I2REF(pvar));</div><div class="line"><a name="l02158"></a><span class="lineno"> 2158</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02159"></a><span class="lineno"> 2159</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)V_I2(pvar));</div><div class="line"><a name="l02160"></a><span class="lineno"> 2160</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02161"></a><span class="lineno"> 2161</span> </div><div class="line"><a name="l02162"></a><span class="lineno"> 2162</span>  <span class="keywordflow">case</span> VT_UI2:</div><div class="line"><a name="l02163"></a><span class="lineno"> 2163</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02164"></a><span class="lineno"> 2164</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)*<a class="code" href="../../d2/d99/win32ole_8c.html#a9aba4875e432f5a9e6108c4ea95e04fc">V_UI2REF</a>(pvar));</div><div class="line"><a name="l02165"></a><span class="lineno"> 2165</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02166"></a><span class="lineno"> 2166</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)V_UI2(pvar));</div><div class="line"><a name="l02167"></a><span class="lineno"> 2167</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02168"></a><span class="lineno"> 2168</span> </div><div class="line"><a name="l02169"></a><span class="lineno"> 2169</span>  <span class="keywordflow">case</span> VT_I4:</div><div class="line"><a name="l02170"></a><span class="lineno"> 2170</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02171"></a><span class="lineno"> 2171</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)*V_I4REF(pvar));</div><div class="line"><a name="l02172"></a><span class="lineno"> 2172</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02173"></a><span class="lineno"> 2173</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)V_I4(pvar));</div><div class="line"><a name="l02174"></a><span class="lineno"> 2174</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02175"></a><span class="lineno"> 2175</span> </div><div class="line"><a name="l02176"></a><span class="lineno"> 2176</span>  <span class="keywordflow">case</span> VT_UI4:</div><div class="line"><a name="l02177"></a><span class="lineno"> 2177</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02178"></a><span class="lineno"> 2178</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)*V_UI4REF(pvar));</div><div class="line"><a name="l02179"></a><span class="lineno"> 2179</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02180"></a><span class="lineno"> 2180</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)V_UI4(pvar));</div><div class="line"><a name="l02181"></a><span class="lineno"> 2181</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02182"></a><span class="lineno"> 2182</span> </div><div class="line"><a name="l02183"></a><span class="lineno"> 2183</span>  <span class="keywordflow">case</span> VT_INT:</div><div class="line"><a name="l02184"></a><span class="lineno"> 2184</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02185"></a><span class="lineno"> 2185</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)*<a class="code" href="../../d2/d99/win32ole_8c.html#a3d4c4141e36eb51f6028533a97b8d484">V_INTREF</a>(pvar));</div><div class="line"><a name="l02186"></a><span class="lineno"> 2186</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02187"></a><span class="lineno"> 2187</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)<a class="code" href="../../d2/d99/win32ole_8c.html#ae28d7243617fdad03119e7f82193726d">V_INT</a>(pvar));</div><div class="line"><a name="l02188"></a><span class="lineno"> 2188</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02189"></a><span class="lineno"> 2189</span> </div><div class="line"><a name="l02190"></a><span class="lineno"> 2190</span>  <span class="keywordflow">case</span> VT_UINT:</div><div class="line"><a name="l02191"></a><span class="lineno"> 2191</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02192"></a><span class="lineno"> 2192</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)*<a class="code" href="../../d2/d99/win32ole_8c.html#afd407d8a5a6f061bb64f6797f4718975">V_UINTREF</a>(pvar));</div><div class="line"><a name="l02193"></a><span class="lineno"> 2193</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02194"></a><span class="lineno"> 2194</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>((<span class="keywordtype">long</span>)<a class="code" href="../../d2/d99/win32ole_8c.html#a1da4b972b6e7529b70cadb6077838ad2">V_UINT</a>(pvar));</div><div class="line"><a name="l02195"></a><span class="lineno"> 2195</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02196"></a><span class="lineno"> 2196</span> </div><div class="line"><a name="l02197"></a><span class="lineno"> 2197</span> <span class="preprocessor">#if (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__)</span></div><div class="line"><a name="l02198"></a><span class="lineno"> 2198</span>  <span class="keywordflow">case</span> VT_I8:</div><div class="line"><a name="l02199"></a><span class="lineno"> 2199</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02200"></a><span class="lineno"> 2200</span> <span class="preprocessor">#if (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__)</span></div><div class="line"><a name="l02201"></a><span class="lineno"> 2201</span> <span class="preprocessor">#ifdef V_I8REF</span></div><div class="line"><a name="l02202"></a><span class="lineno"> 2202</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a633ecb2e5bb97e8d4de926ea39ce7765">I8_2_NUM</a>(*V_I8REF(pvar));</div><div class="line"><a name="l02203"></a><span class="lineno"> 2203</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l02204"></a><span class="lineno"> 2204</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l02205"></a><span class="lineno"> 2205</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02206"></a><span class="lineno"> 2206</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l02207"></a><span class="lineno"> 2207</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02208"></a><span class="lineno"> 2208</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a633ecb2e5bb97e8d4de926ea39ce7765">I8_2_NUM</a>(V_I8(pvar));</div><div class="line"><a name="l02209"></a><span class="lineno"> 2209</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02210"></a><span class="lineno"> 2210</span>  <span class="keywordflow">case</span> VT_UI8:</div><div class="line"><a name="l02211"></a><span class="lineno"> 2211</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02212"></a><span class="lineno"> 2212</span> <span class="preprocessor">#if (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__)</span></div><div class="line"><a name="l02213"></a><span class="lineno"> 2213</span> <span class="preprocessor">#ifdef V_UI8REF</span></div><div class="line"><a name="l02214"></a><span class="lineno"> 2214</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#ac8532c3a9901cdf3f13325021a01fd0f">UI8_2_NUM</a>(*V_UI8REF(pvar));</div><div class="line"><a name="l02215"></a><span class="lineno"> 2215</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l02216"></a><span class="lineno"> 2216</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l02217"></a><span class="lineno"> 2217</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02218"></a><span class="lineno"> 2218</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l02219"></a><span class="lineno"> 2219</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02220"></a><span class="lineno"> 2220</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#ac8532c3a9901cdf3f13325021a01fd0f">UI8_2_NUM</a>(V_UI8(pvar));</div><div class="line"><a name="l02221"></a><span class="lineno"> 2221</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02222"></a><span class="lineno"> 2222</span> <span class="preprocessor">#endif </span><span class="comment">/* (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__) */</span><span class="preprocessor"></span></div><div class="line"><a name="l02223"></a><span class="lineno"> 2223</span> </div><div class="line"><a name="l02224"></a><span class="lineno"> 2224</span>  <span class="keywordflow">case</span> VT_R4:</div><div class="line"><a name="l02225"></a><span class="lineno"> 2225</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02226"></a><span class="lineno"> 2226</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a5cc507d59bd5812216cff9aa85238e5a">rb_float_new</a>(*V_R4REF(pvar));</div><div class="line"><a name="l02227"></a><span class="lineno"> 2227</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02228"></a><span class="lineno"> 2228</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a5cc507d59bd5812216cff9aa85238e5a">rb_float_new</a>(V_R4(pvar));</div><div class="line"><a name="l02229"></a><span class="lineno"> 2229</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02230"></a><span class="lineno"> 2230</span> </div><div class="line"><a name="l02231"></a><span class="lineno"> 2231</span>  <span class="keywordflow">case</span> VT_R8:</div><div class="line"><a name="l02232"></a><span class="lineno"> 2232</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02233"></a><span class="lineno"> 2233</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a5cc507d59bd5812216cff9aa85238e5a">rb_float_new</a>(*V_R8REF(pvar));</div><div class="line"><a name="l02234"></a><span class="lineno"> 2234</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02235"></a><span class="lineno"> 2235</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a5cc507d59bd5812216cff9aa85238e5a">rb_float_new</a>(V_R8(pvar));</div><div class="line"><a name="l02236"></a><span class="lineno"> 2236</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02237"></a><span class="lineno"> 2237</span> </div><div class="line"><a name="l02238"></a><span class="lineno"> 2238</span>  <span class="keywordflow">case</span> VT_BSTR:</div><div class="line"><a name="l02239"></a><span class="lineno"> 2239</span>  {</div><div class="line"><a name="l02240"></a><span class="lineno"> 2240</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02241"></a><span class="lineno"> 2241</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6">ole_wc2vstr</a>(*V_BSTRREF(pvar), <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l02242"></a><span class="lineno"> 2242</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02243"></a><span class="lineno"> 2243</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6">ole_wc2vstr</a>(V_BSTR(pvar), <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l02244"></a><span class="lineno"> 2244</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02245"></a><span class="lineno"> 2245</span>  }</div><div class="line"><a name="l02246"></a><span class="lineno"> 2246</span> </div><div class="line"><a name="l02247"></a><span class="lineno"> 2247</span>  <span class="keywordflow">case</span> VT_ERROR:</div><div class="line"><a name="l02248"></a><span class="lineno"> 2248</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02249"></a><span class="lineno"> 2249</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>(*V_ERRORREF(pvar));</div><div class="line"><a name="l02250"></a><span class="lineno"> 2250</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02251"></a><span class="lineno"> 2251</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>(V_ERROR(pvar));</div><div class="line"><a name="l02252"></a><span class="lineno"> 2252</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02253"></a><span class="lineno"> 2253</span> </div><div class="line"><a name="l02254"></a><span class="lineno"> 2254</span>  <span class="keywordflow">case</span> VT_BOOL:</div><div class="line"><a name="l02255"></a><span class="lineno"> 2255</span>  <span class="keywordflow">if</span> (V_ISBYREF(pvar))</div><div class="line"><a name="l02256"></a><span class="lineno"> 2256</span>  obj = (*V_BOOLREF(pvar) ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a> : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>);</div><div class="line"><a name="l02257"></a><span class="lineno"> 2257</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02258"></a><span class="lineno"> 2258</span>  obj = (V_BOOL(pvar) ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a> : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>);</div><div class="line"><a name="l02259"></a><span class="lineno"> 2259</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02260"></a><span class="lineno"> 2260</span> </div><div class="line"><a name="l02261"></a><span class="lineno"> 2261</span>  <span class="keywordflow">case</span> VT_DISPATCH:</div><div class="line"><a name="l02262"></a><span class="lineno"> 2262</span>  {</div><div class="line"><a name="l02263"></a><span class="lineno"> 2263</span>  IDispatch *<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l02264"></a><span class="lineno"> 2264</span> </div><div class="line"><a name="l02265"></a><span class="lineno"> 2265</span>  <span class="keywordflow">if</span> (V_ISBYREF(pvar))</div><div class="line"><a name="l02266"></a><span class="lineno"> 2266</span>  <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = *V_DISPATCHREF(pvar);</div><div class="line"><a name="l02267"></a><span class="lineno"> 2267</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02268"></a><span class="lineno"> 2268</span>  <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = V_DISPATCH(pvar);</div><div class="line"><a name="l02269"></a><span class="lineno"> 2269</span> </div><div class="line"><a name="l02270"></a><span class="lineno"> 2270</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> != <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a> ) {</div><div class="line"><a name="l02271"></a><span class="lineno"> 2271</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5">OLE_ADDREF</a>(<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>);</div><div class="line"><a name="l02272"></a><span class="lineno"> 2272</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#ada66e0a6c7b3c3915de52016aa828026">create_win32ole_object</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, 0, 0);</div><div class="line"><a name="l02273"></a><span class="lineno"> 2273</span>  }</div><div class="line"><a name="l02274"></a><span class="lineno"> 2274</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02275"></a><span class="lineno"> 2275</span>  }</div><div class="line"><a name="l02276"></a><span class="lineno"> 2276</span> </div><div class="line"><a name="l02277"></a><span class="lineno"> 2277</span>  <span class="keywordflow">case</span> VT_UNKNOWN:</div><div class="line"><a name="l02278"></a><span class="lineno"> 2278</span>  {</div><div class="line"><a name="l02279"></a><span class="lineno"> 2279</span>  <span class="comment">/* get IDispatch interface from IUnknown interface */</span></div><div class="line"><a name="l02280"></a><span class="lineno"> 2280</span>  IUnknown *punk;</div><div class="line"><a name="l02281"></a><span class="lineno"> 2281</span>  IDispatch *<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l02282"></a><span class="lineno"> 2282</span>  <span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l02283"></a><span class="lineno"> 2283</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l02284"></a><span class="lineno"> 2284</span> </div><div class="line"><a name="l02285"></a><span class="lineno"> 2285</span>  <span class="keywordflow">if</span> (V_ISBYREF(pvar))</div><div class="line"><a name="l02286"></a><span class="lineno"> 2286</span>  punk = *V_UNKNOWNREF(pvar);</div><div class="line"><a name="l02287"></a><span class="lineno"> 2287</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02288"></a><span class="lineno"> 2288</span>  punk = V_UNKNOWN(pvar);</div><div class="line"><a name="l02289"></a><span class="lineno"> 2289</span> </div><div class="line"><a name="l02290"></a><span class="lineno"> 2290</span>  <span class="keywordflow">if</span>(punk != <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l02291"></a><span class="lineno"> 2291</span>  hr = punk->lpVtbl->QueryInterface(punk, &IID_IDispatch, &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l02292"></a><span class="lineno"> 2292</span>  <span class="keywordflow">if</span>(SUCCEEDED(hr)) {</div><div class="line"><a name="l02293"></a><span class="lineno"> 2293</span>  <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l02294"></a><span class="lineno"> 2294</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#ada66e0a6c7b3c3915de52016aa828026">create_win32ole_object</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, 0, 0);</div><div class="line"><a name="l02295"></a><span class="lineno"> 2295</span>  }</div><div class="line"><a name="l02296"></a><span class="lineno"> 2296</span>  }</div><div class="line"><a name="l02297"></a><span class="lineno"> 2297</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02298"></a><span class="lineno"> 2298</span>  }</div><div class="line"><a name="l02299"></a><span class="lineno"> 2299</span> </div><div class="line"><a name="l02300"></a><span class="lineno"> 2300</span>  <span class="keywordflow">case</span> VT_DATE:</div><div class="line"><a name="l02301"></a><span class="lineno"> 2301</span>  {</div><div class="line"><a name="l02302"></a><span class="lineno"> 2302</span>  DATE date;</div><div class="line"><a name="l02303"></a><span class="lineno"> 2303</span>  <span class="keywordflow">if</span>(V_ISBYREF(pvar))</div><div class="line"><a name="l02304"></a><span class="lineno"> 2304</span>  date = *V_DATEREF(pvar);</div><div class="line"><a name="l02305"></a><span class="lineno"> 2305</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l02306"></a><span class="lineno"> 2306</span>  date = V_DATE(pvar);</div><div class="line"><a name="l02307"></a><span class="lineno"> 2307</span> </div><div class="line"><a name="l02308"></a><span class="lineno"> 2308</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#ac443cf13c84997231c8cf7e81e682015">vtdate2rbtime</a>(date);</div><div class="line"><a name="l02309"></a><span class="lineno"> 2309</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02310"></a><span class="lineno"> 2310</span>  }</div><div class="line"><a name="l02311"></a><span class="lineno"> 2311</span>  <span class="keywordflow">case</span> VT_CY:</div><div class="line"><a name="l02312"></a><span class="lineno"> 2312</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l02313"></a><span class="lineno"> 2313</span>  {</div><div class="line"><a name="l02314"></a><span class="lineno"> 2314</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l02315"></a><span class="lineno"> 2315</span>  VARIANT variant;</div><div class="line"><a name="l02316"></a><span class="lineno"> 2316</span>  VariantInit(&variant);</div><div class="line"><a name="l02317"></a><span class="lineno"> 2317</span>  hr = VariantChangeTypeEx(&variant, pvar,</div><div class="line"><a name="l02318"></a><span class="lineno"> 2318</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>, 0, VT_BSTR);</div><div class="line"><a name="l02319"></a><span class="lineno"> 2319</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr) && V_VT(&variant) == VT_BSTR) {</div><div class="line"><a name="l02320"></a><span class="lineno"> 2320</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6">ole_wc2vstr</a>(V_BSTR(&variant), <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l02321"></a><span class="lineno"> 2321</span>  }</div><div class="line"><a name="l02322"></a><span class="lineno"> 2322</span>  VariantClear(&variant);</div><div class="line"><a name="l02323"></a><span class="lineno"> 2323</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02324"></a><span class="lineno"> 2324</span>  }</div><div class="line"><a name="l02325"></a><span class="lineno"> 2325</span>  }</div><div class="line"><a name="l02326"></a><span class="lineno"> 2326</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l02327"></a><span class="lineno"> 2327</span> }</div><div class="line"><a name="l02328"></a><span class="lineno"> 2328</span> </div><div class="line"><a name="l02329"></a><span class="lineno"> 2329</span> <span class="keyword">static</span> LONG</div><div class="line"><a name="l02330"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53"> 2330</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a>(HKEY hkey, <span class="keyword">const</span> <span class="keywordtype">char</span> *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>, HKEY *phkey)</div><div class="line"><a name="l02331"></a><span class="lineno"> 2331</span> {</div><div class="line"><a name="l02332"></a><span class="lineno"> 2332</span>  <span class="keywordflow">return</span> RegOpenKeyEx(hkey, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>, 0, KEY_READ, phkey);</div><div class="line"><a name="l02333"></a><span class="lineno"> 2333</span> }</div><div class="line"><a name="l02334"></a><span class="lineno"> 2334</span> </div><div class="line"><a name="l02335"></a><span class="lineno"> 2335</span> <span class="keyword">static</span> LONG</div><div class="line"><a name="l02336"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734"> 2336</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(HKEY hkey, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>, HKEY *phkey)</div><div class="line"><a name="l02337"></a><span class="lineno"> 2337</span> {</div><div class="line"><a name="l02338"></a><span class="lineno"> 2338</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a>(hkey, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>), phkey);</div><div class="line"><a name="l02339"></a><span class="lineno"> 2339</span> }</div><div class="line"><a name="l02340"></a><span class="lineno"> 2340</span> </div><div class="line"><a name="l02341"></a><span class="lineno"> 2341</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02342"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0"> 2342</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(HKEY hkey, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>)</div><div class="line"><a name="l02343"></a><span class="lineno"> 2343</span> {</div><div class="line"><a name="l02344"></a><span class="lineno"> 2344</span>  <span class="keywordtype">char</span> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>[BUFSIZ + 1];</div><div class="line"><a name="l02345"></a><span class="lineno"> 2345</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> size_buf = <span class="keyword">sizeof</span>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>);</div><div class="line"><a name="l02346"></a><span class="lineno"> 2346</span>  FILETIME ft;</div><div class="line"><a name="l02347"></a><span class="lineno"> 2347</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = RegEnumKeyEx(hkey, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>, &size_buf,</div><div class="line"><a name="l02348"></a><span class="lineno"> 2348</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &ft);</div><div class="line"><a name="l02349"></a><span class="lineno"> 2349</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> == ERROR_SUCCESS) {</div><div class="line"><a name="l02350"></a><span class="lineno"> 2350</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>[BUFSIZ] = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l02351"></a><span class="lineno"> 2351</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a>);</div><div class="line"><a name="l02352"></a><span class="lineno"> 2352</span>  }</div><div class="line"><a name="l02353"></a><span class="lineno"> 2353</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02354"></a><span class="lineno"> 2354</span> }</div><div class="line"><a name="l02355"></a><span class="lineno"> 2355</span> </div><div class="line"><a name="l02356"></a><span class="lineno"> 2356</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02357"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad1d7db020ebeab12bc94c56f82f43076"> 2357</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad1d7db020ebeab12bc94c56f82f43076">reg_get_val</a>(HKEY hkey, <span class="keyword">const</span> <span class="keywordtype">char</span> *subkey)</div><div class="line"><a name="l02358"></a><span class="lineno"> 2358</span> {</div><div class="line"><a name="l02359"></a><span class="lineno"> 2359</span>  <span class="keywordtype">char</span> *pbuf;</div><div class="line"><a name="l02360"></a><span class="lineno"> 2360</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> dwtype = 0;</div><div class="line"><a name="l02361"></a><span class="lineno"> 2361</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = 0;</div><div class="line"><a name="l02362"></a><span class="lineno"> 2362</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02363"></a><span class="lineno"> 2363</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = RegQueryValueEx(hkey, subkey, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &dwtype, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l02364"></a><span class="lineno"> 2364</span> </div><div class="line"><a name="l02365"></a><span class="lineno"> 2365</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> == ERROR_SUCCESS) {</div><div class="line"><a name="l02366"></a><span class="lineno"> 2366</span>  pbuf = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">char</span>, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> + 1);</div><div class="line"><a name="l02367"></a><span class="lineno"> 2367</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = RegQueryValueEx(hkey, subkey, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &dwtype, (BYTE *)pbuf, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l02368"></a><span class="lineno"> 2368</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> == ERROR_SUCCESS) {</div><div class="line"><a name="l02369"></a><span class="lineno"> 2369</span>  pbuf[<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>] = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l02370"></a><span class="lineno"> 2370</span>  <span class="keywordflow">if</span> (dwtype == REG_EXPAND_SZ) {</div><div class="line"><a name="l02371"></a><span class="lineno"> 2371</span>  <span class="keywordtype">char</span>* pbuf2 = (<span class="keywordtype">char</span> *)pbuf;</div><div class="line"><a name="l02372"></a><span class="lineno"> 2372</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> len = ExpandEnvironmentStrings(pbuf2, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, 0);</div><div class="line"><a name="l02373"></a><span class="lineno"> 2373</span>  pbuf = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">char</span>, len + 1);</div><div class="line"><a name="l02374"></a><span class="lineno"> 2374</span>  ExpandEnvironmentStrings(pbuf2, pbuf, len + 1);</div><div class="line"><a name="l02375"></a><span class="lineno"> 2375</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pbuf2);</div><div class="line"><a name="l02376"></a><span class="lineno"> 2376</span>  }</div><div class="line"><a name="l02377"></a><span class="lineno"> 2377</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>((<span class="keywordtype">char</span> *)pbuf);</div><div class="line"><a name="l02378"></a><span class="lineno"> 2378</span>  }</div><div class="line"><a name="l02379"></a><span class="lineno"> 2379</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pbuf);</div><div class="line"><a name="l02380"></a><span class="lineno"> 2380</span>  }</div><div class="line"><a name="l02381"></a><span class="lineno"> 2381</span>  <span class="keywordflow">return</span> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l02382"></a><span class="lineno"> 2382</span> }</div><div class="line"><a name="l02383"></a><span class="lineno"> 2383</span> </div><div class="line"><a name="l02384"></a><span class="lineno"> 2384</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02385"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9eb9e2c430bab21f13d1a2ff462142be"> 2385</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a9eb9e2c430bab21f13d1a2ff462142be">reg_get_val2</a>(HKEY hkey, <span class="keyword">const</span> <span class="keywordtype">char</span> *subkey)</div><div class="line"><a name="l02386"></a><span class="lineno"> 2386</span> {</div><div class="line"><a name="l02387"></a><span class="lineno"> 2387</span>  HKEY hsubkey;</div><div class="line"><a name="l02388"></a><span class="lineno"> 2388</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l02389"></a><span class="lineno"> 2389</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02390"></a><span class="lineno"> 2390</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = RegOpenKeyEx(hkey, subkey, 0, KEY_READ, &hsubkey);</div><div class="line"><a name="l02391"></a><span class="lineno"> 2391</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> == ERROR_SUCCESS) {</div><div class="line"><a name="l02392"></a><span class="lineno"> 2392</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad1d7db020ebeab12bc94c56f82f43076">reg_get_val</a>(hsubkey, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l02393"></a><span class="lineno"> 2393</span>  RegCloseKey(hsubkey);</div><div class="line"><a name="l02394"></a><span class="lineno"> 2394</span>  }</div><div class="line"><a name="l02395"></a><span class="lineno"> 2395</span>  <span class="keywordflow">if</span> (<a class="code" href="../../df/d38/vm__exec_8c.html">val</a> == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l02396"></a><span class="lineno"> 2396</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad1d7db020ebeab12bc94c56f82f43076">reg_get_val</a>(hkey, subkey);</div><div class="line"><a name="l02397"></a><span class="lineno"> 2397</span>  }</div><div class="line"><a name="l02398"></a><span class="lineno"> 2398</span>  <span class="keywordflow">return</span> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l02399"></a><span class="lineno"> 2399</span> }</div><div class="line"><a name="l02400"></a><span class="lineno"> 2400</span> </div><div class="line"><a name="l02401"></a><span class="lineno"> 2401</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02402"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a14f4f8b53e3617452f73d78095f02a45"> 2402</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a14f4f8b53e3617452f73d78095f02a45">reg_get_typelib_file_path</a>(HKEY hkey)</div><div class="line"><a name="l02403"></a><span class="lineno"> 2403</span> {</div><div class="line"><a name="l02404"></a><span class="lineno"> 2404</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> path = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02405"></a><span class="lineno"> 2405</span>  path = <a class="code" href="../../d2/d99/win32ole_8c.html#a9eb9e2c430bab21f13d1a2ff462142be">reg_get_val2</a>(hkey, <span class="stringliteral">"win64"</span>);</div><div class="line"><a name="l02406"></a><span class="lineno"> 2406</span>  <span class="keywordflow">if</span> (path != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l02407"></a><span class="lineno"> 2407</span>  <span class="keywordflow">return</span> path;</div><div class="line"><a name="l02408"></a><span class="lineno"> 2408</span>  }</div><div class="line"><a name="l02409"></a><span class="lineno"> 2409</span>  path = <a class="code" href="../../d2/d99/win32ole_8c.html#a9eb9e2c430bab21f13d1a2ff462142be">reg_get_val2</a>(hkey, <span class="stringliteral">"win32"</span>);</div><div class="line"><a name="l02410"></a><span class="lineno"> 2410</span>  <span class="keywordflow">if</span> (path != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l02411"></a><span class="lineno"> 2411</span>  <span class="keywordflow">return</span> path;</div><div class="line"><a name="l02412"></a><span class="lineno"> 2412</span>  }</div><div class="line"><a name="l02413"></a><span class="lineno"> 2413</span>  path = <a class="code" href="../../d2/d99/win32ole_8c.html#a9eb9e2c430bab21f13d1a2ff462142be">reg_get_val2</a>(hkey, <span class="stringliteral">"win16"</span>);</div><div class="line"><a name="l02414"></a><span class="lineno"> 2414</span>  <span class="keywordflow">return</span> path;</div><div class="line"><a name="l02415"></a><span class="lineno"> 2415</span> }</div><div class="line"><a name="l02416"></a><span class="lineno"> 2416</span> </div><div class="line"><a name="l02417"></a><span class="lineno"> 2417</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02418"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a65bbad5ba8794f7e9bab852ee27deb65"> 2418</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a65bbad5ba8794f7e9bab852ee27deb65">typelib_file_from_clsid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole)</div><div class="line"><a name="l02419"></a><span class="lineno"> 2419</span> {</div><div class="line"><a name="l02420"></a><span class="lineno"> 2420</span>  HKEY hroot, hclsid;</div><div class="line"><a name="l02421"></a><span class="lineno"> 2421</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l02422"></a><span class="lineno"> 2422</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib;</div><div class="line"><a name="l02423"></a><span class="lineno"> 2423</span>  <span class="keywordtype">char</span> path[MAX_PATH + 1];</div><div class="line"><a name="l02424"></a><span class="lineno"> 2424</span> </div><div class="line"><a name="l02425"></a><span class="lineno"> 2425</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a>(HKEY_CLASSES_ROOT, <span class="stringliteral">"CLSID"</span>, &hroot);</div><div class="line"><a name="l02426"></a><span class="lineno"> 2426</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS) {</div><div class="line"><a name="l02427"></a><span class="lineno"> 2427</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02428"></a><span class="lineno"> 2428</span>  }</div><div class="line"><a name="l02429"></a><span class="lineno"> 2429</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a>(hroot, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(ole), &hclsid);</div><div class="line"><a name="l02430"></a><span class="lineno"> 2430</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS) {</div><div class="line"><a name="l02431"></a><span class="lineno"> 2431</span>  RegCloseKey(hroot);</div><div class="line"><a name="l02432"></a><span class="lineno"> 2432</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02433"></a><span class="lineno"> 2433</span>  }</div><div class="line"><a name="l02434"></a><span class="lineno"> 2434</span>  typelib = <a class="code" href="../../d2/d99/win32ole_8c.html#a9eb9e2c430bab21f13d1a2ff462142be">reg_get_val2</a>(hclsid, <span class="stringliteral">"InprocServer32"</span>);</div><div class="line"><a name="l02435"></a><span class="lineno"> 2435</span>  RegCloseKey(hroot);</div><div class="line"><a name="l02436"></a><span class="lineno"> 2436</span>  RegCloseKey(hclsid);</div><div class="line"><a name="l02437"></a><span class="lineno"> 2437</span>  <span class="keywordflow">if</span> (typelib != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l02438"></a><span class="lineno"> 2438</span>  ExpandEnvironmentStrings(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(typelib), path, <span class="keyword">sizeof</span>(path));</div><div class="line"><a name="l02439"></a><span class="lineno"> 2439</span>  path[MAX_PATH] = <span class="charliteral">'\0'</span>;</div><div class="line"><a name="l02440"></a><span class="lineno"> 2440</span>  typelib = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(path);</div><div class="line"><a name="l02441"></a><span class="lineno"> 2441</span>  }</div><div class="line"><a name="l02442"></a><span class="lineno"> 2442</span>  <span class="keywordflow">return</span> typelib;</div><div class="line"><a name="l02443"></a><span class="lineno"> 2443</span> }</div><div class="line"><a name="l02444"></a><span class="lineno"> 2444</span> </div><div class="line"><a name="l02445"></a><span class="lineno"> 2445</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02446"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2f6cbb8271a4baf118c86dd9b7448c9e"> 2446</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2f6cbb8271a4baf118c86dd9b7448c9e">typelib_file_from_typelib</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole)</div><div class="line"><a name="l02447"></a><span class="lineno"> 2447</span> {</div><div class="line"><a name="l02448"></a><span class="lineno"> 2448</span>  HKEY htypelib, hclsid, hversion, hlang;</div><div class="line"><a name="l02449"></a><span class="lineno"> 2449</span>  <span class="keywordtype">double</span> fver;</div><div class="line"><a name="l02450"></a><span class="lineno"> 2450</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, j, k;</div><div class="line"><a name="l02451"></a><span class="lineno"> 2451</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l02452"></a><span class="lineno"> 2452</span>  BOOL found = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l02453"></a><span class="lineno"> 2453</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib;</div><div class="line"><a name="l02454"></a><span class="lineno"> 2454</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> file = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02455"></a><span class="lineno"> 2455</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> clsid;</div><div class="line"><a name="l02456"></a><span class="lineno"> 2456</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ver;</div><div class="line"><a name="l02457"></a><span class="lineno"> 2457</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> lang;</div><div class="line"><a name="l02458"></a><span class="lineno"> 2458</span> </div><div class="line"><a name="l02459"></a><span class="lineno"> 2459</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a>(HKEY_CLASSES_ROOT, <span class="stringliteral">"TypeLib"</span>, &htypelib);</div><div class="line"><a name="l02460"></a><span class="lineno"> 2460</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS) {</div><div class="line"><a name="l02461"></a><span class="lineno"> 2461</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02462"></a><span class="lineno"> 2462</span>  }</div><div class="line"><a name="l02463"></a><span class="lineno"> 2463</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; !found; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l02464"></a><span class="lineno"> 2464</span>  clsid = <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(htypelib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l02465"></a><span class="lineno"> 2465</span>  <span class="keywordflow">if</span> (clsid == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l02466"></a><span class="lineno"> 2466</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02467"></a><span class="lineno"> 2467</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(htypelib, clsid, &hclsid);</div><div class="line"><a name="l02468"></a><span class="lineno"> 2468</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS)</div><div class="line"><a name="l02469"></a><span class="lineno"> 2469</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l02470"></a><span class="lineno"> 2470</span>  fver = 0;</div><div class="line"><a name="l02471"></a><span class="lineno"> 2471</span>  <span class="keywordflow">for</span>(j = 0; !found; j++) {</div><div class="line"><a name="l02472"></a><span class="lineno"> 2472</span>  ver = <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(hclsid, j);</div><div class="line"><a name="l02473"></a><span class="lineno"> 2473</span>  <span class="keywordflow">if</span> (ver == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l02474"></a><span class="lineno"> 2474</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02475"></a><span class="lineno"> 2475</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(hclsid, ver, &hversion);</div><div class="line"><a name="l02476"></a><span class="lineno"> 2476</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS || fver > atof(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(ver)))</div><div class="line"><a name="l02477"></a><span class="lineno"> 2477</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l02478"></a><span class="lineno"> 2478</span>  fver = atof(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(ver));</div><div class="line"><a name="l02479"></a><span class="lineno"> 2479</span>  typelib = <a class="code" href="../../d2/d99/win32ole_8c.html#ad1d7db020ebeab12bc94c56f82f43076">reg_get_val</a>(hversion, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l02480"></a><span class="lineno"> 2480</span>  <span class="keywordflow">if</span> (typelib == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l02481"></a><span class="lineno"> 2481</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l02482"></a><span class="lineno"> 2482</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#aabbf48d0162ce9a462b13b71ccf683a5">rb_str_cmp</a>(typelib, ole) == 0) {</div><div class="line"><a name="l02483"></a><span class="lineno"> 2483</span>  <span class="keywordflow">for</span>(k = 0; !found; k++) {</div><div class="line"><a name="l02484"></a><span class="lineno"> 2484</span>  lang = <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(hversion, k);</div><div class="line"><a name="l02485"></a><span class="lineno"> 2485</span>  <span class="keywordflow">if</span> (lang == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l02486"></a><span class="lineno"> 2486</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l02487"></a><span class="lineno"> 2487</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(hversion, lang, &hlang);</div><div class="line"><a name="l02488"></a><span class="lineno"> 2488</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> == ERROR_SUCCESS) {</div><div class="line"><a name="l02489"></a><span class="lineno"> 2489</span>  <span class="keywordflow">if</span> ((file = <a class="code" href="../../d2/d99/win32ole_8c.html#a14f4f8b53e3617452f73d78095f02a45">reg_get_typelib_file_path</a>(hlang)) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l02490"></a><span class="lineno"> 2490</span>  found = <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l02491"></a><span class="lineno"> 2491</span>  RegCloseKey(hlang);</div><div class="line"><a name="l02492"></a><span class="lineno"> 2492</span>  }</div><div class="line"><a name="l02493"></a><span class="lineno"> 2493</span>  }</div><div class="line"><a name="l02494"></a><span class="lineno"> 2494</span>  }</div><div class="line"><a name="l02495"></a><span class="lineno"> 2495</span>  RegCloseKey(hversion);</div><div class="line"><a name="l02496"></a><span class="lineno"> 2496</span>  }</div><div class="line"><a name="l02497"></a><span class="lineno"> 2497</span>  RegCloseKey(hclsid);</div><div class="line"><a name="l02498"></a><span class="lineno"> 2498</span>  }</div><div class="line"><a name="l02499"></a><span class="lineno"> 2499</span>  RegCloseKey(htypelib);</div><div class="line"><a name="l02500"></a><span class="lineno"> 2500</span>  <span class="keywordflow">return</span> file;</div><div class="line"><a name="l02501"></a><span class="lineno"> 2501</span> }</div><div class="line"><a name="l02502"></a><span class="lineno"> 2502</span> </div><div class="line"><a name="l02503"></a><span class="lineno"> 2503</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02504"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afe7b5c965ce1a10b205d15b8c47646d9"> 2504</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#afe7b5c965ce1a10b205d15b8c47646d9">typelib_file</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole)</div><div class="line"><a name="l02505"></a><span class="lineno"> 2505</span> {</div><div class="line"><a name="l02506"></a><span class="lineno"> 2506</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> file = <a class="code" href="../../d2/d99/win32ole_8c.html#a65bbad5ba8794f7e9bab852ee27deb65">typelib_file_from_clsid</a>(ole);</div><div class="line"><a name="l02507"></a><span class="lineno"> 2507</span>  <span class="keywordflow">if</span> (file != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l02508"></a><span class="lineno"> 2508</span>  <span class="keywordflow">return</span> file;</div><div class="line"><a name="l02509"></a><span class="lineno"> 2509</span>  }</div><div class="line"><a name="l02510"></a><span class="lineno"> 2510</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2f6cbb8271a4baf118c86dd9b7448c9e">typelib_file_from_typelib</a>(ole);</div><div class="line"><a name="l02511"></a><span class="lineno"> 2511</span> }</div><div class="line"><a name="l02512"></a><span class="lineno"> 2512</span> </div><div class="line"><a name="l02513"></a><span class="lineno"> 2513</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l02514"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a714a0793c185ef6579d1db4f41c7dc2a"> 2514</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a714a0793c185ef6579d1db4f41c7dc2a">ole_const_load</a>(ITypeLib *pTypeLib, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l02515"></a><span class="lineno"> 2515</span> {</div><div class="line"><a name="l02516"></a><span class="lineno"> 2516</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>;</div><div class="line"><a name="l02517"></a><span class="lineno"> 2517</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> index;</div><div class="line"><a name="l02518"></a><span class="lineno"> 2518</span>  <span class="keywordtype">int</span> iVar;</div><div class="line"><a name="l02519"></a><span class="lineno"> 2519</span>  ITypeInfo *pTypeInfo;</div><div class="line"><a name="l02520"></a><span class="lineno"> 2520</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l02521"></a><span class="lineno"> 2521</span>  VARDESC *pVarDesc;</div><div class="line"><a name="l02522"></a><span class="lineno"> 2522</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l02523"></a><span class="lineno"> 2523</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> len;</div><div class="line"><a name="l02524"></a><span class="lineno"> 2524</span>  BSTR bstr;</div><div class="line"><a name="l02525"></a><span class="lineno"> 2525</span>  <span class="keywordtype">char</span> *pName = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l02526"></a><span class="lineno"> 2526</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l02527"></a><span class="lineno"> 2527</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> constant;</div><div class="line"><a name="l02528"></a><span class="lineno"> 2528</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa5b9137f051ac26d7ccc8824f178233">ID</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a64ae40793ade89d800a8c5646d2980fc">id</a>;</div><div class="line"><a name="l02529"></a><span class="lineno"> 2529</span>  constant = <a class="code" href="../../d1/d04/hash_8c.html#af1da586524a3a1739fd5b91272037815">rb_hash_new</a>();</div><div class="line"><a name="l02530"></a><span class="lineno"> 2530</span>  <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a> = pTypeLib->lpVtbl->GetTypeInfoCount(pTypeLib);</div><div class="line"><a name="l02531"></a><span class="lineno"> 2531</span>  <span class="keywordflow">for</span> (index = 0; index < <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>; index++) {</div><div class="line"><a name="l02532"></a><span class="lineno"> 2532</span>  hr = pTypeLib->lpVtbl->GetTypeInfo(pTypeLib, index, &pTypeInfo);</div><div class="line"><a name="l02533"></a><span class="lineno"> 2533</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l02534"></a><span class="lineno"> 2534</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l02535"></a><span class="lineno"> 2535</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(pTypeInfo, &pTypeAttr);</div><div class="line"><a name="l02536"></a><span class="lineno"> 2536</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l02537"></a><span class="lineno"> 2537</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l02538"></a><span class="lineno"> 2538</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l02539"></a><span class="lineno"> 2539</span>  }</div><div class="line"><a name="l02540"></a><span class="lineno"> 2540</span>  <span class="keywordflow">for</span>(iVar = 0; iVar < pTypeAttr->cVars; iVar++) {</div><div class="line"><a name="l02541"></a><span class="lineno"> 2541</span>  hr = pTypeInfo->lpVtbl->GetVarDesc(pTypeInfo, iVar, &pVarDesc);</div><div class="line"><a name="l02542"></a><span class="lineno"> 2542</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l02543"></a><span class="lineno"> 2543</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l02544"></a><span class="lineno"> 2544</span>  <span class="keywordflow">if</span>(pVarDesc->varkind == VAR_CONST &&</div><div class="line"><a name="l02545"></a><span class="lineno"> 2545</span>  !(pVarDesc->wVarFlags & (VARFLAG_FHIDDEN |</div><div class="line"><a name="l02546"></a><span class="lineno"> 2546</span>  VARFLAG_FRESTRICTED |</div><div class="line"><a name="l02547"></a><span class="lineno"> 2547</span>  VARFLAG_FNONBROWSABLE))) {</div><div class="line"><a name="l02548"></a><span class="lineno"> 2548</span>  hr = pTypeInfo->lpVtbl->GetNames(pTypeInfo, pVarDesc->memid, &bstr,</div><div class="line"><a name="l02549"></a><span class="lineno"> 2549</span>  1, &len);</div><div class="line"><a name="l02550"></a><span class="lineno"> 2550</span>  <span class="keywordflow">if</span>(FAILED(hr) || len == 0 || !bstr)</div><div class="line"><a name="l02551"></a><span class="lineno"> 2551</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l02552"></a><span class="lineno"> 2552</span>  pName = <a class="code" href="../../d2/d99/win32ole_8c.html#a148da008cc189df71d5b47bf1bbb6d06">ole_wc2mb</a>(bstr);</div><div class="line"><a name="l02553"></a><span class="lineno"> 2553</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ac921f4ad75c62ef506c5d282bc39eb26">V_UNION1</a>(pVarDesc, lpvarValue));</div><div class="line"><a name="l02554"></a><span class="lineno"> 2554</span>  *pName = toupper((<span class="keywordtype">int</span>)*pName);</div><div class="line"><a name="l02555"></a><span class="lineno"> 2555</span>  <span class="keywordtype">id</span> = <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(pName);</div><div class="line"><a name="l02556"></a><span class="lineno"> 2556</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d11/ripper_8c.html#a962e14dc81f0fa2107c555dd10129c27">rb_is_const_id</a>(<span class="keywordtype">id</span>)) {</div><div class="line"><a name="l02557"></a><span class="lineno"> 2557</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(klass, pName, <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l02558"></a><span class="lineno"> 2558</span>  }</div><div class="line"><a name="l02559"></a><span class="lineno"> 2559</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02560"></a><span class="lineno"> 2560</span>  <a class="code" href="../../db/d2e/intern_8h.html#ad5e50a405c25d3df6ce1efc754478529">rb_hash_aset</a>(constant, <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(pName), <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l02561"></a><span class="lineno"> 2561</span>  }</div><div class="line"><a name="l02562"></a><span class="lineno"> 2562</span>  SysFreeString(bstr);</div><div class="line"><a name="l02563"></a><span class="lineno"> 2563</span>  <span class="keywordflow">if</span>(pName) {</div><div class="line"><a name="l02564"></a><span class="lineno"> 2564</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pName);</div><div class="line"><a name="l02565"></a><span class="lineno"> 2565</span>  pName = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l02566"></a><span class="lineno"> 2566</span>  }</div><div class="line"><a name="l02567"></a><span class="lineno"> 2567</span>  }</div><div class="line"><a name="l02568"></a><span class="lineno"> 2568</span>  pTypeInfo->lpVtbl->ReleaseVarDesc(pTypeInfo, pVarDesc);</div><div class="line"><a name="l02569"></a><span class="lineno"> 2569</span>  }</div><div class="line"><a name="l02570"></a><span class="lineno"> 2570</span>  pTypeInfo->lpVtbl->ReleaseTypeAttr(pTypeInfo, pTypeAttr);</div><div class="line"><a name="l02571"></a><span class="lineno"> 2571</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l02572"></a><span class="lineno"> 2572</span>  }</div><div class="line"><a name="l02573"></a><span class="lineno"> 2573</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(klass, <span class="stringliteral">"CONSTANTS"</span>, constant);</div><div class="line"><a name="l02574"></a><span class="lineno"> 2574</span> }</div><div class="line"><a name="l02575"></a><span class="lineno"> 2575</span> </div><div class="line"><a name="l02576"></a><span class="lineno"> 2576</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a></div><div class="line"><a name="l02577"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2c2cafa30f8f59de53e58a6c03b0eff1"> 2577</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2c2cafa30f8f59de53e58a6c03b0eff1">clsid_from_remote</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> host, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> com, CLSID *pclsid)</div><div class="line"><a name="l02578"></a><span class="lineno"> 2578</span> {</div><div class="line"><a name="l02579"></a><span class="lineno"> 2579</span>  HKEY hlm;</div><div class="line"><a name="l02580"></a><span class="lineno"> 2580</span>  HKEY hpid;</div><div class="line"><a name="l02581"></a><span class="lineno"> 2581</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> subkey;</div><div class="line"><a name="l02582"></a><span class="lineno"> 2582</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l02583"></a><span class="lineno"> 2583</span>  <span class="keywordtype">char</span> clsid[100];</div><div class="line"><a name="l02584"></a><span class="lineno"> 2584</span>  OLECHAR *pbuf;</div><div class="line"><a name="l02585"></a><span class="lineno"> 2585</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> len;</div><div class="line"><a name="l02586"></a><span class="lineno"> 2586</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> dwtype;</div><div class="line"><a name="l02587"></a><span class="lineno"> 2587</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l02588"></a><span class="lineno"> 2588</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = RegConnectRegistry(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(host), HKEY_LOCAL_MACHINE, &hlm);</div><div class="line"><a name="l02589"></a><span class="lineno"> 2589</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS)</div><div class="line"><a name="l02590"></a><span class="lineno"> 2590</span>  <span class="keywordflow">return</span> HRESULT_FROM_WIN32(<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>);</div><div class="line"><a name="l02591"></a><span class="lineno"> 2591</span>  subkey = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"SOFTWARE\\Classes\\"</span>);</div><div class="line"><a name="l02592"></a><span class="lineno"> 2592</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2f12f7ad949fa2e6abb64f2311c6e2c5">rb_str_concat</a>(subkey, com);</div><div class="line"><a name="l02593"></a><span class="lineno"> 2593</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(subkey, <span class="stringliteral">"\\CLSID"</span>);</div><div class="line"><a name="l02594"></a><span class="lineno"> 2594</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = RegOpenKeyEx(hlm, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(subkey), 0, KEY_READ, &hpid);</div><div class="line"><a name="l02595"></a><span class="lineno"> 2595</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS)</div><div class="line"><a name="l02596"></a><span class="lineno"> 2596</span>  hr = HRESULT_FROM_WIN32(<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>);</div><div class="line"><a name="l02597"></a><span class="lineno"> 2597</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02598"></a><span class="lineno"> 2598</span>  len = <span class="keyword">sizeof</span>(clsid);</div><div class="line"><a name="l02599"></a><span class="lineno"> 2599</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = RegQueryValueEx(hpid, <span class="stringliteral">""</span>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &dwtype, (BYTE *)clsid, &len);</div><div class="line"><a name="l02600"></a><span class="lineno"> 2600</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> == ERROR_SUCCESS && dwtype == REG_SZ) {</div><div class="line"><a name="l02601"></a><span class="lineno"> 2601</span>  pbuf = <a class="code" href="../../d2/d99/win32ole_8c.html#ad7e303f0dec303ecdef04cc6d828eb7c">ole_mb2wc</a>(clsid, -1);</div><div class="line"><a name="l02602"></a><span class="lineno"> 2602</span>  hr = CLSIDFromString(pbuf, pclsid);</div><div class="line"><a name="l02603"></a><span class="lineno"> 2603</span>  SysFreeString(pbuf);</div><div class="line"><a name="l02604"></a><span class="lineno"> 2604</span>  }</div><div class="line"><a name="l02605"></a><span class="lineno"> 2605</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02606"></a><span class="lineno"> 2606</span>  hr = HRESULT_FROM_WIN32(<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>);</div><div class="line"><a name="l02607"></a><span class="lineno"> 2607</span>  }</div><div class="line"><a name="l02608"></a><span class="lineno"> 2608</span>  RegCloseKey(hpid);</div><div class="line"><a name="l02609"></a><span class="lineno"> 2609</span>  }</div><div class="line"><a name="l02610"></a><span class="lineno"> 2610</span>  RegCloseKey(hlm);</div><div class="line"><a name="l02611"></a><span class="lineno"> 2611</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l02612"></a><span class="lineno"> 2612</span> }</div><div class="line"><a name="l02613"></a><span class="lineno"> 2613</span> </div><div class="line"><a name="l02614"></a><span class="lineno"> 2614</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02615"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5d6d21de9fbc08c767655267b2b1140d"> 2615</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5d6d21de9fbc08c767655267b2b1140d">ole_create_dcom</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> host, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> others)</div><div class="line"><a name="l02616"></a><span class="lineno"> 2616</span> {</div><div class="line"><a name="l02617"></a><span class="lineno"> 2617</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l02618"></a><span class="lineno"> 2618</span>  CLSID clsid;</div><div class="line"><a name="l02619"></a><span class="lineno"> 2619</span>  OLECHAR *pbuf;</div><div class="line"><a name="l02620"></a><span class="lineno"> 2620</span> </div><div class="line"><a name="l02621"></a><span class="lineno"> 2621</span>  COSERVERINFO serverinfo;</div><div class="line"><a name="l02622"></a><span class="lineno"> 2622</span>  MULTI_QI multi_qi;</div><div class="line"><a name="l02623"></a><span class="lineno"> 2623</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> clsctx = CLSCTX_REMOTE_SERVER;</div><div class="line"><a name="l02624"></a><span class="lineno"> 2624</span> </div><div class="line"><a name="l02625"></a><span class="lineno"> 2625</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d2/d99/win32ole_8c.html#a77ca308cb6a605690e4b3e07afd18ce8">gole32</a>)</div><div class="line"><a name="l02626"></a><span class="lineno"> 2626</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a77ca308cb6a605690e4b3e07afd18ce8">gole32</a> = LoadLibrary(<span class="stringliteral">"OLE32"</span>);</div><div class="line"><a name="l02627"></a><span class="lineno"> 2627</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d2/d99/win32ole_8c.html#a77ca308cb6a605690e4b3e07afd18ce8">gole32</a>)</div><div class="line"><a name="l02628"></a><span class="lineno"> 2628</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to load OLE32"</span>);</div><div class="line"><a name="l02629"></a><span class="lineno"> 2629</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d2/d99/win32ole_8c.html#a56ab313527b706f895cb18faf492cdf4">gCoCreateInstanceEx</a>)</div><div class="line"><a name="l02630"></a><span class="lineno"> 2630</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a56ab313527b706f895cb18faf492cdf4">gCoCreateInstanceEx</a> = (FNCOCREATEINSTANCEEX*)</div><div class="line"><a name="l02631"></a><span class="lineno"> 2631</span>  GetProcAddress(<a class="code" href="../../d2/d99/win32ole_8c.html#a77ca308cb6a605690e4b3e07afd18ce8">gole32</a>, <span class="stringliteral">"CoCreateInstanceEx"</span>);</div><div class="line"><a name="l02632"></a><span class="lineno"> 2632</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d2/d99/win32ole_8c.html#a56ab313527b706f895cb18faf492cdf4">gCoCreateInstanceEx</a>)</div><div class="line"><a name="l02633"></a><span class="lineno"> 2633</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"CoCreateInstanceEx is not supported in this environment"</span>);</div><div class="line"><a name="l02634"></a><span class="lineno"> 2634</span> </div><div class="line"><a name="l02635"></a><span class="lineno"> 2635</span>  pbuf = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(ole);</div><div class="line"><a name="l02636"></a><span class="lineno"> 2636</span>  hr = CLSIDFromProgID(pbuf, &clsid);</div><div class="line"><a name="l02637"></a><span class="lineno"> 2637</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l02638"></a><span class="lineno"> 2638</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a2c2cafa30f8f59de53e58a6c03b0eff1">clsid_from_remote</a>(host, ole, &clsid);</div><div class="line"><a name="l02639"></a><span class="lineno"> 2639</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l02640"></a><span class="lineno"> 2640</span>  hr = CLSIDFromString(pbuf, &clsid);</div><div class="line"><a name="l02641"></a><span class="lineno"> 2641</span>  SysFreeString(pbuf);</div><div class="line"><a name="l02642"></a><span class="lineno"> 2642</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l02643"></a><span class="lineno"> 2643</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l02644"></a><span class="lineno"> 2644</span>  <span class="stringliteral">"unknown OLE server: `%s'"</span>,</div><div class="line"><a name="l02645"></a><span class="lineno"> 2645</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(ole));</div><div class="line"><a name="l02646"></a><span class="lineno"> 2646</span>  memset(&serverinfo, 0, <span class="keyword">sizeof</span>(COSERVERINFO));</div><div class="line"><a name="l02647"></a><span class="lineno"> 2647</span>  serverinfo.pwszName = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(host);</div><div class="line"><a name="l02648"></a><span class="lineno"> 2648</span>  memset(&multi_qi, 0, <span class="keyword">sizeof</span>(MULTI_QI));</div><div class="line"><a name="l02649"></a><span class="lineno"> 2649</span>  multi_qi.pIID = &IID_IDispatch;</div><div class="line"><a name="l02650"></a><span class="lineno"> 2650</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a56ab313527b706f895cb18faf492cdf4">gCoCreateInstanceEx</a>(&clsid, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, clsctx, &serverinfo, 1, &multi_qi);</div><div class="line"><a name="l02651"></a><span class="lineno"> 2651</span>  SysFreeString(serverinfo.pwszName);</div><div class="line"><a name="l02652"></a><span class="lineno"> 2652</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l02653"></a><span class="lineno"> 2653</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l02654"></a><span class="lineno"> 2654</span>  <span class="stringliteral">"failed to create DCOM server `%s' in `%s'"</span>,</div><div class="line"><a name="l02655"></a><span class="lineno"> 2655</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(ole),</div><div class="line"><a name="l02656"></a><span class="lineno"> 2656</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(host));</div><div class="line"><a name="l02657"></a><span class="lineno"> 2657</span> </div><div class="line"><a name="l02658"></a><span class="lineno"> 2658</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a823003b3f886ae7d06708d5d18c20d0f">ole_set_member</a>(<span class="keyword">self</span>, (IDispatch*)multi_qi.pItf);</div><div class="line"><a name="l02659"></a><span class="lineno"> 2659</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l02660"></a><span class="lineno"> 2660</span> }</div><div class="line"><a name="l02661"></a><span class="lineno"> 2661</span> </div><div class="line"><a name="l02662"></a><span class="lineno"> 2662</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02663"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5f5d58cfaa0e32882b5533677620dd93"> 2663</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5f5d58cfaa0e32882b5533677620dd93">ole_bind_obj</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> moniker, <span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l02664"></a><span class="lineno"> 2664</span> {</div><div class="line"><a name="l02665"></a><span class="lineno"> 2665</span>  IBindCtx *pBindCtx;</div><div class="line"><a name="l02666"></a><span class="lineno"> 2666</span>  IMoniker *pMoniker;</div><div class="line"><a name="l02667"></a><span class="lineno"> 2667</span>  IDispatch *<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l02668"></a><span class="lineno"> 2668</span>  <span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l02669"></a><span class="lineno"> 2669</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l02670"></a><span class="lineno"> 2670</span>  OLECHAR *pbuf;</div><div class="line"><a name="l02671"></a><span class="lineno"> 2671</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> eaten = 0;</div><div class="line"><a name="l02672"></a><span class="lineno"> 2672</span> </div><div class="line"><a name="l02673"></a><span class="lineno"> 2673</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a>();</div><div class="line"><a name="l02674"></a><span class="lineno"> 2674</span> </div><div class="line"><a name="l02675"></a><span class="lineno"> 2675</span>  hr = CreateBindCtx(0, &pBindCtx);</div><div class="line"><a name="l02676"></a><span class="lineno"> 2676</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l02677"></a><span class="lineno"> 2677</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l02678"></a><span class="lineno"> 2678</span>  <span class="stringliteral">"failed to create bind context"</span>);</div><div class="line"><a name="l02679"></a><span class="lineno"> 2679</span>  }</div><div class="line"><a name="l02680"></a><span class="lineno"> 2680</span> </div><div class="line"><a name="l02681"></a><span class="lineno"> 2681</span>  pbuf = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(moniker);</div><div class="line"><a name="l02682"></a><span class="lineno"> 2682</span>  hr = MkParseDisplayName(pBindCtx, pbuf, &eaten, &pMoniker);</div><div class="line"><a name="l02683"></a><span class="lineno"> 2683</span>  SysFreeString(pbuf);</div><div class="line"><a name="l02684"></a><span class="lineno"> 2684</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l02685"></a><span class="lineno"> 2685</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pBindCtx);</div><div class="line"><a name="l02686"></a><span class="lineno"> 2686</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l02687"></a><span class="lineno"> 2687</span>  <span class="stringliteral">"failed to parse display name of moniker `%s'"</span>,</div><div class="line"><a name="l02688"></a><span class="lineno"> 2688</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(moniker));</div><div class="line"><a name="l02689"></a><span class="lineno"> 2689</span>  }</div><div class="line"><a name="l02690"></a><span class="lineno"> 2690</span>  hr = pMoniker->lpVtbl->BindToObject(pMoniker, pBindCtx, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>,</div><div class="line"><a name="l02691"></a><span class="lineno"> 2691</span>  &IID_IDispatch, &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l02692"></a><span class="lineno"> 2692</span>  <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l02693"></a><span class="lineno"> 2693</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pMoniker);</div><div class="line"><a name="l02694"></a><span class="lineno"> 2694</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pBindCtx);</div><div class="line"><a name="l02695"></a><span class="lineno"> 2695</span> </div><div class="line"><a name="l02696"></a><span class="lineno"> 2696</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l02697"></a><span class="lineno"> 2697</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l02698"></a><span class="lineno"> 2698</span>  <span class="stringliteral">"failed to bind moniker `%s'"</span>,</div><div class="line"><a name="l02699"></a><span class="lineno"> 2699</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(moniker));</div><div class="line"><a name="l02700"></a><span class="lineno"> 2700</span>  }</div><div class="line"><a name="l02701"></a><span class="lineno"> 2701</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ada66e0a6c7b3c3915de52016aa828026">create_win32ole_object</a>(<span class="keyword">self</span>, <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>);</div><div class="line"><a name="l02702"></a><span class="lineno"> 2702</span> }</div><div class="line"><a name="l02703"></a><span class="lineno"> 2703</span> </div><div class="line"><a name="l02704"></a><span class="lineno"> 2704</span> <span class="comment">/*</span></div><div class="line"><a name="l02705"></a><span class="lineno"> 2705</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l02706"></a><span class="lineno"> 2706</span> <span class="comment"> * WIN32OLE.connect( ole ) --> aWIN32OLE</span></div><div class="line"><a name="l02707"></a><span class="lineno"> 2707</span> <span class="comment"> *</span></div><div class="line"><a name="l02708"></a><span class="lineno"> 2708</span> <span class="comment"> * Returns running OLE Automation object or WIN32OLE object from moniker.</span></div><div class="line"><a name="l02709"></a><span class="lineno"> 2709</span> <span class="comment"> * 1st argument should be OLE program id or class id or moniker.</span></div><div class="line"><a name="l02710"></a><span class="lineno"> 2710</span> <span class="comment"> *</span></div><div class="line"><a name="l02711"></a><span class="lineno"> 2711</span> <span class="comment"> * WIN32OLE.connect('Excel.Application') # => WIN32OLE object which represents running Excel.</span></div><div class="line"><a name="l02712"></a><span class="lineno"> 2712</span> <span class="comment"> */</span></div><div class="line"><a name="l02713"></a><span class="lineno"> 2713</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02714"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a41b6cce0ceb88f59521f6a9b5cbc903e"> 2714</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a41b6cce0ceb88f59521f6a9b5cbc903e">fole_s_connect</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l02715"></a><span class="lineno"> 2715</span> {</div><div class="line"><a name="l02716"></a><span class="lineno"> 2716</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> svr_name;</div><div class="line"><a name="l02717"></a><span class="lineno"> 2717</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> others;</div><div class="line"><a name="l02718"></a><span class="lineno"> 2718</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l02719"></a><span class="lineno"> 2719</span>  CLSID clsid;</div><div class="line"><a name="l02720"></a><span class="lineno"> 2720</span>  OLECHAR *pBuf;</div><div class="line"><a name="l02721"></a><span class="lineno"> 2721</span>  IDispatch *<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l02722"></a><span class="lineno"> 2722</span>  <span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l02723"></a><span class="lineno"> 2723</span>  IUnknown *pUnknown;</div><div class="line"><a name="l02724"></a><span class="lineno"> 2724</span> </div><div class="line"><a name="l02725"></a><span class="lineno"> 2725</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a98b91af598acb64fe8497413ce498766">rb_secure</a>(4);</div><div class="line"><a name="l02726"></a><span class="lineno"> 2726</span>  <span class="comment">/* initialize to use OLE */</span></div><div class="line"><a name="l02727"></a><span class="lineno"> 2727</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a>();</div><div class="line"><a name="l02728"></a><span class="lineno"> 2728</span> </div><div class="line"><a name="l02729"></a><span class="lineno"> 2729</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="stringliteral">"1*"</span>, &svr_name, &others);</div><div class="line"><a name="l02730"></a><span class="lineno"> 2730</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0381640e2905c1b3e104194f91697ca4">SafeStringValue</a>(svr_name);</div><div class="line"><a name="l02731"></a><span class="lineno"> 2731</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d9d/tcltklib_8c.html#a6f520624fabb8332dc98fd223491bf8d">rb_safe_level</a>() > 0 && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a621bc62b1fd82640c1078daf90e1c061">OBJ_TAINTED</a>(svr_name)) {</div><div class="line"><a name="l02732"></a><span class="lineno"> 2732</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ae53f1d228c34c2a7715d7d39ab1a2991">rb_eSecurityError</a>, <span class="stringliteral">"Insecure Object Connection - %s"</span>,</div><div class="line"><a name="l02733"></a><span class="lineno"> 2733</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(svr_name));</div><div class="line"><a name="l02734"></a><span class="lineno"> 2734</span>  }</div><div class="line"><a name="l02735"></a><span class="lineno"> 2735</span> </div><div class="line"><a name="l02736"></a><span class="lineno"> 2736</span>  <span class="comment">/* get CLSID from OLE server name */</span></div><div class="line"><a name="l02737"></a><span class="lineno"> 2737</span>  pBuf = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(svr_name);</div><div class="line"><a name="l02738"></a><span class="lineno"> 2738</span>  hr = CLSIDFromProgID(pBuf, &clsid);</div><div class="line"><a name="l02739"></a><span class="lineno"> 2739</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l02740"></a><span class="lineno"> 2740</span>  hr = CLSIDFromString(pBuf, &clsid);</div><div class="line"><a name="l02741"></a><span class="lineno"> 2741</span>  }</div><div class="line"><a name="l02742"></a><span class="lineno"> 2742</span>  SysFreeString(pBuf);</div><div class="line"><a name="l02743"></a><span class="lineno"> 2743</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l02744"></a><span class="lineno"> 2744</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5f5d58cfaa0e32882b5533677620dd93">ole_bind_obj</a>(svr_name, <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="keyword">self</span>);</div><div class="line"><a name="l02745"></a><span class="lineno"> 2745</span>  }</div><div class="line"><a name="l02746"></a><span class="lineno"> 2746</span> </div><div class="line"><a name="l02747"></a><span class="lineno"> 2747</span>  hr = GetActiveObject(&clsid, 0, &pUnknown);</div><div class="line"><a name="l02748"></a><span class="lineno"> 2748</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l02749"></a><span class="lineno"> 2749</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l02750"></a><span class="lineno"> 2750</span>  <span class="stringliteral">"OLE server `%s' not running"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(svr_name));</div><div class="line"><a name="l02751"></a><span class="lineno"> 2751</span>  }</div><div class="line"><a name="l02752"></a><span class="lineno"> 2752</span>  hr = pUnknown->lpVtbl->QueryInterface(pUnknown, &IID_IDispatch, &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l02753"></a><span class="lineno"> 2753</span>  <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l02754"></a><span class="lineno"> 2754</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l02755"></a><span class="lineno"> 2755</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pUnknown);</div><div class="line"><a name="l02756"></a><span class="lineno"> 2756</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l02757"></a><span class="lineno"> 2757</span>  <span class="stringliteral">"failed to create WIN32OLE server `%s'"</span>,</div><div class="line"><a name="l02758"></a><span class="lineno"> 2758</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(svr_name));</div><div class="line"><a name="l02759"></a><span class="lineno"> 2759</span>  }</div><div class="line"><a name="l02760"></a><span class="lineno"> 2760</span> </div><div class="line"><a name="l02761"></a><span class="lineno"> 2761</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pUnknown);</div><div class="line"><a name="l02762"></a><span class="lineno"> 2762</span> </div><div class="line"><a name="l02763"></a><span class="lineno"> 2763</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ada66e0a6c7b3c3915de52016aa828026">create_win32ole_object</a>(<span class="keyword">self</span>, <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>);</div><div class="line"><a name="l02764"></a><span class="lineno"> 2764</span> }</div><div class="line"><a name="l02765"></a><span class="lineno"> 2765</span> </div><div class="line"><a name="l02766"></a><span class="lineno"> 2766</span> <span class="comment">/*</span></div><div class="line"><a name="l02767"></a><span class="lineno"> 2767</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l02768"></a><span class="lineno"> 2768</span> <span class="comment"> * WIN32OLE.const_load( ole, mod = WIN32OLE)</span></div><div class="line"><a name="l02769"></a><span class="lineno"> 2769</span> <span class="comment"> *</span></div><div class="line"><a name="l02770"></a><span class="lineno"> 2770</span> <span class="comment"> * Defines the constants of OLE Automation server as mod's constants.</span></div><div class="line"><a name="l02771"></a><span class="lineno"> 2771</span> <span class="comment"> * The first argument is WIN32OLE object or type library name.</span></div><div class="line"><a name="l02772"></a><span class="lineno"> 2772</span> <span class="comment"> * If 2nd argument is omitted, the default is WIN32OLE.</span></div><div class="line"><a name="l02773"></a><span class="lineno"> 2773</span> <span class="comment"> * The first letter of Ruby's constant variable name is upper case,</span></div><div class="line"><a name="l02774"></a><span class="lineno"> 2774</span> <span class="comment"> * so constant variable name of WIN32OLE object is capitalized.</span></div><div class="line"><a name="l02775"></a><span class="lineno"> 2775</span> <span class="comment"> * For example, the 'xlTop' constant of Excel is changed to 'XlTop'</span></div><div class="line"><a name="l02776"></a><span class="lineno"> 2776</span> <span class="comment"> * in WIN32OLE.</span></div><div class="line"><a name="l02777"></a><span class="lineno"> 2777</span> <span class="comment"> * If the first letter of constant variabl is not [A-Z], then</span></div><div class="line"><a name="l02778"></a><span class="lineno"> 2778</span> <span class="comment"> * the constant is defined as CONSTANTS hash element.</span></div><div class="line"><a name="l02779"></a><span class="lineno"> 2779</span> <span class="comment"> *</span></div><div class="line"><a name="l02780"></a><span class="lineno"> 2780</span> <span class="comment"> * module EXCEL_CONST</span></div><div class="line"><a name="l02781"></a><span class="lineno"> 2781</span> <span class="comment"> * end</span></div><div class="line"><a name="l02782"></a><span class="lineno"> 2782</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l02783"></a><span class="lineno"> 2783</span> <span class="comment"> * WIN32OLE.const_load(excel, EXCEL_CONST)</span></div><div class="line"><a name="l02784"></a><span class="lineno"> 2784</span> <span class="comment"> * puts EXCEL_CONST::XlTop # => -4160</span></div><div class="line"><a name="l02785"></a><span class="lineno"> 2785</span> <span class="comment"> * puts EXCEL_CONST::CONSTANTS['_xlDialogChartSourceData'] # => 541</span></div><div class="line"><a name="l02786"></a><span class="lineno"> 2786</span> <span class="comment"> *</span></div><div class="line"><a name="l02787"></a><span class="lineno"> 2787</span> <span class="comment"> * WIN32OLE.const_load(excel)</span></div><div class="line"><a name="l02788"></a><span class="lineno"> 2788</span> <span class="comment"> * puts WIN32OLE::XlTop # => -4160</span></div><div class="line"><a name="l02789"></a><span class="lineno"> 2789</span> <span class="comment"> *</span></div><div class="line"><a name="l02790"></a><span class="lineno"> 2790</span> <span class="comment"> * module MSO</span></div><div class="line"><a name="l02791"></a><span class="lineno"> 2791</span> <span class="comment"> * end</span></div><div class="line"><a name="l02792"></a><span class="lineno"> 2792</span> <span class="comment"> * WIN32OLE.const_load('Microsoft Office 9.0 Object Library', MSO)</span></div><div class="line"><a name="l02793"></a><span class="lineno"> 2793</span> <span class="comment"> * puts MSO::MsoLineSingle # => 1</span></div><div class="line"><a name="l02794"></a><span class="lineno"> 2794</span> <span class="comment"> */</span></div><div class="line"><a name="l02795"></a><span class="lineno"> 2795</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02796"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aece2e35f468147b6d40f99a14c3c7f6a"> 2796</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aece2e35f468147b6d40f99a14c3c7f6a">fole_s_const_load</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l02797"></a><span class="lineno"> 2797</span> {</div><div class="line"><a name="l02798"></a><span class="lineno"> 2798</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole;</div><div class="line"><a name="l02799"></a><span class="lineno"> 2799</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass;</div><div class="line"><a name="l02800"></a><span class="lineno"> 2800</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l02801"></a><span class="lineno"> 2801</span>  ITypeInfo *pTypeInfo;</div><div class="line"><a name="l02802"></a><span class="lineno"> 2802</span>  ITypeLib *pTypeLib;</div><div class="line"><a name="l02803"></a><span class="lineno"> 2803</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> index;</div><div class="line"><a name="l02804"></a><span class="lineno"> 2804</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l02805"></a><span class="lineno"> 2805</span>  OLECHAR *pBuf;</div><div class="line"><a name="l02806"></a><span class="lineno"> 2806</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> file;</div><div class="line"><a name="l02807"></a><span class="lineno"> 2807</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>;</div><div class="line"><a name="l02808"></a><span class="lineno"> 2808</span> </div><div class="line"><a name="l02809"></a><span class="lineno"> 2809</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a98b91af598acb64fe8497413ce498766">rb_secure</a>(4);</div><div class="line"><a name="l02810"></a><span class="lineno"> 2810</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="stringliteral">"11"</span>, &ole, &klass);</div><div class="line"><a name="l02811"></a><span class="lineno"> 2811</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(klass) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad04c63d175774c6d6e7dfaf0f0a982c9">T_CLASS</a> &&</div><div class="line"><a name="l02812"></a><span class="lineno"> 2812</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(klass) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6cdc7dfe8f84777325da08a96ae5f795">T_MODULE</a> &&</div><div class="line"><a name="l02813"></a><span class="lineno"> 2813</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(klass) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3a7d10c48d5dff0a5d4aa94acb74811a">T_NIL</a>) {</div><div class="line"><a name="l02814"></a><span class="lineno"> 2814</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"2nd parameter must be Class or Module"</span>);</div><div class="line"><a name="l02815"></a><span class="lineno"> 2815</span>  }</div><div class="line"><a name="l02816"></a><span class="lineno"> 2816</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(ole, <a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>)) {</div><div class="line"><a name="l02817"></a><span class="lineno"> 2817</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(ole, pole);</div><div class="line"><a name="l02818"></a><span class="lineno"> 2818</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->GetTypeInfo(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>,</div><div class="line"><a name="l02819"></a><span class="lineno"> 2819</span>  0, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, &pTypeInfo);</div><div class="line"><a name="l02820"></a><span class="lineno"> 2820</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l02821"></a><span class="lineno"> 2821</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to GetTypeInfo"</span>);</div><div class="line"><a name="l02822"></a><span class="lineno"> 2822</span>  }</div><div class="line"><a name="l02823"></a><span class="lineno"> 2823</span>  hr = pTypeInfo->lpVtbl->GetContainingTypeLib(pTypeInfo, &pTypeLib, &index);</div><div class="line"><a name="l02824"></a><span class="lineno"> 2824</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l02825"></a><span class="lineno"> 2825</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l02826"></a><span class="lineno"> 2826</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to GetContainingTypeLib"</span>);</div><div class="line"><a name="l02827"></a><span class="lineno"> 2827</span>  }</div><div class="line"><a name="l02828"></a><span class="lineno"> 2828</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l02829"></a><span class="lineno"> 2829</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(klass) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3a7d10c48d5dff0a5d4aa94acb74811a">T_NIL</a>) {</div><div class="line"><a name="l02830"></a><span class="lineno"> 2830</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a714a0793c185ef6579d1db4f41c7dc2a">ole_const_load</a>(pTypeLib, klass, <span class="keyword">self</span>);</div><div class="line"><a name="l02831"></a><span class="lineno"> 2831</span>  }</div><div class="line"><a name="l02832"></a><span class="lineno"> 2832</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02833"></a><span class="lineno"> 2833</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a714a0793c185ef6579d1db4f41c7dc2a">ole_const_load</a>(pTypeLib, <a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="keyword">self</span>);</div><div class="line"><a name="l02834"></a><span class="lineno"> 2834</span>  }</div><div class="line"><a name="l02835"></a><span class="lineno"> 2835</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeLib);</div><div class="line"><a name="l02836"></a><span class="lineno"> 2836</span>  }</div><div class="line"><a name="l02837"></a><span class="lineno"> 2837</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(ole) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a>) {</div><div class="line"><a name="l02838"></a><span class="lineno"> 2838</span>  file = <a class="code" href="../../d2/d99/win32ole_8c.html#afe7b5c965ce1a10b205d15b8c47646d9">typelib_file</a>(ole);</div><div class="line"><a name="l02839"></a><span class="lineno"> 2839</span>  <span class="keywordflow">if</span> (file == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l02840"></a><span class="lineno"> 2840</span>  file = ole;</div><div class="line"><a name="l02841"></a><span class="lineno"> 2841</span>  }</div><div class="line"><a name="l02842"></a><span class="lineno"> 2842</span>  pBuf = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(file);</div><div class="line"><a name="l02843"></a><span class="lineno"> 2843</span>  hr = LoadTypeLibEx(pBuf, REGKIND_NONE, &pTypeLib);</div><div class="line"><a name="l02844"></a><span class="lineno"> 2844</span>  SysFreeString(pBuf);</div><div class="line"><a name="l02845"></a><span class="lineno"> 2845</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l02846"></a><span class="lineno"> 2846</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to LoadTypeLibEx"</span>);</div><div class="line"><a name="l02847"></a><span class="lineno"> 2847</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(klass) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3a7d10c48d5dff0a5d4aa94acb74811a">T_NIL</a>) {</div><div class="line"><a name="l02848"></a><span class="lineno"> 2848</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a714a0793c185ef6579d1db4f41c7dc2a">ole_const_load</a>(pTypeLib, klass, <span class="keyword">self</span>);</div><div class="line"><a name="l02849"></a><span class="lineno"> 2849</span>  }</div><div class="line"><a name="l02850"></a><span class="lineno"> 2850</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02851"></a><span class="lineno"> 2851</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a714a0793c185ef6579d1db4f41c7dc2a">ole_const_load</a>(pTypeLib, <a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="keyword">self</span>);</div><div class="line"><a name="l02852"></a><span class="lineno"> 2852</span>  }</div><div class="line"><a name="l02853"></a><span class="lineno"> 2853</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeLib);</div><div class="line"><a name="l02854"></a><span class="lineno"> 2854</span>  }</div><div class="line"><a name="l02855"></a><span class="lineno"> 2855</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l02856"></a><span class="lineno"> 2856</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"1st parameter must be WIN32OLE instance"</span>);</div><div class="line"><a name="l02857"></a><span class="lineno"> 2857</span>  }</div><div class="line"><a name="l02858"></a><span class="lineno"> 2858</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l02859"></a><span class="lineno"> 2859</span> }</div><div class="line"><a name="l02860"></a><span class="lineno"> 2860</span> </div><div class="line"><a name="l02861"></a><span class="lineno"> 2861</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02862"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a904af26931d02b6f49611a7201d3c9c1"> 2862</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a904af26931d02b6f49611a7201d3c9c1">ole_types_from_typelib</a>(ITypeLib *pTypeLib, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> classes)</div><div class="line"><a name="l02863"></a><span class="lineno"> 2863</span> {</div><div class="line"><a name="l02864"></a><span class="lineno"> 2864</span> </div><div class="line"><a name="l02865"></a><span class="lineno"> 2865</span>  <span class="keywordtype">long</span> <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>;</div><div class="line"><a name="l02866"></a><span class="lineno"> 2866</span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l02867"></a><span class="lineno"> 2867</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l02868"></a><span class="lineno"> 2868</span>  BSTR bstr;</div><div class="line"><a name="l02869"></a><span class="lineno"> 2869</span>  ITypeInfo *pTypeInfo;</div><div class="line"><a name="l02870"></a><span class="lineno"> 2870</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l02871"></a><span class="lineno"> 2871</span> </div><div class="line"><a name="l02872"></a><span class="lineno"> 2872</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a98b91af598acb64fe8497413ce498766">rb_secure</a>(4);</div><div class="line"><a name="l02873"></a><span class="lineno"> 2873</span>  <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a> = pTypeLib->lpVtbl->GetTypeInfoCount(pTypeLib);</div><div class="line"><a name="l02874"></a><span class="lineno"> 2874</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l02875"></a><span class="lineno"> 2875</span>  hr = pTypeLib->lpVtbl->GetDocumentation(pTypeLib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>,</div><div class="line"><a name="l02876"></a><span class="lineno"> 2876</span>  &bstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l02877"></a><span class="lineno"> 2877</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l02878"></a><span class="lineno"> 2878</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l02879"></a><span class="lineno"> 2879</span> </div><div class="line"><a name="l02880"></a><span class="lineno"> 2880</span>  hr = pTypeLib->lpVtbl->GetTypeInfo(pTypeLib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &pTypeInfo);</div><div class="line"><a name="l02881"></a><span class="lineno"> 2881</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l02882"></a><span class="lineno"> 2882</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l02883"></a><span class="lineno"> 2883</span> </div><div class="line"><a name="l02884"></a><span class="lineno"> 2884</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ac3ae981871b66fdb4efa0a05ad712256">foletype_s_allocate</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>);</div><div class="line"><a name="l02885"></a><span class="lineno"> 2885</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4ddfcdbb09e0396eab8089feb9923abd">oletype_set_member</a>(<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>, pTypeInfo, <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr));</div><div class="line"><a name="l02886"></a><span class="lineno"> 2886</span> </div><div class="line"><a name="l02887"></a><span class="lineno"> 2887</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(classes, <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>);</div><div class="line"><a name="l02888"></a><span class="lineno"> 2888</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l02889"></a><span class="lineno"> 2889</span>  }</div><div class="line"><a name="l02890"></a><span class="lineno"> 2890</span>  <span class="keywordflow">return</span> classes;</div><div class="line"><a name="l02891"></a><span class="lineno"> 2891</span> }</div><div class="line"><a name="l02892"></a><span class="lineno"> 2892</span> </div><div class="line"><a name="l02893"></a><span class="lineno"> 2893</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a></div><div class="line"><a name="l02894"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6cb22e9353278e4211435ac709a92a66"> 2894</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6cb22e9353278e4211435ac709a92a66">reference_count</a>(<span class="keyword">struct</span> <a class="code" href="../../d1/d03/structoledata.html">oledata</a> * pole)</div><div class="line"><a name="l02895"></a><span class="lineno"> 2895</span> {</div><div class="line"><a name="l02896"></a><span class="lineno"> 2896</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> n = 0;</div><div class="line"><a name="l02897"></a><span class="lineno"> 2897</span>  <span class="keywordflow">if</span>(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>) {</div><div class="line"><a name="l02898"></a><span class="lineno"> 2898</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5">OLE_ADDREF</a>(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>);</div><div class="line"><a name="l02899"></a><span class="lineno"> 2899</span>  n = <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>);</div><div class="line"><a name="l02900"></a><span class="lineno"> 2900</span>  }</div><div class="line"><a name="l02901"></a><span class="lineno"> 2901</span>  <span class="keywordflow">return</span> n;</div><div class="line"><a name="l02902"></a><span class="lineno"> 2902</span> }</div><div class="line"><a name="l02903"></a><span class="lineno"> 2903</span> </div><div class="line"><a name="l02904"></a><span class="lineno"> 2904</span> <span class="comment">/*</span></div><div class="line"><a name="l02905"></a><span class="lineno"> 2905</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l02906"></a><span class="lineno"> 2906</span> <span class="comment"> * WIN32OLE.ole_reference_count(aWIN32OLE) --> number</span></div><div class="line"><a name="l02907"></a><span class="lineno"> 2907</span> <span class="comment"> *</span></div><div class="line"><a name="l02908"></a><span class="lineno"> 2908</span> <span class="comment"> * Returns reference counter of Dispatch interface of WIN32OLE object.</span></div><div class="line"><a name="l02909"></a><span class="lineno"> 2909</span> <span class="comment"> * You should not use this method because this method</span></div><div class="line"><a name="l02910"></a><span class="lineno"> 2910</span> <span class="comment"> * exists only for debugging WIN32OLE.</span></div><div class="line"><a name="l02911"></a><span class="lineno"> 2911</span> <span class="comment"> */</span></div><div class="line"><a name="l02912"></a><span class="lineno"> 2912</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02913"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5f96c057db4987aa9d01f368539b1507"> 2913</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5f96c057db4987aa9d01f368539b1507">fole_s_reference_count</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj)</div><div class="line"><a name="l02914"></a><span class="lineno"> 2914</span> {</div><div class="line"><a name="l02915"></a><span class="lineno"> 2915</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> * pole;</div><div class="line"><a name="l02916"></a><span class="lineno"> 2916</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(obj, pole);</div><div class="line"><a name="l02917"></a><span class="lineno"> 2917</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a6cb22e9353278e4211435ac709a92a66">reference_count</a>(pole));</div><div class="line"><a name="l02918"></a><span class="lineno"> 2918</span> }</div><div class="line"><a name="l02919"></a><span class="lineno"> 2919</span> </div><div class="line"><a name="l02920"></a><span class="lineno"> 2920</span> <span class="comment">/*</span></div><div class="line"><a name="l02921"></a><span class="lineno"> 2921</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l02922"></a><span class="lineno"> 2922</span> <span class="comment"> * WIN32OLE.ole_free(aWIN32OLE) --> number</span></div><div class="line"><a name="l02923"></a><span class="lineno"> 2923</span> <span class="comment"> *</span></div><div class="line"><a name="l02924"></a><span class="lineno"> 2924</span> <span class="comment"> * Invokes Release method of Dispatch interface of WIN32OLE object.</span></div><div class="line"><a name="l02925"></a><span class="lineno"> 2925</span> <span class="comment"> * You should not use this method because this method</span></div><div class="line"><a name="l02926"></a><span class="lineno"> 2926</span> <span class="comment"> * exists only for debugging WIN32OLE.</span></div><div class="line"><a name="l02927"></a><span class="lineno"> 2927</span> <span class="comment"> * The return value is reference counter of OLE object.</span></div><div class="line"><a name="l02928"></a><span class="lineno"> 2928</span> <span class="comment"> */</span></div><div class="line"><a name="l02929"></a><span class="lineno"> 2929</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02930"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aaed28da1a2098bc9ce356c985343e7e2"> 2930</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aaed28da1a2098bc9ce356c985343e7e2">fole_s_free</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj)</div><div class="line"><a name="l02931"></a><span class="lineno"> 2931</span> {</div><div class="line"><a name="l02932"></a><span class="lineno"> 2932</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a> n = 0;</div><div class="line"><a name="l02933"></a><span class="lineno"> 2933</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> * pole;</div><div class="line"><a name="l02934"></a><span class="lineno"> 2934</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(obj, pole);</div><div class="line"><a name="l02935"></a><span class="lineno"> 2935</span>  <span class="keywordflow">if</span>(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>) {</div><div class="line"><a name="l02936"></a><span class="lineno"> 2936</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a6cb22e9353278e4211435ac709a92a66">reference_count</a>(pole) > 0) {</div><div class="line"><a name="l02937"></a><span class="lineno"> 2937</span>  n = <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>);</div><div class="line"><a name="l02938"></a><span class="lineno"> 2938</span>  }</div><div class="line"><a name="l02939"></a><span class="lineno"> 2939</span>  }</div><div class="line"><a name="l02940"></a><span class="lineno"> 2940</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>(n);</div><div class="line"><a name="l02941"></a><span class="lineno"> 2941</span> }</div><div class="line"><a name="l02942"></a><span class="lineno"> 2942</span> </div><div class="line"><a name="l02943"></a><span class="lineno"> 2943</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a166bbd1a777de2ab0652286ee16e3268">HWND</a></div><div class="line"><a name="l02944"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a450345b808e7fd3597b3bebe5340ea59"> 2944</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a450345b808e7fd3597b3bebe5340ea59">ole_show_help</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> helpfile, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> helpcontext)</div><div class="line"><a name="l02945"></a><span class="lineno"> 2945</span> {</div><div class="line"><a name="l02946"></a><span class="lineno"> 2946</span>  FNHTMLHELP *pfnHtmlHelp;</div><div class="line"><a name="l02947"></a><span class="lineno"> 2947</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a166bbd1a777de2ab0652286ee16e3268">HWND</a> hwnd = 0;</div><div class="line"><a name="l02948"></a><span class="lineno"> 2948</span> </div><div class="line"><a name="l02949"></a><span class="lineno"> 2949</span>  <span class="keywordflow">if</span>(!<a class="code" href="../../d2/d99/win32ole_8c.html#a78f7f599a5e13fe2d10c0b27961fa49b">ghhctrl</a>)</div><div class="line"><a name="l02950"></a><span class="lineno"> 2950</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a78f7f599a5e13fe2d10c0b27961fa49b">ghhctrl</a> = LoadLibrary(<span class="stringliteral">"HHCTRL.OCX"</span>);</div><div class="line"><a name="l02951"></a><span class="lineno"> 2951</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d2/d99/win32ole_8c.html#a78f7f599a5e13fe2d10c0b27961fa49b">ghhctrl</a>)</div><div class="line"><a name="l02952"></a><span class="lineno"> 2952</span>  <span class="keywordflow">return</span> hwnd;</div><div class="line"><a name="l02953"></a><span class="lineno"> 2953</span>  pfnHtmlHelp = (FNHTMLHELP*)GetProcAddress(<a class="code" href="../../d2/d99/win32ole_8c.html#a78f7f599a5e13fe2d10c0b27961fa49b">ghhctrl</a>, <span class="stringliteral">"HtmlHelpA"</span>);</div><div class="line"><a name="l02954"></a><span class="lineno"> 2954</span>  <span class="keywordflow">if</span> (!pfnHtmlHelp)</div><div class="line"><a name="l02955"></a><span class="lineno"> 2955</span>  <span class="keywordflow">return</span> hwnd;</div><div class="line"><a name="l02956"></a><span class="lineno"> 2956</span>  hwnd = pfnHtmlHelp(GetDesktopWindow(), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(helpfile),</div><div class="line"><a name="l02957"></a><span class="lineno"> 2957</span>  0x0f, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(helpcontext));</div><div class="line"><a name="l02958"></a><span class="lineno"> 2958</span>  <span class="keywordflow">if</span> (hwnd == 0)</div><div class="line"><a name="l02959"></a><span class="lineno"> 2959</span>  hwnd = pfnHtmlHelp(GetDesktopWindow(), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(helpfile),</div><div class="line"><a name="l02960"></a><span class="lineno"> 2960</span>  0, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(helpcontext));</div><div class="line"><a name="l02961"></a><span class="lineno"> 2961</span>  <span class="keywordflow">return</span> hwnd;</div><div class="line"><a name="l02962"></a><span class="lineno"> 2962</span> }</div><div class="line"><a name="l02963"></a><span class="lineno"> 2963</span> </div><div class="line"><a name="l02964"></a><span class="lineno"> 2964</span> <span class="comment">/*</span></div><div class="line"><a name="l02965"></a><span class="lineno"> 2965</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l02966"></a><span class="lineno"> 2966</span> <span class="comment"> * WIN32OLE.ole_show_help(obj [,helpcontext])</span></div><div class="line"><a name="l02967"></a><span class="lineno"> 2967</span> <span class="comment"> *</span></div><div class="line"><a name="l02968"></a><span class="lineno"> 2968</span> <span class="comment"> * Displays helpfile. The 1st argument specifies WIN32OLE_TYPE</span></div><div class="line"><a name="l02969"></a><span class="lineno"> 2969</span> <span class="comment"> * object or WIN32OLE_METHOD object or helpfile.</span></div><div class="line"><a name="l02970"></a><span class="lineno"> 2970</span> <span class="comment"> *</span></div><div class="line"><a name="l02971"></a><span class="lineno"> 2971</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l02972"></a><span class="lineno"> 2972</span> <span class="comment"> * typeobj = excel.ole_type</span></div><div class="line"><a name="l02973"></a><span class="lineno"> 2973</span> <span class="comment"> * WIN32OLE.ole_show_help(typeobj)</span></div><div class="line"><a name="l02974"></a><span class="lineno"> 2974</span> <span class="comment"> */</span></div><div class="line"><a name="l02975"></a><span class="lineno"> 2975</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l02976"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a71d23fe98f21177991723bbbd03b6875"> 2976</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a71d23fe98f21177991723bbbd03b6875">fole_s_show_help</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l02977"></a><span class="lineno"> 2977</span> {</div><div class="line"><a name="l02978"></a><span class="lineno"> 2978</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> target;</div><div class="line"><a name="l02979"></a><span class="lineno"> 2979</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> helpcontext;</div><div class="line"><a name="l02980"></a><span class="lineno"> 2980</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> helpfile;</div><div class="line"><a name="l02981"></a><span class="lineno"> 2981</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>;</div><div class="line"><a name="l02982"></a><span class="lineno"> 2982</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a166bbd1a777de2ab0652286ee16e3268">HWND</a> hwnd;</div><div class="line"><a name="l02983"></a><span class="lineno"> 2983</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="stringliteral">"11"</span>, &target, &helpcontext);</div><div class="line"><a name="l02984"></a><span class="lineno"> 2984</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(target, <a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>) ||</div><div class="line"><a name="l02985"></a><span class="lineno"> 2985</span>  <a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(target, <a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>)) {</div><div class="line"><a name="l02986"></a><span class="lineno"> 2986</span>  helpfile = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(target, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"helpfile"</span>), 0);</div><div class="line"><a name="l02987"></a><span class="lineno"> 2987</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(helpfile)) == 0) {</div><div class="line"><a name="l02988"></a><span class="lineno"> 2988</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a> = <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(target, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>));</div><div class="line"><a name="l02989"></a><span class="lineno"> 2989</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"no helpfile of `%s'"</span>,</div><div class="line"><a name="l02990"></a><span class="lineno"> 2990</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>));</div><div class="line"><a name="l02991"></a><span class="lineno"> 2991</span>  }</div><div class="line"><a name="l02992"></a><span class="lineno"> 2992</span>  helpcontext = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(target, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"helpcontext"</span>), 0);</div><div class="line"><a name="l02993"></a><span class="lineno"> 2993</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l02994"></a><span class="lineno"> 2994</span>  helpfile = target;</div><div class="line"><a name="l02995"></a><span class="lineno"> 2995</span>  }</div><div class="line"><a name="l02996"></a><span class="lineno"> 2996</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(helpfile) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a>) {</div><div class="line"><a name="l02997"></a><span class="lineno"> 2997</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"1st parameter must be (String|WIN32OLE_TYPE|WIN32OLE_METHOD)"</span>);</div><div class="line"><a name="l02998"></a><span class="lineno"> 2998</span>  }</div><div class="line"><a name="l02999"></a><span class="lineno"> 2999</span>  hwnd = <a class="code" href="../../d2/d99/win32ole_8c.html#a450345b808e7fd3597b3bebe5340ea59">ole_show_help</a>(helpfile, helpcontext);</div><div class="line"><a name="l03000"></a><span class="lineno"> 3000</span>  <span class="keywordflow">if</span>(hwnd == 0) {</div><div class="line"><a name="l03001"></a><span class="lineno"> 3001</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to open help file `%s'"</span>,</div><div class="line"><a name="l03002"></a><span class="lineno"> 3002</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(helpfile));</div><div class="line"><a name="l03003"></a><span class="lineno"> 3003</span>  }</div><div class="line"><a name="l03004"></a><span class="lineno"> 3004</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03005"></a><span class="lineno"> 3005</span> }</div><div class="line"><a name="l03006"></a><span class="lineno"> 3006</span> </div><div class="line"><a name="l03007"></a><span class="lineno"> 3007</span> <span class="comment">/*</span></div><div class="line"><a name="l03008"></a><span class="lineno"> 3008</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03009"></a><span class="lineno"> 3009</span> <span class="comment"> * WIN32OLE.codepage</span></div><div class="line"><a name="l03010"></a><span class="lineno"> 3010</span> <span class="comment"> *</span></div><div class="line"><a name="l03011"></a><span class="lineno"> 3011</span> <span class="comment"> * Returns current codepage.</span></div><div class="line"><a name="l03012"></a><span class="lineno"> 3012</span> <span class="comment"> * WIN32OLE.codepage # => WIN32OLE::CP_ACP</span></div><div class="line"><a name="l03013"></a><span class="lineno"> 3013</span> <span class="comment"> */</span></div><div class="line"><a name="l03014"></a><span class="lineno"> 3014</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03015"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a46e95b41258862662f5e02173c154a7a"> 3015</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a46e95b41258862662f5e02173c154a7a">fole_s_get_code_page</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03016"></a><span class="lineno"> 3016</span> {</div><div class="line"><a name="l03017"></a><span class="lineno"> 3017</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a>);</div><div class="line"><a name="l03018"></a><span class="lineno"> 3018</span> }</div><div class="line"><a name="l03019"></a><span class="lineno"> 3019</span> </div><div class="line"><a name="l03020"></a><span class="lineno"> 3020</span> <span class="keyword">static</span> BOOL CALLBACK</div><div class="line"><a name="l03021"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a4d49078fb540aae74273a6b66d3d9f34"> 3021</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4d49078fb540aae74273a6b66d3d9f34">installed_code_page_proc</a>(LPTSTR str) {</div><div class="line"><a name="l03022"></a><span class="lineno"> 3022</span>  <span class="keywordflow">if</span> (strtoul(str, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, 10) == <a class="code" href="../../d2/d99/win32ole_8c.html#af35c14e43de709d8f72501c8b73300a6">g_cp_to_check</a>) {</div><div class="line"><a name="l03023"></a><span class="lineno"> 3023</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad29426bf12565d8dea6e3f00828e8aa8">g_cp_installed</a> = <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l03024"></a><span class="lineno"> 3024</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l03025"></a><span class="lineno"> 3025</span>  }</div><div class="line"><a name="l03026"></a><span class="lineno"> 3026</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l03027"></a><span class="lineno"> 3027</span> }</div><div class="line"><a name="l03028"></a><span class="lineno"> 3028</span> </div><div class="line"><a name="l03029"></a><span class="lineno"> 3029</span> <span class="keyword">static</span> BOOL</div><div class="line"><a name="l03030"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a38c94372747cca7b01ac64e76f941a2c"> 3030</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a38c94372747cca7b01ac64e76f941a2c">code_page_installed</a>(UINT cp)</div><div class="line"><a name="l03031"></a><span class="lineno"> 3031</span> {</div><div class="line"><a name="l03032"></a><span class="lineno"> 3032</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad29426bf12565d8dea6e3f00828e8aa8">g_cp_installed</a> = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l03033"></a><span class="lineno"> 3033</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#af35c14e43de709d8f72501c8b73300a6">g_cp_to_check</a> = cp;</div><div class="line"><a name="l03034"></a><span class="lineno"> 3034</span>  EnumSystemCodePages(<a class="code" href="../../d2/d99/win32ole_8c.html#a4d49078fb540aae74273a6b66d3d9f34">installed_code_page_proc</a>, CP_INSTALLED);</div><div class="line"><a name="l03035"></a><span class="lineno"> 3035</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad29426bf12565d8dea6e3f00828e8aa8">g_cp_installed</a>;</div><div class="line"><a name="l03036"></a><span class="lineno"> 3036</span> }</div><div class="line"><a name="l03037"></a><span class="lineno"> 3037</span> </div><div class="line"><a name="l03038"></a><span class="lineno"> 3038</span> <span class="comment">/*</span></div><div class="line"><a name="l03039"></a><span class="lineno"> 3039</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03040"></a><span class="lineno"> 3040</span> <span class="comment"> * WIN32OLE.codepage = CP</span></div><div class="line"><a name="l03041"></a><span class="lineno"> 3041</span> <span class="comment"> *</span></div><div class="line"><a name="l03042"></a><span class="lineno"> 3042</span> <span class="comment"> * Sets current codepage.</span></div><div class="line"><a name="l03043"></a><span class="lineno"> 3043</span> <span class="comment"> * The WIN32OLE.codepage is initialized according to</span></div><div class="line"><a name="l03044"></a><span class="lineno"> 3044</span> <span class="comment"> * Encoding.default_internal.</span></div><div class="line"><a name="l03045"></a><span class="lineno"> 3045</span> <span class="comment"> * If Encoding.default_internal is nil then WIN32OLE.codepage</span></div><div class="line"><a name="l03046"></a><span class="lineno"> 3046</span> <span class="comment"> * is initialized according to Encoding.default_external.</span></div><div class="line"><a name="l03047"></a><span class="lineno"> 3047</span> <span class="comment"> *</span></div><div class="line"><a name="l03048"></a><span class="lineno"> 3048</span> <span class="comment"> * WIN32OLE.codepage = WIN32OLE::CP_UTF8</span></div><div class="line"><a name="l03049"></a><span class="lineno"> 3049</span> <span class="comment"> * WIN32OLE.codepage = 65001</span></div><div class="line"><a name="l03050"></a><span class="lineno"> 3050</span> <span class="comment"> */</span></div><div class="line"><a name="l03051"></a><span class="lineno"> 3051</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03052"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac2cadf7c61871ef6c7d630762d3ca09d"> 3052</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac2cadf7c61871ef6c7d630762d3ca09d">fole_s_set_code_page</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vcp)</div><div class="line"><a name="l03053"></a><span class="lineno"> 3053</span> {</div><div class="line"><a name="l03054"></a><span class="lineno"> 3054</span>  UINT cp = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(vcp);</div><div class="line"><a name="l03055"></a><span class="lineno"> 3055</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a1335e192faf93015dc32985436d60f7e">set_ole_codepage</a>(cp);</div><div class="line"><a name="l03056"></a><span class="lineno"> 3056</span>  <span class="comment">/*</span></div><div class="line"><a name="l03057"></a><span class="lineno"> 3057</span> <span class="comment"> * Should this method return old codepage?</span></div><div class="line"><a name="l03058"></a><span class="lineno"> 3058</span> <span class="comment"> */</span></div><div class="line"><a name="l03059"></a><span class="lineno"> 3059</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03060"></a><span class="lineno"> 3060</span> }</div><div class="line"><a name="l03061"></a><span class="lineno"> 3061</span> </div><div class="line"><a name="l03062"></a><span class="lineno"> 3062</span> <span class="comment">/*</span></div><div class="line"><a name="l03063"></a><span class="lineno"> 3063</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03064"></a><span class="lineno"> 3064</span> <span class="comment"> * WIN32OLE.locale -> locale id.</span></div><div class="line"><a name="l03065"></a><span class="lineno"> 3065</span> <span class="comment"> *</span></div><div class="line"><a name="l03066"></a><span class="lineno"> 3066</span> <span class="comment"> * Returns current locale id (lcid). The default locale is</span></div><div class="line"><a name="l03067"></a><span class="lineno"> 3067</span> <span class="comment"> * LOCALE_SYSTEM_DEFAULT.</span></div><div class="line"><a name="l03068"></a><span class="lineno"> 3068</span> <span class="comment"> *</span></div><div class="line"><a name="l03069"></a><span class="lineno"> 3069</span> <span class="comment"> * lcid = WIN32OLE.locale</span></div><div class="line"><a name="l03070"></a><span class="lineno"> 3070</span> <span class="comment"> */</span></div><div class="line"><a name="l03071"></a><span class="lineno"> 3071</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03072"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3a0d9cd7ac70636cff4bfc3a398f9349"> 3072</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a0d9cd7ac70636cff4bfc3a398f9349">fole_s_get_locale</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03073"></a><span class="lineno"> 3073</span> {</div><div class="line"><a name="l03074"></a><span class="lineno"> 3074</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>);</div><div class="line"><a name="l03075"></a><span class="lineno"> 3075</span> }</div><div class="line"><a name="l03076"></a><span class="lineno"> 3076</span> </div><div class="line"><a name="l03077"></a><span class="lineno"> 3077</span> <span class="keyword">static</span> BOOL</div><div class="line"><a name="l03078"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3793b5d66c90dc1df5ebfb9f070d917e"> 3078</a></span> CALLBACK <a class="code" href="../../d2/d99/win32ole_8c.html#a3793b5d66c90dc1df5ebfb9f070d917e">installed_lcid_proc</a>(LPTSTR str)</div><div class="line"><a name="l03079"></a><span class="lineno"> 3079</span> {</div><div class="line"><a name="l03080"></a><span class="lineno"> 3080</span>  <span class="keywordflow">if</span> (strcmp(str, <a class="code" href="../../d2/d99/win32ole_8c.html#aa5b58331878760e9f4974a618fa4f35b">g_lcid_to_check</a>) == 0) {</div><div class="line"><a name="l03081"></a><span class="lineno"> 3081</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad86ed24d2a7324b1bb5474f6f0782812">g_lcid_installed</a> = <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l03082"></a><span class="lineno"> 3082</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l03083"></a><span class="lineno"> 3083</span>  }</div><div class="line"><a name="l03084"></a><span class="lineno"> 3084</span>  <span class="keywordflow">return</span> <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l03085"></a><span class="lineno"> 3085</span> }</div><div class="line"><a name="l03086"></a><span class="lineno"> 3086</span> </div><div class="line"><a name="l03087"></a><span class="lineno"> 3087</span> <span class="keyword">static</span> BOOL</div><div class="line"><a name="l03088"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3c3f3d4c55344453eeb66c7c0fbc0aec"> 3088</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3c3f3d4c55344453eeb66c7c0fbc0aec">lcid_installed</a>(LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>)</div><div class="line"><a name="l03089"></a><span class="lineno"> 3089</span> {</div><div class="line"><a name="l03090"></a><span class="lineno"> 3090</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad86ed24d2a7324b1bb5474f6f0782812">g_lcid_installed</a> = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l03091"></a><span class="lineno"> 3091</span>  <a class="code" href="../../d7/d72/subst_8h.html#aa367b75c5aed883fef5befbdf04835a4">snprintf</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5b58331878760e9f4974a618fa4f35b">g_lcid_to_check</a>, <span class="keyword">sizeof</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5b58331878760e9f4974a618fa4f35b">g_lcid_to_check</a>), <span class="stringliteral">"%08lx"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>);</div><div class="line"><a name="l03092"></a><span class="lineno"> 3092</span>  EnumSystemLocales(<a class="code" href="../../d2/d99/win32ole_8c.html#a3793b5d66c90dc1df5ebfb9f070d917e">installed_lcid_proc</a>, LCID_INSTALLED);</div><div class="line"><a name="l03093"></a><span class="lineno"> 3093</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad86ed24d2a7324b1bb5474f6f0782812">g_lcid_installed</a>;</div><div class="line"><a name="l03094"></a><span class="lineno"> 3094</span> }</div><div class="line"><a name="l03095"></a><span class="lineno"> 3095</span> </div><div class="line"><a name="l03096"></a><span class="lineno"> 3096</span> <span class="comment">/*</span></div><div class="line"><a name="l03097"></a><span class="lineno"> 3097</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03098"></a><span class="lineno"> 3098</span> <span class="comment"> * WIN32OLE.locale = lcid</span></div><div class="line"><a name="l03099"></a><span class="lineno"> 3099</span> <span class="comment"> *</span></div><div class="line"><a name="l03100"></a><span class="lineno"> 3100</span> <span class="comment"> * Sets current locale id (lcid).</span></div><div class="line"><a name="l03101"></a><span class="lineno"> 3101</span> <span class="comment"> *</span></div><div class="line"><a name="l03102"></a><span class="lineno"> 3102</span> <span class="comment"> * WIN32OLE.locale = 1033 # set locale English(U.S)</span></div><div class="line"><a name="l03103"></a><span class="lineno"> 3103</span> <span class="comment"> * obj = WIN32OLE_VARIANT.new("$100,000", WIN32OLE::VARIANT::VT_CY)</span></div><div class="line"><a name="l03104"></a><span class="lineno"> 3104</span> <span class="comment"> *</span></div><div class="line"><a name="l03105"></a><span class="lineno"> 3105</span> <span class="comment"> */</span></div><div class="line"><a name="l03106"></a><span class="lineno"> 3106</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03107"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac0a9f64129d5836fc8f9b0195ca478ec"> 3107</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac0a9f64129d5836fc8f9b0195ca478ec">fole_s_set_locale</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vlcid)</div><div class="line"><a name="l03108"></a><span class="lineno"> 3108</span> {</div><div class="line"><a name="l03109"></a><span class="lineno"> 3109</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(vlcid);</div><div class="line"><a name="l03110"></a><span class="lineno"> 3110</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a3c3f3d4c55344453eeb66c7c0fbc0aec">lcid_installed</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>)) {</div><div class="line"><a name="l03111"></a><span class="lineno"> 3111</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>;</div><div class="line"><a name="l03112"></a><span class="lineno"> 3112</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l03113"></a><span class="lineno"> 3113</span>  <span class="keywordflow">switch</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>) {</div><div class="line"><a name="l03114"></a><span class="lineno"> 3114</span>  <span class="keywordflow">case</span> LOCALE_SYSTEM_DEFAULT:</div><div class="line"><a name="l03115"></a><span class="lineno"> 3115</span>  <span class="keywordflow">case</span> LOCALE_USER_DEFAULT:</div><div class="line"><a name="l03116"></a><span class="lineno"> 3116</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>;</div><div class="line"><a name="l03117"></a><span class="lineno"> 3117</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03118"></a><span class="lineno"> 3118</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l03119"></a><span class="lineno"> 3119</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"not installed locale: %u"</span>, (<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span>)<a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>);</div><div class="line"><a name="l03120"></a><span class="lineno"> 3120</span>  }</div><div class="line"><a name="l03121"></a><span class="lineno"> 3121</span>  }</div><div class="line"><a name="l03122"></a><span class="lineno"> 3122</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03123"></a><span class="lineno"> 3123</span> }</div><div class="line"><a name="l03124"></a><span class="lineno"> 3124</span> </div><div class="line"><a name="l03125"></a><span class="lineno"> 3125</span> <span class="comment">/*</span></div><div class="line"><a name="l03126"></a><span class="lineno"> 3126</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03127"></a><span class="lineno"> 3127</span> <span class="comment"> * WIN32OLE.create_guid</span></div><div class="line"><a name="l03128"></a><span class="lineno"> 3128</span> <span class="comment"> *</span></div><div class="line"><a name="l03129"></a><span class="lineno"> 3129</span> <span class="comment"> * Creates GUID.</span></div><div class="line"><a name="l03130"></a><span class="lineno"> 3130</span> <span class="comment"> * WIN32OLE.create_guid # => {1CB530F1-F6B1-404D-BCE6-1959BF91F4A8}</span></div><div class="line"><a name="l03131"></a><span class="lineno"> 3131</span> <span class="comment"> */</span></div><div class="line"><a name="l03132"></a><span class="lineno"> 3132</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03133"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9ac8207bb0ee9c5e02c8a012cc00d4e2"> 3133</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a9ac8207bb0ee9c5e02c8a012cc00d4e2">fole_s_create_guid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03134"></a><span class="lineno"> 3134</span> {</div><div class="line"><a name="l03135"></a><span class="lineno"> 3135</span>  GUID guid;</div><div class="line"><a name="l03136"></a><span class="lineno"> 3136</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l03137"></a><span class="lineno"> 3137</span>  OLECHAR bstr[80];</div><div class="line"><a name="l03138"></a><span class="lineno"> 3138</span>  <span class="keywordtype">int</span> len = 0;</div><div class="line"><a name="l03139"></a><span class="lineno"> 3139</span>  hr = CoCreateGuid(&guid);</div><div class="line"><a name="l03140"></a><span class="lineno"> 3140</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l03141"></a><span class="lineno"> 3141</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to create GUID"</span>);</div><div class="line"><a name="l03142"></a><span class="lineno"> 3142</span>  }</div><div class="line"><a name="l03143"></a><span class="lineno"> 3143</span>  len = StringFromGUID2(&guid, bstr, <span class="keyword">sizeof</span>(bstr)/<span class="keyword">sizeof</span>(OLECHAR));</div><div class="line"><a name="l03144"></a><span class="lineno"> 3144</span>  <span class="keywordflow">if</span> (len == 0) {</div><div class="line"><a name="l03145"></a><span class="lineno"> 3145</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to create GUID(buffer over)"</span>);</div><div class="line"><a name="l03146"></a><span class="lineno"> 3146</span>  }</div><div class="line"><a name="l03147"></a><span class="lineno"> 3147</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6">ole_wc2vstr</a>(bstr, <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l03148"></a><span class="lineno"> 3148</span> }</div><div class="line"><a name="l03149"></a><span class="lineno"> 3149</span> </div><div class="line"><a name="l03150"></a><span class="lineno"> 3150</span> <span class="comment">/*</span></div><div class="line"><a name="l03151"></a><span class="lineno"> 3151</span> <span class="comment"> * WIN32OLE.ole_initialize and WIN32OLE.ole_uninitialize</span></div><div class="line"><a name="l03152"></a><span class="lineno"> 3152</span> <span class="comment"> * are used in win32ole.rb to fix the issue bug #2618 (ruby-core:27634).</span></div><div class="line"><a name="l03153"></a><span class="lineno"> 3153</span> <span class="comment"> * You must not use thease method.</span></div><div class="line"><a name="l03154"></a><span class="lineno"> 3154</span> <span class="comment"> */</span></div><div class="line"><a name="l03155"></a><span class="lineno"> 3155</span> </div><div class="line"><a name="l03156"></a><span class="lineno"> 3156</span> <span class="comment">/* :nodoc */</span></div><div class="line"><a name="l03157"></a><span class="lineno"> 3157</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03158"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a711bebed75d5dbef9317d46792aa8255"> 3158</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a711bebed75d5dbef9317d46792aa8255">fole_s_ole_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03159"></a><span class="lineno"> 3159</span> {</div><div class="line"><a name="l03160"></a><span class="lineno"> 3160</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a>();</div><div class="line"><a name="l03161"></a><span class="lineno"> 3161</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03162"></a><span class="lineno"> 3162</span> }</div><div class="line"><a name="l03163"></a><span class="lineno"> 3163</span> </div><div class="line"><a name="l03164"></a><span class="lineno"> 3164</span> <span class="comment">/* :nodoc */</span></div><div class="line"><a name="l03165"></a><span class="lineno"> 3165</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03166"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a197b9a7e0b15c57cddf36d7950572b1a"> 3166</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a197b9a7e0b15c57cddf36d7950572b1a">fole_s_ole_uninitialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03167"></a><span class="lineno"> 3167</span> {</div><div class="line"><a name="l03168"></a><span class="lineno"> 3168</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3e5e3cd75e1b8e8ca190dc84b7a232e4">ole_uninitialize</a>();</div><div class="line"><a name="l03169"></a><span class="lineno"> 3169</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03170"></a><span class="lineno"> 3170</span> }</div><div class="line"><a name="l03171"></a><span class="lineno"> 3171</span> </div><div class="line"><a name="l03172"></a><span class="lineno"> 3172</span> <span class="comment">/*</span></div><div class="line"><a name="l03173"></a><span class="lineno"> 3173</span> <span class="comment"> * Document-class: WIN32OLE</span></div><div class="line"><a name="l03174"></a><span class="lineno"> 3174</span> <span class="comment"> *</span></div><div class="line"><a name="l03175"></a><span class="lineno"> 3175</span> <span class="comment"> * <code>WIN32OLE</code> objects represent OLE Automation object in Ruby.</span></div><div class="line"><a name="l03176"></a><span class="lineno"> 3176</span> <span class="comment"> *</span></div><div class="line"><a name="l03177"></a><span class="lineno"> 3177</span> <span class="comment"> * By using WIN32OLE, you can access OLE server like VBScript.</span></div><div class="line"><a name="l03178"></a><span class="lineno"> 3178</span> <span class="comment"> *</span></div><div class="line"><a name="l03179"></a><span class="lineno"> 3179</span> <span class="comment"> * Here is sample script.</span></div><div class="line"><a name="l03180"></a><span class="lineno"> 3180</span> <span class="comment"> *</span></div><div class="line"><a name="l03181"></a><span class="lineno"> 3181</span> <span class="comment"> * require 'win32ole'</span></div><div class="line"><a name="l03182"></a><span class="lineno"> 3182</span> <span class="comment"> *</span></div><div class="line"><a name="l03183"></a><span class="lineno"> 3183</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l03184"></a><span class="lineno"> 3184</span> <span class="comment"> * excel.visible = true</span></div><div class="line"><a name="l03185"></a><span class="lineno"> 3185</span> <span class="comment"> * workbook = excel.Workbooks.Add();</span></div><div class="line"><a name="l03186"></a><span class="lineno"> 3186</span> <span class="comment"> * worksheet = workbook.Worksheets(1);</span></div><div class="line"><a name="l03187"></a><span class="lineno"> 3187</span> <span class="comment"> * worksheet.Range("A1:D1").value = ["North","South","East","West"];</span></div><div class="line"><a name="l03188"></a><span class="lineno"> 3188</span> <span class="comment"> * worksheet.Range("A2:B2").value = [5.2, 10];</span></div><div class="line"><a name="l03189"></a><span class="lineno"> 3189</span> <span class="comment"> * worksheet.Range("C2").value = 8;</span></div><div class="line"><a name="l03190"></a><span class="lineno"> 3190</span> <span class="comment"> * worksheet.Range("D2").value = 20;</span></div><div class="line"><a name="l03191"></a><span class="lineno"> 3191</span> <span class="comment"> *</span></div><div class="line"><a name="l03192"></a><span class="lineno"> 3192</span> <span class="comment"> * range = worksheet.Range("A1:D2");</span></div><div class="line"><a name="l03193"></a><span class="lineno"> 3193</span> <span class="comment"> * range.select</span></div><div class="line"><a name="l03194"></a><span class="lineno"> 3194</span> <span class="comment"> * chart = workbook.Charts.Add;</span></div><div class="line"><a name="l03195"></a><span class="lineno"> 3195</span> <span class="comment"> *</span></div><div class="line"><a name="l03196"></a><span class="lineno"> 3196</span> <span class="comment"> * workbook.saved = true;</span></div><div class="line"><a name="l03197"></a><span class="lineno"> 3197</span> <span class="comment"> *</span></div><div class="line"><a name="l03198"></a><span class="lineno"> 3198</span> <span class="comment"> * excel.ActiveWorkbook.Close(0);</span></div><div class="line"><a name="l03199"></a><span class="lineno"> 3199</span> <span class="comment"> * excel.Quit();</span></div><div class="line"><a name="l03200"></a><span class="lineno"> 3200</span> <span class="comment"> *</span></div><div class="line"><a name="l03201"></a><span class="lineno"> 3201</span> <span class="comment"> * Unfortunately, Win32OLE doesn't support the argument passed by</span></div><div class="line"><a name="l03202"></a><span class="lineno"> 3202</span> <span class="comment"> * reference directly.</span></div><div class="line"><a name="l03203"></a><span class="lineno"> 3203</span> <span class="comment"> * Instead, Win32OLE provides WIN32OLE::ARGV.</span></div><div class="line"><a name="l03204"></a><span class="lineno"> 3204</span> <span class="comment"> * If you want to get the result value of argument passed by reference,</span></div><div class="line"><a name="l03205"></a><span class="lineno"> 3205</span> <span class="comment"> * you can use WIN32OLE::ARGV.</span></div><div class="line"><a name="l03206"></a><span class="lineno"> 3206</span> <span class="comment"> *</span></div><div class="line"><a name="l03207"></a><span class="lineno"> 3207</span> <span class="comment"> * oleobj.method(arg1, arg2, refargv3)</span></div><div class="line"><a name="l03208"></a><span class="lineno"> 3208</span> <span class="comment"> * puts WIN32OLE::ARGV[2] # the value of refargv3 after called oleobj.method</span></div><div class="line"><a name="l03209"></a><span class="lineno"> 3209</span> <span class="comment"> *</span></div><div class="line"><a name="l03210"></a><span class="lineno"> 3210</span> <span class="comment"> */</span></div><div class="line"><a name="l03211"></a><span class="lineno"> 3211</span> </div><div class="line"><a name="l03212"></a><span class="lineno"> 3212</span> <span class="comment">/*</span></div><div class="line"><a name="l03213"></a><span class="lineno"> 3213</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03214"></a><span class="lineno"> 3214</span> <span class="comment"> * WIN32OLE.new(server, [host]) -> WIN32OLE object</span></div><div class="line"><a name="l03215"></a><span class="lineno"> 3215</span> <span class="comment"> *</span></div><div class="line"><a name="l03216"></a><span class="lineno"> 3216</span> <span class="comment"> * Returns a new WIN32OLE object(OLE Automation object).</span></div><div class="line"><a name="l03217"></a><span class="lineno"> 3217</span> <span class="comment"> * The first argument server specifies OLE Automation server.</span></div><div class="line"><a name="l03218"></a><span class="lineno"> 3218</span> <span class="comment"> * The first argument should be CLSID or PROGID.</span></div><div class="line"><a name="l03219"></a><span class="lineno"> 3219</span> <span class="comment"> * If second argument host specified, then returns OLE Automation</span></div><div class="line"><a name="l03220"></a><span class="lineno"> 3220</span> <span class="comment"> * object on host.</span></div><div class="line"><a name="l03221"></a><span class="lineno"> 3221</span> <span class="comment"> *</span></div><div class="line"><a name="l03222"></a><span class="lineno"> 3222</span> <span class="comment"> * WIN32OLE.new('Excel.Application') # => Excel OLE Automation WIN32OLE object.</span></div><div class="line"><a name="l03223"></a><span class="lineno"> 3223</span> <span class="comment"> * WIN32OLE.new('{00024500-0000-0000-C000-000000000046}') # => Excel OLE Automation WIN32OLE object.</span></div><div class="line"><a name="l03224"></a><span class="lineno"> 3224</span> <span class="comment"> */</span></div><div class="line"><a name="l03225"></a><span class="lineno"> 3225</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03226"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7f8945d4358f512f72dcfc6a0298bd1c"> 3226</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7f8945d4358f512f72dcfc6a0298bd1c">fole_initialize</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03227"></a><span class="lineno"> 3227</span> {</div><div class="line"><a name="l03228"></a><span class="lineno"> 3228</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> svr_name;</div><div class="line"><a name="l03229"></a><span class="lineno"> 3229</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> host;</div><div class="line"><a name="l03230"></a><span class="lineno"> 3230</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> others;</div><div class="line"><a name="l03231"></a><span class="lineno"> 3231</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l03232"></a><span class="lineno"> 3232</span>  CLSID clsid;</div><div class="line"><a name="l03233"></a><span class="lineno"> 3233</span>  OLECHAR *pBuf;</div><div class="line"><a name="l03234"></a><span class="lineno"> 3234</span>  IDispatch *<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l03235"></a><span class="lineno"> 3235</span>  <span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l03236"></a><span class="lineno"> 3236</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a98b91af598acb64fe8497413ce498766">rb_secure</a>(4);</div><div class="line"><a name="l03237"></a><span class="lineno"> 3237</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#af86a62661fef3c00f697b8a1d37fd92a">rb_call_super</a>(0, 0);</div><div class="line"><a name="l03238"></a><span class="lineno"> 3238</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="stringliteral">"11*"</span>, &svr_name, &host, &others);</div><div class="line"><a name="l03239"></a><span class="lineno"> 3239</span> </div><div class="line"><a name="l03240"></a><span class="lineno"> 3240</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0381640e2905c1b3e104194f91697ca4">SafeStringValue</a>(svr_name);</div><div class="line"><a name="l03241"></a><span class="lineno"> 3241</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d9d/tcltklib_8c.html#a6f520624fabb8332dc98fd223491bf8d">rb_safe_level</a>() > 0 && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a621bc62b1fd82640c1078daf90e1c061">OBJ_TAINTED</a>(svr_name)) {</div><div class="line"><a name="l03242"></a><span class="lineno"> 3242</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ae53f1d228c34c2a7715d7d39ab1a2991">rb_eSecurityError</a>, <span class="stringliteral">"Insecure Object Creation - %s"</span>,</div><div class="line"><a name="l03243"></a><span class="lineno"> 3243</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(svr_name));</div><div class="line"><a name="l03244"></a><span class="lineno"> 3244</span>  }</div><div class="line"><a name="l03245"></a><span class="lineno"> 3245</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(host)) {</div><div class="line"><a name="l03246"></a><span class="lineno"> 3246</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0381640e2905c1b3e104194f91697ca4">SafeStringValue</a>(host);</div><div class="line"><a name="l03247"></a><span class="lineno"> 3247</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d9d/tcltklib_8c.html#a6f520624fabb8332dc98fd223491bf8d">rb_safe_level</a>() > 0 && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a621bc62b1fd82640c1078daf90e1c061">OBJ_TAINTED</a>(host)) {</div><div class="line"><a name="l03248"></a><span class="lineno"> 3248</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ae53f1d228c34c2a7715d7d39ab1a2991">rb_eSecurityError</a>, <span class="stringliteral">"Insecure Object Creation - %s"</span>,</div><div class="line"><a name="l03249"></a><span class="lineno"> 3249</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(svr_name));</div><div class="line"><a name="l03250"></a><span class="lineno"> 3250</span>  }</div><div class="line"><a name="l03251"></a><span class="lineno"> 3251</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5d6d21de9fbc08c767655267b2b1140d">ole_create_dcom</a>(<span class="keyword">self</span>, svr_name, host, others);</div><div class="line"><a name="l03252"></a><span class="lineno"> 3252</span>  }</div><div class="line"><a name="l03253"></a><span class="lineno"> 3253</span> </div><div class="line"><a name="l03254"></a><span class="lineno"> 3254</span>  <span class="comment">/* get CLSID from OLE server name */</span></div><div class="line"><a name="l03255"></a><span class="lineno"> 3255</span>  pBuf = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(svr_name);</div><div class="line"><a name="l03256"></a><span class="lineno"> 3256</span>  hr = CLSIDFromProgID(pBuf, &clsid);</div><div class="line"><a name="l03257"></a><span class="lineno"> 3257</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l03258"></a><span class="lineno"> 3258</span>  hr = CLSIDFromString(pBuf, &clsid);</div><div class="line"><a name="l03259"></a><span class="lineno"> 3259</span>  }</div><div class="line"><a name="l03260"></a><span class="lineno"> 3260</span>  SysFreeString(pBuf);</div><div class="line"><a name="l03261"></a><span class="lineno"> 3261</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l03262"></a><span class="lineno"> 3262</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l03263"></a><span class="lineno"> 3263</span>  <span class="stringliteral">"unknown OLE server: `%s'"</span>,</div><div class="line"><a name="l03264"></a><span class="lineno"> 3264</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(svr_name));</div><div class="line"><a name="l03265"></a><span class="lineno"> 3265</span>  }</div><div class="line"><a name="l03266"></a><span class="lineno"> 3266</span> </div><div class="line"><a name="l03267"></a><span class="lineno"> 3267</span>  <span class="comment">/* get IDispatch interface */</span></div><div class="line"><a name="l03268"></a><span class="lineno"> 3268</span>  hr = CoCreateInstance(&clsid, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, CLSCTX_INPROC_SERVER | CLSCTX_LOCAL_SERVER,</div><div class="line"><a name="l03269"></a><span class="lineno"> 3269</span>  &IID_IDispatch, &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l03270"></a><span class="lineno"> 3270</span>  <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l03271"></a><span class="lineno"> 3271</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l03272"></a><span class="lineno"> 3272</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l03273"></a><span class="lineno"> 3273</span>  <span class="stringliteral">"failed to create WIN32OLE object from `%s'"</span>,</div><div class="line"><a name="l03274"></a><span class="lineno"> 3274</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(svr_name));</div><div class="line"><a name="l03275"></a><span class="lineno"> 3275</span>  }</div><div class="line"><a name="l03276"></a><span class="lineno"> 3276</span> </div><div class="line"><a name="l03277"></a><span class="lineno"> 3277</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a823003b3f886ae7d06708d5d18c20d0f">ole_set_member</a>(<span class="keyword">self</span>, <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>);</div><div class="line"><a name="l03278"></a><span class="lineno"> 3278</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l03279"></a><span class="lineno"> 3279</span> }</div><div class="line"><a name="l03280"></a><span class="lineno"> 3280</span> </div><div class="line"><a name="l03281"></a><span class="lineno"> 3281</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03282"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aebe176e60c05479fdbc4ce192fefc5f3"> 3282</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aebe176e60c05479fdbc4ce192fefc5f3">hash2named_arg</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> pair, <span class="keyword">struct</span> <a class="code" href="../../d2/d5d/structoleparam.html">oleparam</a>* pOp)</div><div class="line"><a name="l03283"></a><span class="lineno"> 3283</span> {</div><div class="line"><a name="l03284"></a><span class="lineno"> 3284</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> index, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l03285"></a><span class="lineno"> 3285</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>, value;</div><div class="line"><a name="l03286"></a><span class="lineno"> 3286</span>  index = pOp-><a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cNamedArgs;</div><div class="line"><a name="l03287"></a><span class="lineno"> 3287</span> </div><div class="line"><a name="l03288"></a><span class="lineno"> 3288</span>  <span class="comment">/*---------------------------------------------</span></div><div class="line"><a name="l03289"></a><span class="lineno"> 3289</span> <span class="comment"> the data-type of key must be String or Symbol</span></div><div class="line"><a name="l03290"></a><span class="lineno"> 3290</span> <span class="comment"> -----------------------------------------------*/</span></div><div class="line"><a name="l03291"></a><span class="lineno"> 3291</span>  <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a> = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(pair, 0);</div><div class="line"><a name="l03292"></a><span class="lineno"> 3292</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a> && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a>) {</div><div class="line"><a name="l03293"></a><span class="lineno"> 3293</span>  <span class="comment">/* clear name of dispatch parameters */</span></div><div class="line"><a name="l03294"></a><span class="lineno"> 3294</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 1; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < index + 1; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l03295"></a><span class="lineno"> 3295</span>  SysFreeString(pOp-><a class="code" href="../../d2/d5d/structoleparam.html#a61df15975c8db1bbcd439b4579091fdc">pNamedArgs</a>[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03296"></a><span class="lineno"> 3296</span>  }</div><div class="line"><a name="l03297"></a><span class="lineno"> 3297</span>  <span class="comment">/* clear dispatch parameters */</span></div><div class="line"><a name="l03298"></a><span class="lineno"> 3298</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < index; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++ ) {</div><div class="line"><a name="l03299"></a><span class="lineno"> 3299</span>  VariantClear(&(pOp-><a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]));</div><div class="line"><a name="l03300"></a><span class="lineno"> 3300</span>  }</div><div class="line"><a name="l03301"></a><span class="lineno"> 3301</span>  <span class="comment">/* raise an exception */</span></div><div class="line"><a name="l03302"></a><span class="lineno"> 3302</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"wrong argument type (expected String or Symbol)"</span>);</div><div class="line"><a name="l03303"></a><span class="lineno"> 3303</span>  }</div><div class="line"><a name="l03304"></a><span class="lineno"> 3304</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a>) {</div><div class="line"><a name="l03305"></a><span class="lineno"> 3305</span>  <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a> = <a class="code" href="../../db/d2e/intern_8h.html#a6b530fce35a344ec394c08c6643cdd8a">rb_sym_to_s</a>(<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>);</div><div class="line"><a name="l03306"></a><span class="lineno"> 3306</span>  }</div><div class="line"><a name="l03307"></a><span class="lineno"> 3307</span> </div><div class="line"><a name="l03308"></a><span class="lineno"> 3308</span>  <span class="comment">/* pNamedArgs[0] is <method name>, so "index + 1" */</span></div><div class="line"><a name="l03309"></a><span class="lineno"> 3309</span>  pOp-><a class="code" href="../../d2/d5d/structoleparam.html#a61df15975c8db1bbcd439b4579091fdc">pNamedArgs</a>[index + 1] = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>);</div><div class="line"><a name="l03310"></a><span class="lineno"> 3310</span> </div><div class="line"><a name="l03311"></a><span class="lineno"> 3311</span>  value = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(pair, 1);</div><div class="line"><a name="l03312"></a><span class="lineno"> 3312</span>  VariantInit(&(pOp-><a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[index]));</div><div class="line"><a name="l03313"></a><span class="lineno"> 3313</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(value, &(pOp-><a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[index]));</div><div class="line"><a name="l03314"></a><span class="lineno"> 3314</span> </div><div class="line"><a name="l03315"></a><span class="lineno"> 3315</span>  pOp-><a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cNamedArgs += 1;</div><div class="line"><a name="l03316"></a><span class="lineno"> 3316</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03317"></a><span class="lineno"> 3317</span> }</div><div class="line"><a name="l03318"></a><span class="lineno"> 3318</span> </div><div class="line"><a name="l03319"></a><span class="lineno"> 3319</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03320"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1d7c82f61a1880fbbd308aa150767c14"> 3320</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1d7c82f61a1880fbbd308aa150767c14">set_argv</a>(VARIANTARG* realargs, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> beg, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> end)</div><div class="line"><a name="l03321"></a><span class="lineno"> 3321</span> {</div><div class="line"><a name="l03322"></a><span class="lineno"> 3322</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a> = <a class="code" href="../../db/d2e/intern_8h.html#a17a81c1a7d754e5ab49fc4b4369b6c8c">rb_const_get</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"ARGV"</span>));</div><div class="line"><a name="l03323"></a><span class="lineno"> 3323</span> </div><div class="line"><a name="l03324"></a><span class="lineno"> 3324</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad5a1e03b0a66824f95f6aaf07b4a4052">Check_Type</a>(<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>);</div><div class="line"><a name="l03325"></a><span class="lineno"> 3325</span>  <a class="code" href="../../dc/dcc/array_8c.html#aaf8c74d0eef61073fadf2c631fa9540f">rb_ary_clear</a>(<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>);</div><div class="line"><a name="l03326"></a><span class="lineno"> 3326</span>  <span class="keywordflow">while</span> (end-- > beg) {</div><div class="line"><a name="l03327"></a><span class="lineno"> 3327</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(&realargs[end]));</div><div class="line"><a name="l03328"></a><span class="lineno"> 3328</span>  VariantClear(&realargs[end]);</div><div class="line"><a name="l03329"></a><span class="lineno"> 3329</span>  }</div><div class="line"><a name="l03330"></a><span class="lineno"> 3330</span>  <span class="keywordflow">return</span> <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>;</div><div class="line"><a name="l03331"></a><span class="lineno"> 3331</span> }</div><div class="line"><a name="l03332"></a><span class="lineno"> 3332</span> </div><div class="line"><a name="l03333"></a><span class="lineno"> 3333</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03334"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac8860b58d270355634f963913731566a"> 3334</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac8860b58d270355634f963913731566a">ole_invoke</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, USHORT <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a>, BOOL is_bracket)</div><div class="line"><a name="l03335"></a><span class="lineno"> 3335</span> {</div><div class="line"><a name="l03336"></a><span class="lineno"> 3336</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>;</div><div class="line"><a name="l03337"></a><span class="lineno"> 3337</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l03338"></a><span class="lineno"> 3338</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l03339"></a><span class="lineno"> 3339</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> cmd;</div><div class="line"><a name="l03340"></a><span class="lineno"> 3340</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> paramS;</div><div class="line"><a name="l03341"></a><span class="lineno"> 3341</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> param;</div><div class="line"><a name="l03342"></a><span class="lineno"> 3342</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj;</div><div class="line"><a name="l03343"></a><span class="lineno"> 3343</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>;</div><div class="line"><a name="l03344"></a><span class="lineno"> 3344</span> </div><div class="line"><a name="l03345"></a><span class="lineno"> 3345</span>  BSTR wcmdname;</div><div class="line"><a name="l03346"></a><span class="lineno"> 3346</span> </div><div class="line"><a name="l03347"></a><span class="lineno"> 3347</span>  DISPID DispID;</div><div class="line"><a name="l03348"></a><span class="lineno"> 3348</span>  DISPID* pDispID;</div><div class="line"><a name="l03349"></a><span class="lineno"> 3349</span>  EXCEPINFO excepinfo;</div><div class="line"><a name="l03350"></a><span class="lineno"> 3350</span>  VARIANT <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>;</div><div class="line"><a name="l03351"></a><span class="lineno"> 3351</span>  VARIANTARG* realargs = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l03352"></a><span class="lineno"> 3352</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> argErr = 0;</div><div class="line"><a name="l03353"></a><span class="lineno"> 3353</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l03354"></a><span class="lineno"> 3354</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> cNamedArgs;</div><div class="line"><a name="l03355"></a><span class="lineno"> 3355</span>  <span class="keywordtype">int</span> n;</div><div class="line"><a name="l03356"></a><span class="lineno"> 3356</span>  <span class="keyword">struct </span><a class="code" href="../../d2/d5d/structoleparam.html">oleparam</a> op;</div><div class="line"><a name="l03357"></a><span class="lineno"> 3357</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l03358"></a><span class="lineno"> 3358</span>  memset(&excepinfo, 0, <span class="keyword">sizeof</span>(EXCEPINFO));</div><div class="line"><a name="l03359"></a><span class="lineno"> 3359</span> </div><div class="line"><a name="l03360"></a><span class="lineno"> 3360</span>  VariantInit(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l03361"></a><span class="lineno"> 3361</span> </div><div class="line"><a name="l03362"></a><span class="lineno"> 3362</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l03363"></a><span class="lineno"> 3363</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgdispidNamedArgs = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l03364"></a><span class="lineno"> 3364</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cNamedArgs = 0;</div><div class="line"><a name="l03365"></a><span class="lineno"> 3365</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs = 0;</div><div class="line"><a name="l03366"></a><span class="lineno"> 3366</span> </div><div class="line"><a name="l03367"></a><span class="lineno"> 3367</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="stringliteral">"1*"</span>, &cmd, &paramS);</div><div class="line"><a name="l03368"></a><span class="lineno"> 3368</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(cmd) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a> && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(cmd) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a> && !is_bracket) {</div><div class="line"><a name="l03369"></a><span class="lineno"> 3369</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"method is wrong type (expected String or Symbol)"</span>);</div><div class="line"><a name="l03370"></a><span class="lineno"> 3370</span>  }</div><div class="line"><a name="l03371"></a><span class="lineno"> 3371</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(cmd) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a>) {</div><div class="line"><a name="l03372"></a><span class="lineno"> 3372</span>  cmd = <a class="code" href="../../db/d2e/intern_8h.html#a6b530fce35a344ec394c08c6643cdd8a">rb_sym_to_s</a>(cmd);</div><div class="line"><a name="l03373"></a><span class="lineno"> 3373</span>  }</div><div class="line"><a name="l03374"></a><span class="lineno"> 3374</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l03375"></a><span class="lineno"> 3375</span>  <span class="keywordflow">if</span>(!pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>) {</div><div class="line"><a name="l03376"></a><span class="lineno"> 3376</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to get dispatch interface"</span>);</div><div class="line"><a name="l03377"></a><span class="lineno"> 3377</span>  }</div><div class="line"><a name="l03378"></a><span class="lineno"> 3378</span>  <span class="keywordflow">if</span> (is_bracket) {</div><div class="line"><a name="l03379"></a><span class="lineno"> 3379</span>  DispID = DISPID_VALUE;</div><div class="line"><a name="l03380"></a><span class="lineno"> 3380</span>  <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a> += 1;</div><div class="line"><a name="l03381"></a><span class="lineno"> 3381</span>  <a class="code" href="../../dc/dcc/array_8c.html#a82b90e872bc91ed8b5ca1ff94b4c6c9d">rb_ary_unshift</a>(paramS, cmd);</div><div class="line"><a name="l03382"></a><span class="lineno"> 3382</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l03383"></a><span class="lineno"> 3383</span>  wcmdname = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(cmd);</div><div class="line"><a name="l03384"></a><span class="lineno"> 3384</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->GetIDsOfNames( pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, &IID_NULL,</div><div class="line"><a name="l03385"></a><span class="lineno"> 3385</span>  &wcmdname, 1, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, &DispID);</div><div class="line"><a name="l03386"></a><span class="lineno"> 3386</span>  SysFreeString(wcmdname);</div><div class="line"><a name="l03387"></a><span class="lineno"> 3387</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l03388"></a><span class="lineno"> 3388</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a89a7ea938248c2019b7e6a0c11b92af6">rb_eNoMethodError</a>,</div><div class="line"><a name="l03389"></a><span class="lineno"> 3389</span>  <span class="stringliteral">"unknown property or method: `%s'"</span>,</div><div class="line"><a name="l03390"></a><span class="lineno"> 3390</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(cmd));</div><div class="line"><a name="l03391"></a><span class="lineno"> 3391</span>  }</div><div class="line"><a name="l03392"></a><span class="lineno"> 3392</span>  }</div><div class="line"><a name="l03393"></a><span class="lineno"> 3393</span> </div><div class="line"><a name="l03394"></a><span class="lineno"> 3394</span>  <span class="comment">/* pick up last argument of method */</span></div><div class="line"><a name="l03395"></a><span class="lineno"> 3395</span>  param = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(paramS, <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>-2);</div><div class="line"><a name="l03396"></a><span class="lineno"> 3396</span> </div><div class="line"><a name="l03397"></a><span class="lineno"> 3397</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cNamedArgs = 0;</div><div class="line"><a name="l03398"></a><span class="lineno"> 3398</span> </div><div class="line"><a name="l03399"></a><span class="lineno"> 3399</span>  <span class="comment">/* if last arg is hash object */</span></div><div class="line"><a name="l03400"></a><span class="lineno"> 3400</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(param) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8357e81bbb60cb41b0a292a90653a5e5">T_HASH</a>) {</div><div class="line"><a name="l03401"></a><span class="lineno"> 3401</span>  <span class="comment">/*------------------------------------------</span></div><div class="line"><a name="l03402"></a><span class="lineno"> 3402</span> <span class="comment"> hash object ==> named dispatch parameters</span></div><div class="line"><a name="l03403"></a><span class="lineno"> 3403</span> <span class="comment"> --------------------------------------------*/</span></div><div class="line"><a name="l03404"></a><span class="lineno"> 3404</span>  cNamedArgs = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(param, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"length"</span>), 0));</div><div class="line"><a name="l03405"></a><span class="lineno"> 3405</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs = cNamedArgs + <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a> - 2;</div><div class="line"><a name="l03406"></a><span class="lineno"> 3406</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a61df15975c8db1bbcd439b4579091fdc">pNamedArgs</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(OLECHAR*, cNamedArgs + 1);</div><div class="line"><a name="l03407"></a><span class="lineno"> 3407</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(VARIANTARG, op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs);</div><div class="line"><a name="l03408"></a><span class="lineno"> 3408</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2fd3da1e43e6fdef8c373875c5c9ccc7">rb_block_call</a>(param, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"each"</span>), 0, 0, <a class="code" href="../../d2/d99/win32ole_8c.html#aebe176e60c05479fdbc4ce192fefc5f3">hash2named_arg</a>, (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>)&op);</div><div class="line"><a name="l03409"></a><span class="lineno"> 3409</span> </div><div class="line"><a name="l03410"></a><span class="lineno"> 3410</span>  pDispID = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(DISPID, cNamedArgs + 1);</div><div class="line"><a name="l03411"></a><span class="lineno"> 3411</span>  op.pNamedArgs[0] = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(cmd);</div><div class="line"><a name="l03412"></a><span class="lineno"> 3412</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->GetIDsOfNames(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>,</div><div class="line"><a name="l03413"></a><span class="lineno"> 3413</span>  &IID_NULL,</div><div class="line"><a name="l03414"></a><span class="lineno"> 3414</span>  op.pNamedArgs,</div><div class="line"><a name="l03415"></a><span class="lineno"> 3415</span>  op.dp.cNamedArgs + 1,</div><div class="line"><a name="l03416"></a><span class="lineno"> 3416</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, pDispID);</div><div class="line"><a name="l03417"></a><span class="lineno"> 3417</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < op.dp.cNamedArgs + 1; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l03418"></a><span class="lineno"> 3418</span>  SysFreeString(op.pNamedArgs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03419"></a><span class="lineno"> 3419</span>  op.pNamedArgs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l03420"></a><span class="lineno"> 3420</span>  }</div><div class="line"><a name="l03421"></a><span class="lineno"> 3421</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l03422"></a><span class="lineno"> 3422</span>  <span class="comment">/* clear dispatch parameters */</span></div><div class="line"><a name="l03423"></a><span class="lineno"> 3423</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < op.dp.cArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++ ) {</div><div class="line"><a name="l03424"></a><span class="lineno"> 3424</span>  VariantClear(&op.dp.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03425"></a><span class="lineno"> 3425</span>  }</div><div class="line"><a name="l03426"></a><span class="lineno"> 3426</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l03427"></a><span class="lineno"> 3427</span>  <span class="stringliteral">"failed to get named argument info: `%s'"</span>,</div><div class="line"><a name="l03428"></a><span class="lineno"> 3428</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(cmd));</div><div class="line"><a name="l03429"></a><span class="lineno"> 3429</span>  }</div><div class="line"><a name="l03430"></a><span class="lineno"> 3430</span>  op.dp.rgdispidNamedArgs = &(pDispID[1]);</div><div class="line"><a name="l03431"></a><span class="lineno"> 3431</span>  }</div><div class="line"><a name="l03432"></a><span class="lineno"> 3432</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03433"></a><span class="lineno"> 3433</span>  cNamedArgs = 0;</div><div class="line"><a name="l03434"></a><span class="lineno"> 3434</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs = <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a> - 1;</div><div class="line"><a name="l03435"></a><span class="lineno"> 3435</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a61df15975c8db1bbcd439b4579091fdc">pNamedArgs</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(OLECHAR*, cNamedArgs + 1);</div><div class="line"><a name="l03436"></a><span class="lineno"> 3436</span>  <span class="keywordflow">if</span> (op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs > 0) {</div><div class="line"><a name="l03437"></a><span class="lineno"> 3437</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(VARIANTARG, op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs);</div><div class="line"><a name="l03438"></a><span class="lineno"> 3438</span>  }</div><div class="line"><a name="l03439"></a><span class="lineno"> 3439</span>  }</div><div class="line"><a name="l03440"></a><span class="lineno"> 3440</span>  <span class="comment">/*--------------------------------------</span></div><div class="line"><a name="l03441"></a><span class="lineno"> 3441</span> <span class="comment"> non hash args ==> dispatch parameters</span></div><div class="line"><a name="l03442"></a><span class="lineno"> 3442</span> <span class="comment"> ----------------------------------------*/</span></div><div class="line"><a name="l03443"></a><span class="lineno"> 3443</span>  <span class="keywordflow">if</span>(op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs > cNamedArgs) {</div><div class="line"><a name="l03444"></a><span class="lineno"> 3444</span>  realargs = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(VARIANTARG, op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs-cNamedArgs+1);</div><div class="line"><a name="l03445"></a><span class="lineno"> 3445</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = cNamedArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l03446"></a><span class="lineno"> 3446</span>  n = op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs - <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> + cNamedArgs - 1;</div><div class="line"><a name="l03447"></a><span class="lineno"> 3447</span>  VariantInit(&realargs[n]);</div><div class="line"><a name="l03448"></a><span class="lineno"> 3448</span>  VariantInit(&op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[n]);</div><div class="line"><a name="l03449"></a><span class="lineno"> 3449</span>  param = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(paramS, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>-cNamedArgs);</div><div class="line"><a name="l03450"></a><span class="lineno"> 3450</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(param, <a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>)) {</div><div class="line"><a name="l03451"></a><span class="lineno"> 3451</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(param, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>, pvar);</div><div class="line"><a name="l03452"></a><span class="lineno"> 3452</span>  VariantCopy(&op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[n], &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l03453"></a><span class="lineno"> 3453</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l03454"></a><span class="lineno"> 3454</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(param, &realargs[n]);</div><div class="line"><a name="l03455"></a><span class="lineno"> 3455</span>  V_VT(&op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[n]) = VT_VARIANT | VT_BYREF;</div><div class="line"><a name="l03456"></a><span class="lineno"> 3456</span>  V_VARIANTREF(&op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[n]) = &realargs[n];</div><div class="line"><a name="l03457"></a><span class="lineno"> 3457</span>  }</div><div class="line"><a name="l03458"></a><span class="lineno"> 3458</span>  }</div><div class="line"><a name="l03459"></a><span class="lineno"> 3459</span>  }</div><div class="line"><a name="l03460"></a><span class="lineno"> 3460</span>  <span class="comment">/* apparent you need to call propput, you need this */</span></div><div class="line"><a name="l03461"></a><span class="lineno"> 3461</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a> & DISPATCH_PROPERTYPUT) {</div><div class="line"><a name="l03462"></a><span class="lineno"> 3462</span>  <span class="keywordflow">if</span> (op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs == 0)</div><div class="line"><a name="l03463"></a><span class="lineno"> 3463</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(ResultFromScode(E_INVALIDARG), <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"argument error"</span>);</div><div class="line"><a name="l03464"></a><span class="lineno"> 3464</span> </div><div class="line"><a name="l03465"></a><span class="lineno"> 3465</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cNamedArgs = 1;</div><div class="line"><a name="l03466"></a><span class="lineno"> 3466</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgdispidNamedArgs = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>( DISPID, 1 );</div><div class="line"><a name="l03467"></a><span class="lineno"> 3467</span>  op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgdispidNamedArgs[0] = DISPID_PROPERTYPUT;</div><div class="line"><a name="l03468"></a><span class="lineno"> 3468</span>  }</div><div class="line"><a name="l03469"></a><span class="lineno"> 3469</span> </div><div class="line"><a name="l03470"></a><span class="lineno"> 3470</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->Invoke(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, DispID,</div><div class="line"><a name="l03471"></a><span class="lineno"> 3471</span>  &IID_NULL, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a>, &op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>,</div><div class="line"><a name="l03472"></a><span class="lineno"> 3472</span>  &<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>, &excepinfo, &argErr);</div><div class="line"><a name="l03473"></a><span class="lineno"> 3473</span> </div><div class="line"><a name="l03474"></a><span class="lineno"> 3474</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l03475"></a><span class="lineno"> 3475</span>  <span class="comment">/* retry to call args by value */</span></div><div class="line"><a name="l03476"></a><span class="lineno"> 3476</span>  <span class="keywordflow">if</span>(op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs >= cNamedArgs) {</div><div class="line"><a name="l03477"></a><span class="lineno"> 3477</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = cNamedArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l03478"></a><span class="lineno"> 3478</span>  n = op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs - <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> + cNamedArgs - 1;</div><div class="line"><a name="l03479"></a><span class="lineno"> 3479</span>  param = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(paramS, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>-cNamedArgs);</div><div class="line"><a name="l03480"></a><span class="lineno"> 3480</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(param, &op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[n]);</div><div class="line"><a name="l03481"></a><span class="lineno"> 3481</span>  }</div><div class="line"><a name="l03482"></a><span class="lineno"> 3482</span>  <span class="keywordflow">if</span> (hr == DISP_E_EXCEPTION) {</div><div class="line"><a name="l03483"></a><span class="lineno"> 3483</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a168b5a800d629d56514b2a19d39cb4a0">ole_freeexceptinfo</a>(&excepinfo);</div><div class="line"><a name="l03484"></a><span class="lineno"> 3484</span>  }</div><div class="line"><a name="l03485"></a><span class="lineno"> 3485</span>  memset(&excepinfo, 0, <span class="keyword">sizeof</span>(EXCEPINFO));</div><div class="line"><a name="l03486"></a><span class="lineno"> 3486</span>  VariantInit(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l03487"></a><span class="lineno"> 3487</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->Invoke(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, DispID,</div><div class="line"><a name="l03488"></a><span class="lineno"> 3488</span>  &IID_NULL, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a>,</div><div class="line"><a name="l03489"></a><span class="lineno"> 3489</span>  &op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>, &<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>,</div><div class="line"><a name="l03490"></a><span class="lineno"> 3490</span>  &excepinfo, &argErr);</div><div class="line"><a name="l03491"></a><span class="lineno"> 3491</span> </div><div class="line"><a name="l03492"></a><span class="lineno"> 3492</span>  <span class="comment">/* mega kludge. if a method in WORD is called and we ask</span></div><div class="line"><a name="l03493"></a><span class="lineno"> 3493</span> <span class="comment"> * for a result when one is not returned then</span></div><div class="line"><a name="l03494"></a><span class="lineno"> 3494</span> <span class="comment"> * hResult == DISP_E_EXCEPTION. this only happens on</span></div><div class="line"><a name="l03495"></a><span class="lineno"> 3495</span> <span class="comment"> * functions whose DISPID > 0x8000 */</span></div><div class="line"><a name="l03496"></a><span class="lineno"> 3496</span>  <span class="keywordflow">if</span> ((hr == DISP_E_EXCEPTION || hr == DISP_E_MEMBERNOTFOUND) && DispID > 0x8000) {</div><div class="line"><a name="l03497"></a><span class="lineno"> 3497</span>  <span class="keywordflow">if</span> (hr == DISP_E_EXCEPTION) {</div><div class="line"><a name="l03498"></a><span class="lineno"> 3498</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a168b5a800d629d56514b2a19d39cb4a0">ole_freeexceptinfo</a>(&excepinfo);</div><div class="line"><a name="l03499"></a><span class="lineno"> 3499</span>  }</div><div class="line"><a name="l03500"></a><span class="lineno"> 3500</span>  memset(&excepinfo, 0, <span class="keyword">sizeof</span>(EXCEPINFO));</div><div class="line"><a name="l03501"></a><span class="lineno"> 3501</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->Invoke(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, DispID,</div><div class="line"><a name="l03502"></a><span class="lineno"> 3502</span>  &IID_NULL, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a>,</div><div class="line"><a name="l03503"></a><span class="lineno"> 3503</span>  &op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>,</div><div class="line"><a name="l03504"></a><span class="lineno"> 3504</span>  &excepinfo, &argErr);</div><div class="line"><a name="l03505"></a><span class="lineno"> 3505</span> </div><div class="line"><a name="l03506"></a><span class="lineno"> 3506</span>  }</div><div class="line"><a name="l03507"></a><span class="lineno"> 3507</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = cNamedArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l03508"></a><span class="lineno"> 3508</span>  n = op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs - <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> + cNamedArgs - 1;</div><div class="line"><a name="l03509"></a><span class="lineno"> 3509</span>  VariantClear(&op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[n]);</div><div class="line"><a name="l03510"></a><span class="lineno"> 3510</span>  }</div><div class="line"><a name="l03511"></a><span class="lineno"> 3511</span>  }</div><div class="line"><a name="l03512"></a><span class="lineno"> 3512</span> </div><div class="line"><a name="l03513"></a><span class="lineno"> 3513</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l03514"></a><span class="lineno"> 3514</span>  <span class="comment">/* retry after converting nil to VT_EMPTY */</span></div><div class="line"><a name="l03515"></a><span class="lineno"> 3515</span>  <span class="keywordflow">if</span> (op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs > cNamedArgs) {</div><div class="line"><a name="l03516"></a><span class="lineno"> 3516</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = cNamedArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l03517"></a><span class="lineno"> 3517</span>  n = op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs - <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> + cNamedArgs - 1;</div><div class="line"><a name="l03518"></a><span class="lineno"> 3518</span>  param = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(paramS, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>-cNamedArgs);</div><div class="line"><a name="l03519"></a><span class="lineno"> 3519</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#add1934e43857f1911e6ff0050d8f593e">ole_val2variant2</a>(param, &op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[n]);</div><div class="line"><a name="l03520"></a><span class="lineno"> 3520</span>  }</div><div class="line"><a name="l03521"></a><span class="lineno"> 3521</span>  <span class="keywordflow">if</span> (hr == DISP_E_EXCEPTION) {</div><div class="line"><a name="l03522"></a><span class="lineno"> 3522</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a168b5a800d629d56514b2a19d39cb4a0">ole_freeexceptinfo</a>(&excepinfo);</div><div class="line"><a name="l03523"></a><span class="lineno"> 3523</span>  }</div><div class="line"><a name="l03524"></a><span class="lineno"> 3524</span>  memset(&excepinfo, 0, <span class="keyword">sizeof</span>(EXCEPINFO));</div><div class="line"><a name="l03525"></a><span class="lineno"> 3525</span>  VariantInit(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l03526"></a><span class="lineno"> 3526</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->Invoke(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, DispID,</div><div class="line"><a name="l03527"></a><span class="lineno"> 3527</span>  &IID_NULL, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a>,</div><div class="line"><a name="l03528"></a><span class="lineno"> 3528</span>  &op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>, &<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>,</div><div class="line"><a name="l03529"></a><span class="lineno"> 3529</span>  &excepinfo, &argErr);</div><div class="line"><a name="l03530"></a><span class="lineno"> 3530</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = cNamedArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l03531"></a><span class="lineno"> 3531</span>  n = op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs - <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> + cNamedArgs - 1;</div><div class="line"><a name="l03532"></a><span class="lineno"> 3532</span>  VariantClear(&op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[n]);</div><div class="line"><a name="l03533"></a><span class="lineno"> 3533</span>  }</div><div class="line"><a name="l03534"></a><span class="lineno"> 3534</span>  }</div><div class="line"><a name="l03535"></a><span class="lineno"> 3535</span>  }</div><div class="line"><a name="l03536"></a><span class="lineno"> 3536</span> </div><div class="line"><a name="l03537"></a><span class="lineno"> 3537</span>  }</div><div class="line"><a name="l03538"></a><span class="lineno"> 3538</span>  <span class="comment">/* clear dispatch parameter */</span></div><div class="line"><a name="l03539"></a><span class="lineno"> 3539</span>  <span class="keywordflow">if</span>(op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs > cNamedArgs) {</div><div class="line"><a name="l03540"></a><span class="lineno"> 3540</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = cNamedArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l03541"></a><span class="lineno"> 3541</span>  n = op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs - <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> + cNamedArgs - 1;</div><div class="line"><a name="l03542"></a><span class="lineno"> 3542</span>  param = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(paramS, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>-cNamedArgs);</div><div class="line"><a name="l03543"></a><span class="lineno"> 3543</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(param, <a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>)) {</div><div class="line"><a name="l03544"></a><span class="lineno"> 3544</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(param, &realargs[n]);</div><div class="line"><a name="l03545"></a><span class="lineno"> 3545</span>  }</div><div class="line"><a name="l03546"></a><span class="lineno"> 3546</span>  }</div><div class="line"><a name="l03547"></a><span class="lineno"> 3547</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a1d7c82f61a1880fbbd308aa150767c14">set_argv</a>(realargs, cNamedArgs, op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs);</div><div class="line"><a name="l03548"></a><span class="lineno"> 3548</span>  }</div><div class="line"><a name="l03549"></a><span class="lineno"> 3549</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l03550"></a><span class="lineno"> 3550</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.cArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l03551"></a><span class="lineno"> 3551</span>  VariantClear(&op.<a class="code" href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">dp</a>.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03552"></a><span class="lineno"> 3552</span>  }</div><div class="line"><a name="l03553"></a><span class="lineno"> 3553</span>  }</div><div class="line"><a name="l03554"></a><span class="lineno"> 3554</span> </div><div class="line"><a name="l03555"></a><span class="lineno"> 3555</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l03556"></a><span class="lineno"> 3556</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ab7382ba089455a36bd5000ff84aa861f">ole_excepinfo2msg</a>(&excepinfo);</div><div class="line"><a name="l03557"></a><span class="lineno"> 3557</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"(in OLE method `%s': )%s"</span>,</div><div class="line"><a name="l03558"></a><span class="lineno"> 3558</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(cmd),</div><div class="line"><a name="l03559"></a><span class="lineno"> 3559</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>));</div><div class="line"><a name="l03560"></a><span class="lineno"> 3560</span>  }</div><div class="line"><a name="l03561"></a><span class="lineno"> 3561</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l03562"></a><span class="lineno"> 3562</span>  VariantClear(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l03563"></a><span class="lineno"> 3563</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l03564"></a><span class="lineno"> 3564</span> }</div><div class="line"><a name="l03565"></a><span class="lineno"> 3565</span> </div><div class="line"><a name="l03566"></a><span class="lineno"> 3566</span> <span class="comment">/*</span></div><div class="line"><a name="l03567"></a><span class="lineno"> 3567</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03568"></a><span class="lineno"> 3568</span> <span class="comment"> * WIN32OLE#invoke(method, [arg1,...]) => return value of method.</span></div><div class="line"><a name="l03569"></a><span class="lineno"> 3569</span> <span class="comment"> *</span></div><div class="line"><a name="l03570"></a><span class="lineno"> 3570</span> <span class="comment"> * Runs OLE method.</span></div><div class="line"><a name="l03571"></a><span class="lineno"> 3571</span> <span class="comment"> * The first argument specifies the method name of OLE Automation object.</span></div><div class="line"><a name="l03572"></a><span class="lineno"> 3572</span> <span class="comment"> * The others specify argument of the <i>method</i>.</span></div><div class="line"><a name="l03573"></a><span class="lineno"> 3573</span> <span class="comment"> * If you can not execute <i>method</i> directly, then use this method instead.</span></div><div class="line"><a name="l03574"></a><span class="lineno"> 3574</span> <span class="comment"> *</span></div><div class="line"><a name="l03575"></a><span class="lineno"> 3575</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l03576"></a><span class="lineno"> 3576</span> <span class="comment"> * excel.invoke('Quit') # => same as excel.Quit</span></div><div class="line"><a name="l03577"></a><span class="lineno"> 3577</span> <span class="comment"> *</span></div><div class="line"><a name="l03578"></a><span class="lineno"> 3578</span> <span class="comment"> */</span></div><div class="line"><a name="l03579"></a><span class="lineno"> 3579</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03580"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a950b2a90a61b3cae5543c9d93b00ead3"> 3580</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a950b2a90a61b3cae5543c9d93b00ead3">fole_invoke</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03581"></a><span class="lineno"> 3581</span> {</div><div class="line"><a name="l03582"></a><span class="lineno"> 3582</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac8860b58d270355634f963913731566a">ole_invoke</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="keyword">self</span>, DISPATCH_METHOD|DISPATCH_PROPERTYGET, <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l03583"></a><span class="lineno"> 3583</span> }</div><div class="line"><a name="l03584"></a><span class="lineno"> 3584</span> </div><div class="line"><a name="l03585"></a><span class="lineno"> 3585</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03586"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab5e5b1edb8c7947faa9e4838b4ac0a8c"> 3586</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab5e5b1edb8c7947faa9e4838b4ac0a8c">ole_invoke2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> dispid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> types, USHORT dispkind)</div><div class="line"><a name="l03587"></a><span class="lineno"> 3587</span> {</div><div class="line"><a name="l03588"></a><span class="lineno"> 3588</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l03589"></a><span class="lineno"> 3589</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l03590"></a><span class="lineno"> 3590</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> argErr = 0;</div><div class="line"><a name="l03591"></a><span class="lineno"> 3591</span>  EXCEPINFO excepinfo;</div><div class="line"><a name="l03592"></a><span class="lineno"> 3592</span>  VARIANT <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>;</div><div class="line"><a name="l03593"></a><span class="lineno"> 3593</span>  DISPPARAMS dispParams;</div><div class="line"><a name="l03594"></a><span class="lineno"> 3594</span>  VARIANTARG* realargs = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l03595"></a><span class="lineno"> 3595</span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, j;</div><div class="line"><a name="l03596"></a><span class="lineno"> 3596</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03597"></a><span class="lineno"> 3597</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tp, param;</div><div class="line"><a name="l03598"></a><span class="lineno"> 3598</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>;</div><div class="line"><a name="l03599"></a><span class="lineno"> 3599</span>  VARTYPE vt;</div><div class="line"><a name="l03600"></a><span class="lineno"> 3600</span> </div><div class="line"><a name="l03601"></a><span class="lineno"> 3601</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad5a1e03b0a66824f95f6aaf07b4a4052">Check_Type</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>);</div><div class="line"><a name="l03602"></a><span class="lineno"> 3602</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad5a1e03b0a66824f95f6aaf07b4a4052">Check_Type</a>(types, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>);</div><div class="line"><a name="l03603"></a><span class="lineno"> 3603</span> </div><div class="line"><a name="l03604"></a><span class="lineno"> 3604</span>  memset(&excepinfo, 0, <span class="keyword">sizeof</span>(EXCEPINFO));</div><div class="line"><a name="l03605"></a><span class="lineno"> 3605</span>  memset(&dispParams, 0, <span class="keyword">sizeof</span>(DISPPARAMS));</div><div class="line"><a name="l03606"></a><span class="lineno"> 3606</span>  VariantInit(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l03607"></a><span class="lineno"> 3607</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l03608"></a><span class="lineno"> 3608</span> </div><div class="line"><a name="l03609"></a><span class="lineno"> 3609</span>  dispParams.cArgs = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l03610"></a><span class="lineno"> 3610</span>  dispParams.rgvarg = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(VARIANTARG, dispParams.cArgs);</div><div class="line"><a name="l03611"></a><span class="lineno"> 3611</span>  realargs = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(VARIANTARG, dispParams.cArgs);</div><div class="line"><a name="l03612"></a><span class="lineno"> 3612</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0, j = dispParams.cArgs - 1; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < (<span class="keywordtype">int</span>)dispParams.cArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++, j--)</div><div class="line"><a name="l03613"></a><span class="lineno"> 3613</span>  {</div><div class="line"><a name="l03614"></a><span class="lineno"> 3614</span>  VariantInit(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03615"></a><span class="lineno"> 3615</span>  VariantInit(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03616"></a><span class="lineno"> 3616</span>  tp = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(types, j);</div><div class="line"><a name="l03617"></a><span class="lineno"> 3617</span>  vt = (VARTYPE)<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(tp);</div><div class="line"><a name="l03618"></a><span class="lineno"> 3618</span>  V_VT(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = vt;</div><div class="line"><a name="l03619"></a><span class="lineno"> 3619</span>  param = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, j);</div><div class="line"><a name="l03620"></a><span class="lineno"> 3620</span>  <span class="keywordflow">if</span> (param == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l03621"></a><span class="lineno"> 3621</span>  {</div><div class="line"><a name="l03622"></a><span class="lineno"> 3622</span> </div><div class="line"><a name="l03623"></a><span class="lineno"> 3623</span>  V_VT(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = V_VT(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = VT_ERROR;</div><div class="line"><a name="l03624"></a><span class="lineno"> 3624</span>  V_ERROR(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = V_ERROR(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = DISP_E_PARAMNOTFOUND;</div><div class="line"><a name="l03625"></a><span class="lineno"> 3625</span>  }</div><div class="line"><a name="l03626"></a><span class="lineno"> 3626</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l03627"></a><span class="lineno"> 3627</span>  {</div><div class="line"><a name="l03628"></a><span class="lineno"> 3628</span>  <span class="keywordflow">if</span> (vt & VT_ARRAY)</div><div class="line"><a name="l03629"></a><span class="lineno"> 3629</span>  {</div><div class="line"><a name="l03630"></a><span class="lineno"> 3630</span>  <span class="keywordtype">int</span> ent;</div><div class="line"><a name="l03631"></a><span class="lineno"> 3631</span>  LPBYTE pb;</div><div class="line"><a name="l03632"></a><span class="lineno"> 3632</span>  <span class="keywordtype">short</span>* ps;</div><div class="line"><a name="l03633"></a><span class="lineno"> 3633</span>  LPLONG pl;</div><div class="line"><a name="l03634"></a><span class="lineno"> 3634</span>  VARIANT* pv;</div><div class="line"><a name="l03635"></a><span class="lineno"> 3635</span>  CY *py;</div><div class="line"><a name="l03636"></a><span class="lineno"> 3636</span>  VARTYPE <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>;</div><div class="line"><a name="l03637"></a><span class="lineno"> 3637</span>  SAFEARRAYBOUND rgsabound[1];</div><div class="line"><a name="l03638"></a><span class="lineno"> 3638</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad5a1e03b0a66824f95f6aaf07b4a4052">Check_Type</a>(param, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>);</div><div class="line"><a name="l03639"></a><span class="lineno"> 3639</span>  rgsabound[0].lLbound = 0;</div><div class="line"><a name="l03640"></a><span class="lineno"> 3640</span>  rgsabound[0].cElements = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(param);</div><div class="line"><a name="l03641"></a><span class="lineno"> 3641</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> = vt & ~(VT_ARRAY | VT_BYREF);</div><div class="line"><a name="l03642"></a><span class="lineno"> 3642</span>  V_ARRAY(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = SafeArrayCreate(<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>, 1, rgsabound);</div><div class="line"><a name="l03643"></a><span class="lineno"> 3643</span>  V_VT(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = VT_ARRAY | <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>;</div><div class="line"><a name="l03644"></a><span class="lineno"> 3644</span>  SafeArrayLock(V_ARRAY(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]));</div><div class="line"><a name="l03645"></a><span class="lineno"> 3645</span>  pb = V_ARRAY(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>])->pvData;</div><div class="line"><a name="l03646"></a><span class="lineno"> 3646</span>  ps = V_ARRAY(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>])->pvData;</div><div class="line"><a name="l03647"></a><span class="lineno"> 3647</span>  pl = V_ARRAY(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>])->pvData;</div><div class="line"><a name="l03648"></a><span class="lineno"> 3648</span>  py = V_ARRAY(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>])->pvData;</div><div class="line"><a name="l03649"></a><span class="lineno"> 3649</span>  pv = V_ARRAY(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>])->pvData;</div><div class="line"><a name="l03650"></a><span class="lineno"> 3650</span>  <span class="keywordflow">for</span> (ent = 0; ent < (int)rgsabound[0].cElements; ent++)</div><div class="line"><a name="l03651"></a><span class="lineno"> 3651</span>  {</div><div class="line"><a name="l03652"></a><span class="lineno"> 3652</span>  VARIANT velem;</div><div class="line"><a name="l03653"></a><span class="lineno"> 3653</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> elem = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(param, ent);</div><div class="line"><a name="l03654"></a><span class="lineno"> 3654</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(elem, &velem);</div><div class="line"><a name="l03655"></a><span class="lineno"> 3655</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> != VT_VARIANT)</div><div class="line"><a name="l03656"></a><span class="lineno"> 3656</span>  {</div><div class="line"><a name="l03657"></a><span class="lineno"> 3657</span>  VariantChangeTypeEx(&velem, &velem,</div><div class="line"><a name="l03658"></a><span class="lineno"> 3658</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>, 0, <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>);</div><div class="line"><a name="l03659"></a><span class="lineno"> 3659</span>  }</div><div class="line"><a name="l03660"></a><span class="lineno"> 3660</span>  <span class="keywordflow">switch</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>)</div><div class="line"><a name="l03661"></a><span class="lineno"> 3661</span>  {</div><div class="line"><a name="l03662"></a><span class="lineno"> 3662</span>  <span class="comment">/* 128 bits */</span></div><div class="line"><a name="l03663"></a><span class="lineno"> 3663</span>  <span class="keywordflow">case</span> VT_VARIANT:</div><div class="line"><a name="l03664"></a><span class="lineno"> 3664</span>  *pv++ = velem;</div><div class="line"><a name="l03665"></a><span class="lineno"> 3665</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03666"></a><span class="lineno"> 3666</span>  <span class="comment">/* 64 bits */</span></div><div class="line"><a name="l03667"></a><span class="lineno"> 3667</span>  <span class="keywordflow">case</span> VT_R8:</div><div class="line"><a name="l03668"></a><span class="lineno"> 3668</span>  <span class="keywordflow">case</span> VT_CY:</div><div class="line"><a name="l03669"></a><span class="lineno"> 3669</span>  <span class="keywordflow">case</span> VT_DATE:</div><div class="line"><a name="l03670"></a><span class="lineno"> 3670</span>  *py++ = V_CY(&velem);</div><div class="line"><a name="l03671"></a><span class="lineno"> 3671</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03672"></a><span class="lineno"> 3672</span>  <span class="comment">/* 16 bits */</span></div><div class="line"><a name="l03673"></a><span class="lineno"> 3673</span>  <span class="keywordflow">case</span> VT_BOOL:</div><div class="line"><a name="l03674"></a><span class="lineno"> 3674</span>  <span class="keywordflow">case</span> VT_I2:</div><div class="line"><a name="l03675"></a><span class="lineno"> 3675</span>  <span class="keywordflow">case</span> VT_UI2:</div><div class="line"><a name="l03676"></a><span class="lineno"> 3676</span>  *ps++ = V_I2(&velem);</div><div class="line"><a name="l03677"></a><span class="lineno"> 3677</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03678"></a><span class="lineno"> 3678</span>  <span class="comment">/* 8 bites */</span></div><div class="line"><a name="l03679"></a><span class="lineno"> 3679</span>  <span class="keywordflow">case</span> VT_UI1:</div><div class="line"><a name="l03680"></a><span class="lineno"> 3680</span>  <span class="keywordflow">case</span> VT_I1:</div><div class="line"><a name="l03681"></a><span class="lineno"> 3681</span>  *pb++ = V_UI1(&velem);</div><div class="line"><a name="l03682"></a><span class="lineno"> 3682</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03683"></a><span class="lineno"> 3683</span>  <span class="comment">/* 32 bits */</span></div><div class="line"><a name="l03684"></a><span class="lineno"> 3684</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l03685"></a><span class="lineno"> 3685</span>  *pl++ = V_I4(&velem);</div><div class="line"><a name="l03686"></a><span class="lineno"> 3686</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03687"></a><span class="lineno"> 3687</span>  }</div><div class="line"><a name="l03688"></a><span class="lineno"> 3688</span>  }</div><div class="line"><a name="l03689"></a><span class="lineno"> 3689</span>  SafeArrayUnlock(V_ARRAY(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]));</div><div class="line"><a name="l03690"></a><span class="lineno"> 3690</span>  }</div><div class="line"><a name="l03691"></a><span class="lineno"> 3691</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l03692"></a><span class="lineno"> 3692</span>  {</div><div class="line"><a name="l03693"></a><span class="lineno"> 3693</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(param, &realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03694"></a><span class="lineno"> 3694</span>  <span class="keywordflow">if</span> ((vt & (~VT_BYREF)) != VT_VARIANT)</div><div class="line"><a name="l03695"></a><span class="lineno"> 3695</span>  {</div><div class="line"><a name="l03696"></a><span class="lineno"> 3696</span>  hr = VariantChangeTypeEx(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>], &realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>],</div><div class="line"><a name="l03697"></a><span class="lineno"> 3697</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>, 0,</div><div class="line"><a name="l03698"></a><span class="lineno"> 3698</span>  (VARTYPE)(vt & (~VT_BYREF)));</div><div class="line"><a name="l03699"></a><span class="lineno"> 3699</span>  <span class="keywordflow">if</span> (hr != <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>)</div><div class="line"><a name="l03700"></a><span class="lineno"> 3700</span>  {</div><div class="line"><a name="l03701"></a><span class="lineno"> 3701</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"not valid value"</span>);</div><div class="line"><a name="l03702"></a><span class="lineno"> 3702</span>  }</div><div class="line"><a name="l03703"></a><span class="lineno"> 3703</span>  }</div><div class="line"><a name="l03704"></a><span class="lineno"> 3704</span>  }</div><div class="line"><a name="l03705"></a><span class="lineno"> 3705</span>  <span class="keywordflow">if</span> ((vt & VT_BYREF) || vt == VT_VARIANT)</div><div class="line"><a name="l03706"></a><span class="lineno"> 3706</span>  {</div><div class="line"><a name="l03707"></a><span class="lineno"> 3707</span>  <span class="keywordflow">if</span> (vt == VT_VARIANT)</div><div class="line"><a name="l03708"></a><span class="lineno"> 3708</span>  V_VT(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = VT_VARIANT | VT_BYREF;</div><div class="line"><a name="l03709"></a><span class="lineno"> 3709</span>  <span class="keywordflow">switch</span> (vt & (~VT_BYREF))</div><div class="line"><a name="l03710"></a><span class="lineno"> 3710</span>  {</div><div class="line"><a name="l03711"></a><span class="lineno"> 3711</span>  <span class="comment">/* 128 bits */</span></div><div class="line"><a name="l03712"></a><span class="lineno"> 3712</span>  <span class="keywordflow">case</span> VT_VARIANT:</div><div class="line"><a name="l03713"></a><span class="lineno"> 3713</span>  V_VARIANTREF(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = &realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>];</div><div class="line"><a name="l03714"></a><span class="lineno"> 3714</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03715"></a><span class="lineno"> 3715</span>  <span class="comment">/* 64 bits */</span></div><div class="line"><a name="l03716"></a><span class="lineno"> 3716</span>  <span class="keywordflow">case</span> VT_R8:</div><div class="line"><a name="l03717"></a><span class="lineno"> 3717</span>  <span class="keywordflow">case</span> VT_CY:</div><div class="line"><a name="l03718"></a><span class="lineno"> 3718</span>  <span class="keywordflow">case</span> VT_DATE:</div><div class="line"><a name="l03719"></a><span class="lineno"> 3719</span>  V_CYREF(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = &V_CY(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03720"></a><span class="lineno"> 3720</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03721"></a><span class="lineno"> 3721</span>  <span class="comment">/* 16 bits */</span></div><div class="line"><a name="l03722"></a><span class="lineno"> 3722</span>  <span class="keywordflow">case</span> VT_BOOL:</div><div class="line"><a name="l03723"></a><span class="lineno"> 3723</span>  <span class="keywordflow">case</span> VT_I2:</div><div class="line"><a name="l03724"></a><span class="lineno"> 3724</span>  <span class="keywordflow">case</span> VT_UI2:</div><div class="line"><a name="l03725"></a><span class="lineno"> 3725</span>  V_I2REF(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = &V_I2(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03726"></a><span class="lineno"> 3726</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03727"></a><span class="lineno"> 3727</span>  <span class="comment">/* 8 bites */</span></div><div class="line"><a name="l03728"></a><span class="lineno"> 3728</span>  <span class="keywordflow">case</span> VT_UI1:</div><div class="line"><a name="l03729"></a><span class="lineno"> 3729</span>  <span class="keywordflow">case</span> VT_I1:</div><div class="line"><a name="l03730"></a><span class="lineno"> 3730</span>  V_UI1REF(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = &V_UI1(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03731"></a><span class="lineno"> 3731</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03732"></a><span class="lineno"> 3732</span>  <span class="comment">/* 32 bits */</span></div><div class="line"><a name="l03733"></a><span class="lineno"> 3733</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l03734"></a><span class="lineno"> 3734</span>  V_I4REF(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = &V_I4(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03735"></a><span class="lineno"> 3735</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l03736"></a><span class="lineno"> 3736</span>  }</div><div class="line"><a name="l03737"></a><span class="lineno"> 3737</span>  }</div><div class="line"><a name="l03738"></a><span class="lineno"> 3738</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l03739"></a><span class="lineno"> 3739</span>  {</div><div class="line"><a name="l03740"></a><span class="lineno"> 3740</span>  <span class="comment">/* copy 64 bits of data */</span></div><div class="line"><a name="l03741"></a><span class="lineno"> 3741</span>  V_CY(&dispParams.rgvarg[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]) = V_CY(&realargs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l03742"></a><span class="lineno"> 3742</span>  }</div><div class="line"><a name="l03743"></a><span class="lineno"> 3743</span>  }</div><div class="line"><a name="l03744"></a><span class="lineno"> 3744</span>  }</div><div class="line"><a name="l03745"></a><span class="lineno"> 3745</span> </div><div class="line"><a name="l03746"></a><span class="lineno"> 3746</span>  <span class="keywordflow">if</span> (dispkind & DISPATCH_PROPERTYPUT) {</div><div class="line"><a name="l03747"></a><span class="lineno"> 3747</span>  dispParams.cNamedArgs = 1;</div><div class="line"><a name="l03748"></a><span class="lineno"> 3748</span>  dispParams.rgdispidNamedArgs = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>( DISPID, 1 );</div><div class="line"><a name="l03749"></a><span class="lineno"> 3749</span>  dispParams.rgdispidNamedArgs[0] = DISPID_PROPERTYPUT;</div><div class="line"><a name="l03750"></a><span class="lineno"> 3750</span>  }</div><div class="line"><a name="l03751"></a><span class="lineno"> 3751</span> </div><div class="line"><a name="l03752"></a><span class="lineno"> 3752</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->Invoke(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(dispid),</div><div class="line"><a name="l03753"></a><span class="lineno"> 3753</span>  &IID_NULL, <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>,</div><div class="line"><a name="l03754"></a><span class="lineno"> 3754</span>  dispkind,</div><div class="line"><a name="l03755"></a><span class="lineno"> 3755</span>  &dispParams, &<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>,</div><div class="line"><a name="l03756"></a><span class="lineno"> 3756</span>  &excepinfo, &argErr);</div><div class="line"><a name="l03757"></a><span class="lineno"> 3757</span> </div><div class="line"><a name="l03758"></a><span class="lineno"> 3758</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l03759"></a><span class="lineno"> 3759</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ab7382ba089455a36bd5000ff84aa861f">ole_excepinfo2msg</a>(&excepinfo);</div><div class="line"><a name="l03760"></a><span class="lineno"> 3760</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"(in OLE method `<dispatch id:%d>': )%s"</span>,</div><div class="line"><a name="l03761"></a><span class="lineno"> 3761</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(dispid),</div><div class="line"><a name="l03762"></a><span class="lineno"> 3762</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>));</div><div class="line"><a name="l03763"></a><span class="lineno"> 3763</span>  }</div><div class="line"><a name="l03764"></a><span class="lineno"> 3764</span> </div><div class="line"><a name="l03765"></a><span class="lineno"> 3765</span>  <span class="comment">/* clear dispatch parameter */</span></div><div class="line"><a name="l03766"></a><span class="lineno"> 3766</span>  <span class="keywordflow">if</span>(dispParams.cArgs > 0) {</div><div class="line"><a name="l03767"></a><span class="lineno"> 3767</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a1d7c82f61a1880fbbd308aa150767c14">set_argv</a>(realargs, 0, dispParams.cArgs);</div><div class="line"><a name="l03768"></a><span class="lineno"> 3768</span>  }</div><div class="line"><a name="l03769"></a><span class="lineno"> 3769</span> </div><div class="line"><a name="l03770"></a><span class="lineno"> 3770</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l03771"></a><span class="lineno"> 3771</span>  VariantClear(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l03772"></a><span class="lineno"> 3772</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l03773"></a><span class="lineno"> 3773</span> }</div><div class="line"><a name="l03774"></a><span class="lineno"> 3774</span> </div><div class="line"><a name="l03775"></a><span class="lineno"> 3775</span> <span class="comment">/*</span></div><div class="line"><a name="l03776"></a><span class="lineno"> 3776</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03777"></a><span class="lineno"> 3777</span> <span class="comment"> * WIN32OLE#_invoke(dispid, args, types)</span></div><div class="line"><a name="l03778"></a><span class="lineno"> 3778</span> <span class="comment"> *</span></div><div class="line"><a name="l03779"></a><span class="lineno"> 3779</span> <span class="comment"> * Runs the early binding method.</span></div><div class="line"><a name="l03780"></a><span class="lineno"> 3780</span> <span class="comment"> * The 1st argument specifies dispatch ID,</span></div><div class="line"><a name="l03781"></a><span class="lineno"> 3781</span> <span class="comment"> * the 2nd argument specifies the array of arguments,</span></div><div class="line"><a name="l03782"></a><span class="lineno"> 3782</span> <span class="comment"> * the 3rd argument specifies the array of the type of arguments.</span></div><div class="line"><a name="l03783"></a><span class="lineno"> 3783</span> <span class="comment"> *</span></div><div class="line"><a name="l03784"></a><span class="lineno"> 3784</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l03785"></a><span class="lineno"> 3785</span> <span class="comment"> * excel._invoke(302, [], []) # same effect as excel.Quit</span></div><div class="line"><a name="l03786"></a><span class="lineno"> 3786</span> <span class="comment"> */</span></div><div class="line"><a name="l03787"></a><span class="lineno"> 3787</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03788"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#abf52aec9001101679b74a4117347b4ce"> 3788</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#abf52aec9001101679b74a4117347b4ce">fole_invoke2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> dispid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> types)</div><div class="line"><a name="l03789"></a><span class="lineno"> 3789</span> {</div><div class="line"><a name="l03790"></a><span class="lineno"> 3790</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab5e5b1edb8c7947faa9e4838b4ac0a8c">ole_invoke2</a>(<span class="keyword">self</span>, dispid, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, types, DISPATCH_METHOD);</div><div class="line"><a name="l03791"></a><span class="lineno"> 3791</span> }</div><div class="line"><a name="l03792"></a><span class="lineno"> 3792</span> </div><div class="line"><a name="l03793"></a><span class="lineno"> 3793</span> <span class="comment">/*</span></div><div class="line"><a name="l03794"></a><span class="lineno"> 3794</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03795"></a><span class="lineno"> 3795</span> <span class="comment"> * WIN32OLE#_getproperty(dispid, args, types)</span></div><div class="line"><a name="l03796"></a><span class="lineno"> 3796</span> <span class="comment"> *</span></div><div class="line"><a name="l03797"></a><span class="lineno"> 3797</span> <span class="comment"> * Runs the early binding method to get property.</span></div><div class="line"><a name="l03798"></a><span class="lineno"> 3798</span> <span class="comment"> * The 1st argument specifies dispatch ID,</span></div><div class="line"><a name="l03799"></a><span class="lineno"> 3799</span> <span class="comment"> * the 2nd argument specifies the array of arguments,</span></div><div class="line"><a name="l03800"></a><span class="lineno"> 3800</span> <span class="comment"> * the 3rd argument specifies the array of the type of arguments.</span></div><div class="line"><a name="l03801"></a><span class="lineno"> 3801</span> <span class="comment"> *</span></div><div class="line"><a name="l03802"></a><span class="lineno"> 3802</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l03803"></a><span class="lineno"> 3803</span> <span class="comment"> * puts excel._getproperty(558, [], []) # same effect as puts excel.visible</span></div><div class="line"><a name="l03804"></a><span class="lineno"> 3804</span> <span class="comment"> */</span></div><div class="line"><a name="l03805"></a><span class="lineno"> 3805</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03806"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a303d4c6c980af9ead5d8e06cdf4be789"> 3806</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a303d4c6c980af9ead5d8e06cdf4be789">fole_getproperty2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> dispid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> types)</div><div class="line"><a name="l03807"></a><span class="lineno"> 3807</span> {</div><div class="line"><a name="l03808"></a><span class="lineno"> 3808</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab5e5b1edb8c7947faa9e4838b4ac0a8c">ole_invoke2</a>(<span class="keyword">self</span>, dispid, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, types, DISPATCH_PROPERTYGET);</div><div class="line"><a name="l03809"></a><span class="lineno"> 3809</span> }</div><div class="line"><a name="l03810"></a><span class="lineno"> 3810</span> </div><div class="line"><a name="l03811"></a><span class="lineno"> 3811</span> <span class="comment">/*</span></div><div class="line"><a name="l03812"></a><span class="lineno"> 3812</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03813"></a><span class="lineno"> 3813</span> <span class="comment"> * WIN32OLE#_setproperty(dispid, args, types)</span></div><div class="line"><a name="l03814"></a><span class="lineno"> 3814</span> <span class="comment"> *</span></div><div class="line"><a name="l03815"></a><span class="lineno"> 3815</span> <span class="comment"> * Runs the early binding method to set property.</span></div><div class="line"><a name="l03816"></a><span class="lineno"> 3816</span> <span class="comment"> * The 1st argument specifies dispatch ID,</span></div><div class="line"><a name="l03817"></a><span class="lineno"> 3817</span> <span class="comment"> * the 2nd argument specifies the array of arguments,</span></div><div class="line"><a name="l03818"></a><span class="lineno"> 3818</span> <span class="comment"> * the 3rd argument specifies the array of the type of arguments.</span></div><div class="line"><a name="l03819"></a><span class="lineno"> 3819</span> <span class="comment"> *</span></div><div class="line"><a name="l03820"></a><span class="lineno"> 3820</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l03821"></a><span class="lineno"> 3821</span> <span class="comment"> * excel._setproperty(558, [true], [WIN32OLE::VARIANT::VT_BOOL]) # same effect as excel.visible = true</span></div><div class="line"><a name="l03822"></a><span class="lineno"> 3822</span> <span class="comment"> */</span></div><div class="line"><a name="l03823"></a><span class="lineno"> 3823</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03824"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aea975e81d1fe3056985636f1fa72e8b9"> 3824</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aea975e81d1fe3056985636f1fa72e8b9">fole_setproperty2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> dispid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> types)</div><div class="line"><a name="l03825"></a><span class="lineno"> 3825</span> {</div><div class="line"><a name="l03826"></a><span class="lineno"> 3826</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab5e5b1edb8c7947faa9e4838b4ac0a8c">ole_invoke2</a>(<span class="keyword">self</span>, dispid, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, types, DISPATCH_PROPERTYPUT);</div><div class="line"><a name="l03827"></a><span class="lineno"> 3827</span> }</div><div class="line"><a name="l03828"></a><span class="lineno"> 3828</span> </div><div class="line"><a name="l03829"></a><span class="lineno"> 3829</span> <span class="comment">/*</span></div><div class="line"><a name="l03830"></a><span class="lineno"> 3830</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03831"></a><span class="lineno"> 3831</span> <span class="comment"> * WIN32OLE[a1, a2, ...]=val</span></div><div class="line"><a name="l03832"></a><span class="lineno"> 3832</span> <span class="comment"> *</span></div><div class="line"><a name="l03833"></a><span class="lineno"> 3833</span> <span class="comment"> * Sets the value to WIN32OLE object specified by a1, a2, ...</span></div><div class="line"><a name="l03834"></a><span class="lineno"> 3834</span> <span class="comment"> *</span></div><div class="line"><a name="l03835"></a><span class="lineno"> 3835</span> <span class="comment"> * dict = WIN32OLE.new('Scripting.Dictionary')</span></div><div class="line"><a name="l03836"></a><span class="lineno"> 3836</span> <span class="comment"> * dict.add('ruby', 'RUBY')</span></div><div class="line"><a name="l03837"></a><span class="lineno"> 3837</span> <span class="comment"> * dict['ruby'] = 'Ruby'</span></div><div class="line"><a name="l03838"></a><span class="lineno"> 3838</span> <span class="comment"> * puts dict['ruby'] # => 'Ruby'</span></div><div class="line"><a name="l03839"></a><span class="lineno"> 3839</span> <span class="comment"> *</span></div><div class="line"><a name="l03840"></a><span class="lineno"> 3840</span> <span class="comment"> * Remark: You can not use this method to set the property value.</span></div><div class="line"><a name="l03841"></a><span class="lineno"> 3841</span> <span class="comment"> *</span></div><div class="line"><a name="l03842"></a><span class="lineno"> 3842</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l03843"></a><span class="lineno"> 3843</span> <span class="comment"> * # excel['Visible'] = true # This is error !!!</span></div><div class="line"><a name="l03844"></a><span class="lineno"> 3844</span> <span class="comment"> * excel.Visible = true # You should to use this style to set the property.</span></div><div class="line"><a name="l03845"></a><span class="lineno"> 3845</span> <span class="comment"> *</span></div><div class="line"><a name="l03846"></a><span class="lineno"> 3846</span> <span class="comment"> */</span></div><div class="line"><a name="l03847"></a><span class="lineno"> 3847</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03848"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a60f46a0254e9350ddf3ae68009748eb8"> 3848</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a60f46a0254e9350ddf3ae68009748eb8">fole_setproperty_with_bracket</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03849"></a><span class="lineno"> 3849</span> {</div><div class="line"><a name="l03850"></a><span class="lineno"> 3850</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac8860b58d270355634f963913731566a">ole_invoke</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="keyword">self</span>, DISPATCH_PROPERTYPUT, <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>);</div><div class="line"><a name="l03851"></a><span class="lineno"> 3851</span> }</div><div class="line"><a name="l03852"></a><span class="lineno"> 3852</span> </div><div class="line"><a name="l03853"></a><span class="lineno"> 3853</span> <span class="comment">/*</span></div><div class="line"><a name="l03854"></a><span class="lineno"> 3854</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03855"></a><span class="lineno"> 3855</span> <span class="comment"> * WIN32OLE.setproperty('property', [arg1, arg2,...] val)</span></div><div class="line"><a name="l03856"></a><span class="lineno"> 3856</span> <span class="comment"> *</span></div><div class="line"><a name="l03857"></a><span class="lineno"> 3857</span> <span class="comment"> * Sets property of OLE object.</span></div><div class="line"><a name="l03858"></a><span class="lineno"> 3858</span> <span class="comment"> * When you want to set property with argument, you can use this method.</span></div><div class="line"><a name="l03859"></a><span class="lineno"> 3859</span> <span class="comment"> *</span></div><div class="line"><a name="l03860"></a><span class="lineno"> 3860</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l03861"></a><span class="lineno"> 3861</span> <span class="comment"> * excel.Visible = true</span></div><div class="line"><a name="l03862"></a><span class="lineno"> 3862</span> <span class="comment"> * book = excel.workbooks.add</span></div><div class="line"><a name="l03863"></a><span class="lineno"> 3863</span> <span class="comment"> * sheet = book.worksheets(1)</span></div><div class="line"><a name="l03864"></a><span class="lineno"> 3864</span> <span class="comment"> * sheet.setproperty('Cells', 1, 2, 10) # => The B1 cell value is 10.</span></div><div class="line"><a name="l03865"></a><span class="lineno"> 3865</span> <span class="comment"> */</span></div><div class="line"><a name="l03866"></a><span class="lineno"> 3866</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03867"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a434cf8ff2ac0a88549687089a80ffb01"> 3867</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a434cf8ff2ac0a88549687089a80ffb01">fole_setproperty</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03868"></a><span class="lineno"> 3868</span> {</div><div class="line"><a name="l03869"></a><span class="lineno"> 3869</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac8860b58d270355634f963913731566a">ole_invoke</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="keyword">self</span>, DISPATCH_PROPERTYPUT, <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l03870"></a><span class="lineno"> 3870</span> }</div><div class="line"><a name="l03871"></a><span class="lineno"> 3871</span> </div><div class="line"><a name="l03872"></a><span class="lineno"> 3872</span> <span class="comment">/*</span></div><div class="line"><a name="l03873"></a><span class="lineno"> 3873</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03874"></a><span class="lineno"> 3874</span> <span class="comment"> * WIN32OLE[a1,a2,...]</span></div><div class="line"><a name="l03875"></a><span class="lineno"> 3875</span> <span class="comment"> *</span></div><div class="line"><a name="l03876"></a><span class="lineno"> 3876</span> <span class="comment"> * Returns the value of Collection specified by a1, a2,....</span></div><div class="line"><a name="l03877"></a><span class="lineno"> 3877</span> <span class="comment"> *</span></div><div class="line"><a name="l03878"></a><span class="lineno"> 3878</span> <span class="comment"> * dict = WIN32OLE.new('Scripting.Dictionary')</span></div><div class="line"><a name="l03879"></a><span class="lineno"> 3879</span> <span class="comment"> * dict.add('ruby', 'Ruby')</span></div><div class="line"><a name="l03880"></a><span class="lineno"> 3880</span> <span class="comment"> * puts dict['ruby'] # => 'Ruby' (same as `puts dict.item('ruby')')</span></div><div class="line"><a name="l03881"></a><span class="lineno"> 3881</span> <span class="comment"> *</span></div><div class="line"><a name="l03882"></a><span class="lineno"> 3882</span> <span class="comment"> * Remark: You can not use this method to get the property.</span></div><div class="line"><a name="l03883"></a><span class="lineno"> 3883</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l03884"></a><span class="lineno"> 3884</span> <span class="comment"> * # puts excel['Visible'] This is error !!!</span></div><div class="line"><a name="l03885"></a><span class="lineno"> 3885</span> <span class="comment"> * puts excel.Visible # You should to use this style to get the property.</span></div><div class="line"><a name="l03886"></a><span class="lineno"> 3886</span> <span class="comment"> *</span></div><div class="line"><a name="l03887"></a><span class="lineno"> 3887</span> <span class="comment"> */</span></div><div class="line"><a name="l03888"></a><span class="lineno"> 3888</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03889"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5032240cb2729bee87cc42cb5cc23695"> 3889</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5032240cb2729bee87cc42cb5cc23695">fole_getproperty_with_bracket</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03890"></a><span class="lineno"> 3890</span> {</div><div class="line"><a name="l03891"></a><span class="lineno"> 3891</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac8860b58d270355634f963913731566a">ole_invoke</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="keyword">self</span>, DISPATCH_PROPERTYGET, <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>);</div><div class="line"><a name="l03892"></a><span class="lineno"> 3892</span> }</div><div class="line"><a name="l03893"></a><span class="lineno"> 3893</span> </div><div class="line"><a name="l03894"></a><span class="lineno"> 3894</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03895"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aefb50e0a803b13434dbaac16c8373aec"> 3895</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aefb50e0a803b13434dbaac16c8373aec">ole_propertyput</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> property, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> value)</div><div class="line"><a name="l03896"></a><span class="lineno"> 3896</span> {</div><div class="line"><a name="l03897"></a><span class="lineno"> 3897</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l03898"></a><span class="lineno"> 3898</span>  <span class="keywordtype">unsigned</span> argErr;</div><div class="line"><a name="l03899"></a><span class="lineno"> 3899</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> index;</div><div class="line"><a name="l03900"></a><span class="lineno"> 3900</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l03901"></a><span class="lineno"> 3901</span>  EXCEPINFO excepinfo;</div><div class="line"><a name="l03902"></a><span class="lineno"> 3902</span>  DISPID dispID = DISPID_VALUE;</div><div class="line"><a name="l03903"></a><span class="lineno"> 3903</span>  DISPID dispIDParam = DISPID_PROPERTYPUT;</div><div class="line"><a name="l03904"></a><span class="lineno"> 3904</span>  USHORT <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a> = DISPATCH_PROPERTYPUT|DISPATCH_PROPERTYPUTREF;</div><div class="line"><a name="l03905"></a><span class="lineno"> 3905</span>  DISPPARAMS dispParams;</div><div class="line"><a name="l03906"></a><span class="lineno"> 3906</span>  VARIANTARG propertyValue[2];</div><div class="line"><a name="l03907"></a><span class="lineno"> 3907</span>  OLECHAR* pBuf[1];</div><div class="line"><a name="l03908"></a><span class="lineno"> 3908</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>;</div><div class="line"><a name="l03909"></a><span class="lineno"> 3909</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>;</div><div class="line"><a name="l03910"></a><span class="lineno"> 3910</span>  dispParams.rgdispidNamedArgs = &dispIDParam;</div><div class="line"><a name="l03911"></a><span class="lineno"> 3911</span>  dispParams.rgvarg = propertyValue;</div><div class="line"><a name="l03912"></a><span class="lineno"> 3912</span>  dispParams.cNamedArgs = 1;</div><div class="line"><a name="l03913"></a><span class="lineno"> 3913</span>  dispParams.cArgs = 1;</div><div class="line"><a name="l03914"></a><span class="lineno"> 3914</span> </div><div class="line"><a name="l03915"></a><span class="lineno"> 3915</span>  VariantInit(&propertyValue[0]);</div><div class="line"><a name="l03916"></a><span class="lineno"> 3916</span>  VariantInit(&propertyValue[1]);</div><div class="line"><a name="l03917"></a><span class="lineno"> 3917</span>  memset(&excepinfo, 0, <span class="keyword">sizeof</span>(excepinfo));</div><div class="line"><a name="l03918"></a><span class="lineno"> 3918</span> </div><div class="line"><a name="l03919"></a><span class="lineno"> 3919</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l03920"></a><span class="lineno"> 3920</span> </div><div class="line"><a name="l03921"></a><span class="lineno"> 3921</span>  <span class="comment">/* get ID from property name */</span></div><div class="line"><a name="l03922"></a><span class="lineno"> 3922</span>  pBuf[0] = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(property);</div><div class="line"><a name="l03923"></a><span class="lineno"> 3923</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->GetIDsOfNames(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, &IID_NULL,</div><div class="line"><a name="l03924"></a><span class="lineno"> 3924</span>  pBuf, 1, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, &dispID);</div><div class="line"><a name="l03925"></a><span class="lineno"> 3925</span>  SysFreeString(pBuf[0]);</div><div class="line"><a name="l03926"></a><span class="lineno"> 3926</span>  pBuf[0] = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l03927"></a><span class="lineno"> 3927</span> </div><div class="line"><a name="l03928"></a><span class="lineno"> 3928</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l03929"></a><span class="lineno"> 3929</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l03930"></a><span class="lineno"> 3930</span>  <span class="stringliteral">"unknown property or method: `%s'"</span>,</div><div class="line"><a name="l03931"></a><span class="lineno"> 3931</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(property));</div><div class="line"><a name="l03932"></a><span class="lineno"> 3932</span>  }</div><div class="line"><a name="l03933"></a><span class="lineno"> 3933</span>  <span class="comment">/* set property value */</span></div><div class="line"><a name="l03934"></a><span class="lineno"> 3934</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(value, &propertyValue[0]);</div><div class="line"><a name="l03935"></a><span class="lineno"> 3935</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->Invoke(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, dispID, &IID_NULL,</div><div class="line"><a name="l03936"></a><span class="lineno"> 3936</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a>, &dispParams,</div><div class="line"><a name="l03937"></a><span class="lineno"> 3937</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &excepinfo, &argErr);</div><div class="line"><a name="l03938"></a><span class="lineno"> 3938</span> </div><div class="line"><a name="l03939"></a><span class="lineno"> 3939</span>  <span class="keywordflow">for</span>(index = 0; index < dispParams.cArgs; ++index) {</div><div class="line"><a name="l03940"></a><span class="lineno"> 3940</span>  VariantClear(&propertyValue[index]);</div><div class="line"><a name="l03941"></a><span class="lineno"> 3941</span>  }</div><div class="line"><a name="l03942"></a><span class="lineno"> 3942</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l03943"></a><span class="lineno"> 3943</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ab7382ba089455a36bd5000ff84aa861f">ole_excepinfo2msg</a>(&excepinfo);</div><div class="line"><a name="l03944"></a><span class="lineno"> 3944</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"(in setting property `%s': )%s"</span>,</div><div class="line"><a name="l03945"></a><span class="lineno"> 3945</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(property),</div><div class="line"><a name="l03946"></a><span class="lineno"> 3946</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>));</div><div class="line"><a name="l03947"></a><span class="lineno"> 3947</span>  }</div><div class="line"><a name="l03948"></a><span class="lineno"> 3948</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03949"></a><span class="lineno"> 3949</span> }</div><div class="line"><a name="l03950"></a><span class="lineno"> 3950</span> </div><div class="line"><a name="l03951"></a><span class="lineno"> 3951</span> <span class="comment">/*</span></div><div class="line"><a name="l03952"></a><span class="lineno"> 3952</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03953"></a><span class="lineno"> 3953</span> <span class="comment"> * WIN32OLE#ole_free</span></div><div class="line"><a name="l03954"></a><span class="lineno"> 3954</span> <span class="comment"> *</span></div><div class="line"><a name="l03955"></a><span class="lineno"> 3955</span> <span class="comment"> * invokes Release method of Dispatch interface of WIN32OLE object.</span></div><div class="line"><a name="l03956"></a><span class="lineno"> 3956</span> <span class="comment"> * Usually, you do not need to call this method because Release method</span></div><div class="line"><a name="l03957"></a><span class="lineno"> 3957</span> <span class="comment"> * called automatically when WIN32OLE object garbaged.</span></div><div class="line"><a name="l03958"></a><span class="lineno"> 3958</span> <span class="comment"> *</span></div><div class="line"><a name="l03959"></a><span class="lineno"> 3959</span> <span class="comment"> */</span></div><div class="line"><a name="l03960"></a><span class="lineno"> 3960</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03961"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1c39e066aeecfd08aada95a49e3e48f4"> 3961</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1c39e066aeecfd08aada95a49e3e48f4">fole_free</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l03962"></a><span class="lineno"> 3962</span> {</div><div class="line"><a name="l03963"></a><span class="lineno"> 3963</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l03964"></a><span class="lineno"> 3964</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a98b91af598acb64fe8497413ce498766">rb_secure</a>(4);</div><div class="line"><a name="l03965"></a><span class="lineno"> 3965</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l03966"></a><span class="lineno"> 3966</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a7979d0bf1755bd9d1e72709d8fd3ff89">OLE_FREE</a>(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>);</div><div class="line"><a name="l03967"></a><span class="lineno"> 3967</span>  pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l03968"></a><span class="lineno"> 3968</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03969"></a><span class="lineno"> 3969</span> }</div><div class="line"><a name="l03970"></a><span class="lineno"> 3970</span> </div><div class="line"><a name="l03971"></a><span class="lineno"> 3971</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03972"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a75eb5195f049c793257cb535b69e3cf2"> 3972</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a75eb5195f049c793257cb535b69e3cf2">ole_each_sub</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> pEnumV)</div><div class="line"><a name="l03973"></a><span class="lineno"> 3973</span> {</div><div class="line"><a name="l03974"></a><span class="lineno"> 3974</span>  VARIANT variant;</div><div class="line"><a name="l03975"></a><span class="lineno"> 3975</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03976"></a><span class="lineno"> 3976</span>  IEnumVARIANT *pEnum = (IEnumVARIANT *)pEnumV;</div><div class="line"><a name="l03977"></a><span class="lineno"> 3977</span>  VariantInit(&variant);</div><div class="line"><a name="l03978"></a><span class="lineno"> 3978</span>  <span class="keywordflow">while</span>(pEnum->lpVtbl->Next(pEnum, 1, &variant, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) == <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>) {</div><div class="line"><a name="l03979"></a><span class="lineno"> 3979</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(&variant);</div><div class="line"><a name="l03980"></a><span class="lineno"> 3980</span>  VariantClear(&variant);</div><div class="line"><a name="l03981"></a><span class="lineno"> 3981</span>  VariantInit(&variant);</div><div class="line"><a name="l03982"></a><span class="lineno"> 3982</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ae6bd0c4ea4db971ebd569ca8f05c6b4a">rb_yield</a>(obj);</div><div class="line"><a name="l03983"></a><span class="lineno"> 3983</span>  }</div><div class="line"><a name="l03984"></a><span class="lineno"> 3984</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03985"></a><span class="lineno"> 3985</span> }</div><div class="line"><a name="l03986"></a><span class="lineno"> 3986</span> </div><div class="line"><a name="l03987"></a><span class="lineno"> 3987</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l03988"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a8c70df438e210da751d123ceed590ed3"> 3988</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a8c70df438e210da751d123ceed590ed3">ole_ienum_free</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> pEnumV)</div><div class="line"><a name="l03989"></a><span class="lineno"> 3989</span> {</div><div class="line"><a name="l03990"></a><span class="lineno"> 3990</span>  IEnumVARIANT *pEnum = (IEnumVARIANT *)pEnumV;</div><div class="line"><a name="l03991"></a><span class="lineno"> 3991</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pEnum);</div><div class="line"><a name="l03992"></a><span class="lineno"> 3992</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l03993"></a><span class="lineno"> 3993</span> }</div><div class="line"><a name="l03994"></a><span class="lineno"> 3994</span> </div><div class="line"><a name="l03995"></a><span class="lineno"> 3995</span> <span class="comment">/*</span></div><div class="line"><a name="l03996"></a><span class="lineno"> 3996</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l03997"></a><span class="lineno"> 3997</span> <span class="comment"> * WIN32OLE#each {|i|...}</span></div><div class="line"><a name="l03998"></a><span class="lineno"> 3998</span> <span class="comment"> *</span></div><div class="line"><a name="l03999"></a><span class="lineno"> 3999</span> <span class="comment"> * Iterates over each item of OLE collection which has IEnumVARIANT interface.</span></div><div class="line"><a name="l04000"></a><span class="lineno"> 4000</span> <span class="comment"> *</span></div><div class="line"><a name="l04001"></a><span class="lineno"> 4001</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l04002"></a><span class="lineno"> 4002</span> <span class="comment"> * book = excel.workbooks.add</span></div><div class="line"><a name="l04003"></a><span class="lineno"> 4003</span> <span class="comment"> * sheets = book.worksheets(1)</span></div><div class="line"><a name="l04004"></a><span class="lineno"> 4004</span> <span class="comment"> * cells = sheets.cells("A1:A5")</span></div><div class="line"><a name="l04005"></a><span class="lineno"> 4005</span> <span class="comment"> * cells.each do |cell|</span></div><div class="line"><a name="l04006"></a><span class="lineno"> 4006</span> <span class="comment"> * cell.value = 10</span></div><div class="line"><a name="l04007"></a><span class="lineno"> 4007</span> <span class="comment"> * end</span></div><div class="line"><a name="l04008"></a><span class="lineno"> 4008</span> <span class="comment"> */</span></div><div class="line"><a name="l04009"></a><span class="lineno"> 4009</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04010"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a83b4d0c7361c567ebe70479b937c3a7d"> 4010</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a83b4d0c7361c567ebe70479b937c3a7d">fole_each</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04011"></a><span class="lineno"> 4011</span> {</div><div class="line"><a name="l04012"></a><span class="lineno"> 4012</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>;</div><div class="line"><a name="l04013"></a><span class="lineno"> 4013</span> </div><div class="line"><a name="l04014"></a><span class="lineno"> 4014</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l04015"></a><span class="lineno"> 4015</span> </div><div class="line"><a name="l04016"></a><span class="lineno"> 4016</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> argErr;</div><div class="line"><a name="l04017"></a><span class="lineno"> 4017</span>  EXCEPINFO excepinfo;</div><div class="line"><a name="l04018"></a><span class="lineno"> 4018</span>  DISPPARAMS dispParams;</div><div class="line"><a name="l04019"></a><span class="lineno"> 4019</span>  VARIANT <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>;</div><div class="line"><a name="l04020"></a><span class="lineno"> 4020</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04021"></a><span class="lineno"> 4021</span>  IEnumVARIANT *pEnum = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l04022"></a><span class="lineno"> 4022</span>  <span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l04023"></a><span class="lineno"> 4023</span> </div><div class="line"><a name="l04024"></a><span class="lineno"> 4024</span>  <a class="code" href="../../db/d2e/intern_8h.html#ad174dd963d99ac27a67c8ef9cfa1eb58">RETURN_ENUMERATOR</a>(<span class="keyword">self</span>, 0, 0);</div><div class="line"><a name="l04025"></a><span class="lineno"> 4025</span> </div><div class="line"><a name="l04026"></a><span class="lineno"> 4026</span>  VariantInit(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l04027"></a><span class="lineno"> 4027</span>  dispParams.rgvarg = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l04028"></a><span class="lineno"> 4028</span>  dispParams.rgdispidNamedArgs = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l04029"></a><span class="lineno"> 4029</span>  dispParams.cNamedArgs = 0;</div><div class="line"><a name="l04030"></a><span class="lineno"> 4030</span>  dispParams.cArgs = 0;</div><div class="line"><a name="l04031"></a><span class="lineno"> 4031</span>  memset(&excepinfo, 0, <span class="keyword">sizeof</span>(excepinfo));</div><div class="line"><a name="l04032"></a><span class="lineno"> 4032</span> </div><div class="line"><a name="l04033"></a><span class="lineno"> 4033</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l04034"></a><span class="lineno"> 4034</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->Invoke(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, DISPID_NEWENUM,</div><div class="line"><a name="l04035"></a><span class="lineno"> 4035</span>  &IID_NULL, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>,</div><div class="line"><a name="l04036"></a><span class="lineno"> 4036</span>  DISPATCH_METHOD | DISPATCH_PROPERTYGET,</div><div class="line"><a name="l04037"></a><span class="lineno"> 4037</span>  &dispParams, &<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>,</div><div class="line"><a name="l04038"></a><span class="lineno"> 4038</span>  &excepinfo, &argErr);</div><div class="line"><a name="l04039"></a><span class="lineno"> 4039</span> </div><div class="line"><a name="l04040"></a><span class="lineno"> 4040</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04041"></a><span class="lineno"> 4041</span>  VariantClear(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l04042"></a><span class="lineno"> 4042</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to get IEnum Interface"</span>);</div><div class="line"><a name="l04043"></a><span class="lineno"> 4043</span>  }</div><div class="line"><a name="l04044"></a><span class="lineno"> 4044</span> </div><div class="line"><a name="l04045"></a><span class="lineno"> 4045</span>  <span class="keywordflow">if</span> (V_VT(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>) == VT_UNKNOWN) {</div><div class="line"><a name="l04046"></a><span class="lineno"> 4046</span>  hr = V_UNKNOWN(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>)->lpVtbl->QueryInterface(V_UNKNOWN(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>),</div><div class="line"><a name="l04047"></a><span class="lineno"> 4047</span>  &IID_IEnumVARIANT,</div><div class="line"><a name="l04048"></a><span class="lineno"> 4048</span>  &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l04049"></a><span class="lineno"> 4049</span>  pEnum = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l04050"></a><span class="lineno"> 4050</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (V_VT(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>) == VT_DISPATCH) {</div><div class="line"><a name="l04051"></a><span class="lineno"> 4051</span>  hr = V_DISPATCH(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>)->lpVtbl->QueryInterface(V_DISPATCH(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>),</div><div class="line"><a name="l04052"></a><span class="lineno"> 4052</span>  &IID_IEnumVARIANT,</div><div class="line"><a name="l04053"></a><span class="lineno"> 4053</span>  &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l04054"></a><span class="lineno"> 4054</span>  pEnum = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l04055"></a><span class="lineno"> 4055</span>  }</div><div class="line"><a name="l04056"></a><span class="lineno"> 4056</span>  <span class="keywordflow">if</span> (FAILED(hr) || !pEnum) {</div><div class="line"><a name="l04057"></a><span class="lineno"> 4057</span>  VariantClear(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l04058"></a><span class="lineno"> 4058</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to get IEnum Interface"</span>);</div><div class="line"><a name="l04059"></a><span class="lineno"> 4059</span>  }</div><div class="line"><a name="l04060"></a><span class="lineno"> 4060</span> </div><div class="line"><a name="l04061"></a><span class="lineno"> 4061</span>  VariantClear(&<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l04062"></a><span class="lineno"> 4062</span>  <a class="code" href="../../d3/d57/eval_8c.html#a8061198378fb16adeb931f90540b2839">rb_ensure</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a75eb5195f049c793257cb535b69e3cf2">ole_each_sub</a>, (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>)pEnum, <a class="code" href="../../d2/d99/win32ole_8c.html#a8c70df438e210da751d123ceed590ed3">ole_ienum_free</a>, (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>)pEnum);</div><div class="line"><a name="l04063"></a><span class="lineno"> 4063</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04064"></a><span class="lineno"> 4064</span> }</div><div class="line"><a name="l04065"></a><span class="lineno"> 4065</span> </div><div class="line"><a name="l04066"></a><span class="lineno"> 4066</span> <span class="comment">/*</span></div><div class="line"><a name="l04067"></a><span class="lineno"> 4067</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04068"></a><span class="lineno"> 4068</span> <span class="comment"> * WIN32OLE#method_missing(id [,arg1, arg2, ...])</span></div><div class="line"><a name="l04069"></a><span class="lineno"> 4069</span> <span class="comment"> *</span></div><div class="line"><a name="l04070"></a><span class="lineno"> 4070</span> <span class="comment"> * Calls WIN32OLE#invoke method.</span></div><div class="line"><a name="l04071"></a><span class="lineno"> 4071</span> <span class="comment"> */</span></div><div class="line"><a name="l04072"></a><span class="lineno"> 4072</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04073"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9f2d2aeab774970ad953b6541ee96dcf"> 4073</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a9f2d2aeab774970ad953b6541ee96dcf">fole_missing</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04074"></a><span class="lineno"> 4074</span> {</div><div class="line"><a name="l04075"></a><span class="lineno"> 4075</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afa5b9137f051ac26d7ccc8824f178233">ID</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a64ae40793ade89d800a8c5646d2980fc">id</a>;</div><div class="line"><a name="l04076"></a><span class="lineno"> 4076</span>  <span class="keyword">const</span> <span class="keywordtype">char</span>* mname;</div><div class="line"><a name="l04077"></a><span class="lineno"> 4077</span>  <span class="keywordtype">int</span> n;</div><div class="line"><a name="l04078"></a><span class="lineno"> 4078</span>  <span class="keywordtype">id</span> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afe85fbdbbfefb46b9c12e725c9a04970">rb_to_id</a>(<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>[0]);</div><div class="line"><a name="l04079"></a><span class="lineno"> 4079</span>  mname = <a class="code" href="../../d5/d11/ripper_8c.html#a877bc58c495643fcf49dc64c44631e72">rb_id2name</a>(<span class="keywordtype">id</span>);</div><div class="line"><a name="l04080"></a><span class="lineno"> 4080</span>  <span class="keywordflow">if</span>(!mname) {</div><div class="line"><a name="l04081"></a><span class="lineno"> 4081</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"fail: unknown method or property"</span>);</div><div class="line"><a name="l04082"></a><span class="lineno"> 4082</span>  }</div><div class="line"><a name="l04083"></a><span class="lineno"> 4083</span>  n = <a class="code" href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a>(mname);</div><div class="line"><a name="l04084"></a><span class="lineno"> 4084</span>  <span class="keywordflow">if</span>(mname[n-1] == <span class="charliteral">'='</span>) {</div><div class="line"><a name="l04085"></a><span class="lineno"> 4085</span>  <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>[0] = <a class="code" href="../../d5/de3/encoding_8h.html#a6707b730597e0e614213beb11670aca2">rb_enc_str_new</a>(mname, n-1, <a class="code" href="../../d2/d99/win32ole_8c.html#a047992a0ec88c62f680c1d484e33d5c5">cWIN32OLE_enc</a>);</div><div class="line"><a name="l04086"></a><span class="lineno"> 4086</span> </div><div class="line"><a name="l04087"></a><span class="lineno"> 4087</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aefb50e0a803b13434dbaac16c8373aec">ole_propertyput</a>(<span class="keyword">self</span>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>[0], <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>[1]);</div><div class="line"><a name="l04088"></a><span class="lineno"> 4088</span>  }</div><div class="line"><a name="l04089"></a><span class="lineno"> 4089</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l04090"></a><span class="lineno"> 4090</span>  <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>[0] = <a class="code" href="../../d5/de3/encoding_8h.html#a6707b730597e0e614213beb11670aca2">rb_enc_str_new</a>(mname, n, <a class="code" href="../../d2/d99/win32ole_8c.html#a047992a0ec88c62f680c1d484e33d5c5">cWIN32OLE_enc</a>);</div><div class="line"><a name="l04091"></a><span class="lineno"> 4091</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac8860b58d270355634f963913731566a">ole_invoke</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="keyword">self</span>, DISPATCH_METHOD|DISPATCH_PROPERTYGET, <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l04092"></a><span class="lineno"> 4092</span>  }</div><div class="line"><a name="l04093"></a><span class="lineno"> 4093</span> }</div><div class="line"><a name="l04094"></a><span class="lineno"> 4094</span> </div><div class="line"><a name="l04095"></a><span class="lineno"> 4095</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04096"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5a5a2fee3e635b885a209374da3f640d"> 4096</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5a5a2fee3e635b885a209374da3f640d">ole_method_sub</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeInfo *pOwnerTypeInfo, ITypeInfo *pTypeInfo, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>)</div><div class="line"><a name="l04097"></a><span class="lineno"> 4097</span> {</div><div class="line"><a name="l04098"></a><span class="lineno"> 4098</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04099"></a><span class="lineno"> 4099</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l04100"></a><span class="lineno"> 4100</span>  BSTR bstr;</div><div class="line"><a name="l04101"></a><span class="lineno"> 4101</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l04102"></a><span class="lineno"> 4102</span>  WORD <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l04103"></a><span class="lineno"> 4103</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> fname;</div><div class="line"><a name="l04104"></a><span class="lineno"> 4104</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> method = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04105"></a><span class="lineno"> 4105</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(pTypeInfo, &pTypeAttr);</div><div class="line"><a name="l04106"></a><span class="lineno"> 4106</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04107"></a><span class="lineno"> 4107</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetTypeAttr"</span>);</div><div class="line"><a name="l04108"></a><span class="lineno"> 4108</span>  }</div><div class="line"><a name="l04109"></a><span class="lineno"> 4109</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < pTypeAttr->cFuncs && method == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l04110"></a><span class="lineno"> 4110</span>  hr = pTypeInfo->lpVtbl->GetFuncDesc(pTypeInfo, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &pFuncDesc);</div><div class="line"><a name="l04111"></a><span class="lineno"> 4111</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l04112"></a><span class="lineno"> 4112</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04113"></a><span class="lineno"> 4113</span> </div><div class="line"><a name="l04114"></a><span class="lineno"> 4114</span>  hr = pTypeInfo->lpVtbl->GetDocumentation(pTypeInfo, pFuncDesc->memid,</div><div class="line"><a name="l04115"></a><span class="lineno"> 4115</span>  &bstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l04116"></a><span class="lineno"> 4116</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04117"></a><span class="lineno"> 4117</span>  pTypeInfo->lpVtbl->ReleaseFuncDesc(pTypeInfo, pFuncDesc);</div><div class="line"><a name="l04118"></a><span class="lineno"> 4118</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04119"></a><span class="lineno"> 4119</span>  }</div><div class="line"><a name="l04120"></a><span class="lineno"> 4120</span>  fname = <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr);</div><div class="line"><a name="l04121"></a><span class="lineno"> 4121</span>  <span class="keywordflow">if</span> (<a class="code" href="../../dc/db1/win32_8h.html#ac99ec3f1036620727a68aa8c25a8963c">strcasecmp</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(fname)) == 0) {</div><div class="line"><a name="l04122"></a><span class="lineno"> 4122</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a8c02b8f9190decc7b4077cb122d313fa">olemethod_set_member</a>(<span class="keyword">self</span>, pTypeInfo, pOwnerTypeInfo, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, fname);</div><div class="line"><a name="l04123"></a><span class="lineno"> 4123</span>  method = <span class="keyword">self</span>;</div><div class="line"><a name="l04124"></a><span class="lineno"> 4124</span>  }</div><div class="line"><a name="l04125"></a><span class="lineno"> 4125</span>  pTypeInfo->lpVtbl->ReleaseFuncDesc(pTypeInfo, pFuncDesc);</div><div class="line"><a name="l04126"></a><span class="lineno"> 4126</span>  pFuncDesc=<a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l04127"></a><span class="lineno"> 4127</span>  }</div><div class="line"><a name="l04128"></a><span class="lineno"> 4128</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(pTypeInfo, pTypeAttr);</div><div class="line"><a name="l04129"></a><span class="lineno"> 4129</span>  <span class="keywordflow">return</span> method;</div><div class="line"><a name="l04130"></a><span class="lineno"> 4130</span> }</div><div class="line"><a name="l04131"></a><span class="lineno"> 4131</span> </div><div class="line"><a name="l04132"></a><span class="lineno"> 4132</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04133"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a35aba07c890c79964cd4b15d29589917"> 4133</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a35aba07c890c79964cd4b15d29589917">olemethod_from_typeinfo</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeInfo *pTypeInfo, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>)</div><div class="line"><a name="l04134"></a><span class="lineno"> 4134</span> {</div><div class="line"><a name="l04135"></a><span class="lineno"> 4135</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04136"></a><span class="lineno"> 4136</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l04137"></a><span class="lineno"> 4137</span>  WORD <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l04138"></a><span class="lineno"> 4138</span>  HREFTYPE href;</div><div class="line"><a name="l04139"></a><span class="lineno"> 4139</span>  ITypeInfo *pRefTypeInfo;</div><div class="line"><a name="l04140"></a><span class="lineno"> 4140</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> method = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04141"></a><span class="lineno"> 4141</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(pTypeInfo, &pTypeAttr);</div><div class="line"><a name="l04142"></a><span class="lineno"> 4142</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04143"></a><span class="lineno"> 4143</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetTypeAttr"</span>);</div><div class="line"><a name="l04144"></a><span class="lineno"> 4144</span>  }</div><div class="line"><a name="l04145"></a><span class="lineno"> 4145</span>  method = <a class="code" href="../../d2/d99/win32ole_8c.html#a5a5a2fee3e635b885a209374da3f640d">ole_method_sub</a>(<span class="keyword">self</span>, 0, pTypeInfo, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>);</div><div class="line"><a name="l04146"></a><span class="lineno"> 4146</span>  <span class="keywordflow">if</span> (method != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l04147"></a><span class="lineno"> 4147</span>  <span class="keywordflow">return</span> method;</div><div class="line"><a name="l04148"></a><span class="lineno"> 4148</span>  }</div><div class="line"><a name="l04149"></a><span class="lineno"> 4149</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>=0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < pTypeAttr->cImplTypes && method == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++){</div><div class="line"><a name="l04150"></a><span class="lineno"> 4150</span>  hr = pTypeInfo->lpVtbl->GetRefTypeOfImplType(pTypeInfo, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &href);</div><div class="line"><a name="l04151"></a><span class="lineno"> 4151</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l04152"></a><span class="lineno"> 4152</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04153"></a><span class="lineno"> 4153</span>  hr = pTypeInfo->lpVtbl->GetRefTypeInfo(pTypeInfo, href, &pRefTypeInfo);</div><div class="line"><a name="l04154"></a><span class="lineno"> 4154</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l04155"></a><span class="lineno"> 4155</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04156"></a><span class="lineno"> 4156</span>  method = <a class="code" href="../../d2/d99/win32ole_8c.html#a5a5a2fee3e635b885a209374da3f640d">ole_method_sub</a>(<span class="keyword">self</span>, pTypeInfo, pRefTypeInfo, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>);</div><div class="line"><a name="l04157"></a><span class="lineno"> 4157</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pRefTypeInfo);</div><div class="line"><a name="l04158"></a><span class="lineno"> 4158</span>  }</div><div class="line"><a name="l04159"></a><span class="lineno"> 4159</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(pTypeInfo, pTypeAttr);</div><div class="line"><a name="l04160"></a><span class="lineno"> 4160</span>  <span class="keywordflow">return</span> method;</div><div class="line"><a name="l04161"></a><span class="lineno"> 4161</span> }</div><div class="line"><a name="l04162"></a><span class="lineno"> 4162</span> </div><div class="line"><a name="l04163"></a><span class="lineno"> 4163</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04164"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a09f78a0da33127d288dcd07efc6692c7"> 4164</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a09f78a0da33127d288dcd07efc6692c7">ole_methods_sub</a>(ITypeInfo *pOwnerTypeInfo, ITypeInfo *pTypeInfo, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> methods, <span class="keywordtype">int</span> mask)</div><div class="line"><a name="l04165"></a><span class="lineno"> 4165</span> {</div><div class="line"><a name="l04166"></a><span class="lineno"> 4166</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04167"></a><span class="lineno"> 4167</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l04168"></a><span class="lineno"> 4168</span>  BSTR bstr;</div><div class="line"><a name="l04169"></a><span class="lineno"> 4169</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l04170"></a><span class="lineno"> 4170</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> method;</div><div class="line"><a name="l04171"></a><span class="lineno"> 4171</span>  WORD <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l04172"></a><span class="lineno"> 4172</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(pTypeInfo, &pTypeAttr);</div><div class="line"><a name="l04173"></a><span class="lineno"> 4173</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04174"></a><span class="lineno"> 4174</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetTypeAttr"</span>);</div><div class="line"><a name="l04175"></a><span class="lineno"> 4175</span>  }</div><div class="line"><a name="l04176"></a><span class="lineno"> 4176</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < pTypeAttr->cFuncs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l04177"></a><span class="lineno"> 4177</span>  hr = pTypeInfo->lpVtbl->GetFuncDesc(pTypeInfo, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &pFuncDesc);</div><div class="line"><a name="l04178"></a><span class="lineno"> 4178</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l04179"></a><span class="lineno"> 4179</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04180"></a><span class="lineno"> 4180</span> </div><div class="line"><a name="l04181"></a><span class="lineno"> 4181</span>  hr = pTypeInfo->lpVtbl->GetDocumentation(pTypeInfo, pFuncDesc->memid,</div><div class="line"><a name="l04182"></a><span class="lineno"> 4182</span>  &bstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l04183"></a><span class="lineno"> 4183</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04184"></a><span class="lineno"> 4184</span>  pTypeInfo->lpVtbl->ReleaseFuncDesc(pTypeInfo, pFuncDesc);</div><div class="line"><a name="l04185"></a><span class="lineno"> 4185</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04186"></a><span class="lineno"> 4186</span>  }</div><div class="line"><a name="l04187"></a><span class="lineno"> 4187</span>  <span class="keywordflow">if</span>(pFuncDesc->invkind & mask) {</div><div class="line"><a name="l04188"></a><span class="lineno"> 4188</span>  method = <a class="code" href="../../d2/d99/win32ole_8c.html#afb37c29e28b1f960fbf22b605993354d">folemethod_s_allocate</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>);</div><div class="line"><a name="l04189"></a><span class="lineno"> 4189</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a8c02b8f9190decc7b4077cb122d313fa">olemethod_set_member</a>(method, pTypeInfo, pOwnerTypeInfo,</div><div class="line"><a name="l04190"></a><span class="lineno"> 4190</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr));</div><div class="line"><a name="l04191"></a><span class="lineno"> 4191</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(methods, method);</div><div class="line"><a name="l04192"></a><span class="lineno"> 4192</span>  }</div><div class="line"><a name="l04193"></a><span class="lineno"> 4193</span>  pTypeInfo->lpVtbl->ReleaseFuncDesc(pTypeInfo, pFuncDesc);</div><div class="line"><a name="l04194"></a><span class="lineno"> 4194</span>  pFuncDesc=<a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l04195"></a><span class="lineno"> 4195</span>  }</div><div class="line"><a name="l04196"></a><span class="lineno"> 4196</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(pTypeInfo, pTypeAttr);</div><div class="line"><a name="l04197"></a><span class="lineno"> 4197</span> </div><div class="line"><a name="l04198"></a><span class="lineno"> 4198</span>  <span class="keywordflow">return</span> methods;</div><div class="line"><a name="l04199"></a><span class="lineno"> 4199</span> }</div><div class="line"><a name="l04200"></a><span class="lineno"> 4200</span> </div><div class="line"><a name="l04201"></a><span class="lineno"> 4201</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04202"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aad5717d16ab405a0b4b7d3211ff72527"> 4202</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aad5717d16ab405a0b4b7d3211ff72527">ole_methods_from_typeinfo</a>(ITypeInfo *pTypeInfo, <span class="keywordtype">int</span> mask)</div><div class="line"><a name="l04203"></a><span class="lineno"> 4203</span> {</div><div class="line"><a name="l04204"></a><span class="lineno"> 4204</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04205"></a><span class="lineno"> 4205</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l04206"></a><span class="lineno"> 4206</span>  WORD <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l04207"></a><span class="lineno"> 4207</span>  HREFTYPE href;</div><div class="line"><a name="l04208"></a><span class="lineno"> 4208</span>  ITypeInfo *pRefTypeInfo;</div><div class="line"><a name="l04209"></a><span class="lineno"> 4209</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> methods = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l04210"></a><span class="lineno"> 4210</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(pTypeInfo, &pTypeAttr);</div><div class="line"><a name="l04211"></a><span class="lineno"> 4211</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04212"></a><span class="lineno"> 4212</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetTypeAttr"</span>);</div><div class="line"><a name="l04213"></a><span class="lineno"> 4213</span>  }</div><div class="line"><a name="l04214"></a><span class="lineno"> 4214</span> </div><div class="line"><a name="l04215"></a><span class="lineno"> 4215</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a09f78a0da33127d288dcd07efc6692c7">ole_methods_sub</a>(0, pTypeInfo, methods, mask);</div><div class="line"><a name="l04216"></a><span class="lineno"> 4216</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>=0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < pTypeAttr->cImplTypes; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++){</div><div class="line"><a name="l04217"></a><span class="lineno"> 4217</span>  hr = pTypeInfo->lpVtbl->GetRefTypeOfImplType(pTypeInfo, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &href);</div><div class="line"><a name="l04218"></a><span class="lineno"> 4218</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l04219"></a><span class="lineno"> 4219</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04220"></a><span class="lineno"> 4220</span>  hr = pTypeInfo->lpVtbl->GetRefTypeInfo(pTypeInfo, href, &pRefTypeInfo);</div><div class="line"><a name="l04221"></a><span class="lineno"> 4221</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l04222"></a><span class="lineno"> 4222</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04223"></a><span class="lineno"> 4223</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a09f78a0da33127d288dcd07efc6692c7">ole_methods_sub</a>(pTypeInfo, pRefTypeInfo, methods, mask);</div><div class="line"><a name="l04224"></a><span class="lineno"> 4224</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pRefTypeInfo);</div><div class="line"><a name="l04225"></a><span class="lineno"> 4225</span>  }</div><div class="line"><a name="l04226"></a><span class="lineno"> 4226</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(pTypeInfo, pTypeAttr);</div><div class="line"><a name="l04227"></a><span class="lineno"> 4227</span>  <span class="keywordflow">return</span> methods;</div><div class="line"><a name="l04228"></a><span class="lineno"> 4228</span> }</div><div class="line"><a name="l04229"></a><span class="lineno"> 4229</span> </div><div class="line"><a name="l04230"></a><span class="lineno"> 4230</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a></div><div class="line"><a name="l04231"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a4709657c93f560e08e25dc95bc54f689"> 4231</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4709657c93f560e08e25dc95bc54f689">typeinfo_from_ole</a>(<span class="keyword">struct</span> <a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole, ITypeInfo **ppti)</div><div class="line"><a name="l04232"></a><span class="lineno"> 4232</span> {</div><div class="line"><a name="l04233"></a><span class="lineno"> 4233</span>  ITypeInfo *pTypeInfo;</div><div class="line"><a name="l04234"></a><span class="lineno"> 4234</span>  ITypeLib *pTypeLib;</div><div class="line"><a name="l04235"></a><span class="lineno"> 4235</span>  BSTR bstr;</div><div class="line"><a name="l04236"></a><span class="lineno"> 4236</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l04237"></a><span class="lineno"> 4237</span>  UINT <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l04238"></a><span class="lineno"> 4238</span>  UINT <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>;</div><div class="line"><a name="l04239"></a><span class="lineno"> 4239</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>;</div><div class="line"><a name="l04240"></a><span class="lineno"> 4240</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->GetTypeInfo(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>,</div><div class="line"><a name="l04241"></a><span class="lineno"> 4241</span>  0, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, &pTypeInfo);</div><div class="line"><a name="l04242"></a><span class="lineno"> 4242</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l04243"></a><span class="lineno"> 4243</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to GetTypeInfo"</span>);</div><div class="line"><a name="l04244"></a><span class="lineno"> 4244</span>  }</div><div class="line"><a name="l04245"></a><span class="lineno"> 4245</span>  hr = pTypeInfo->lpVtbl->GetDocumentation(pTypeInfo,</div><div class="line"><a name="l04246"></a><span class="lineno"> 4246</span>  -1,</div><div class="line"><a name="l04247"></a><span class="lineno"> 4247</span>  &bstr,</div><div class="line"><a name="l04248"></a><span class="lineno"> 4248</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l04249"></a><span class="lineno"> 4249</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr);</div><div class="line"><a name="l04250"></a><span class="lineno"> 4250</span>  hr = pTypeInfo->lpVtbl->GetContainingTypeLib(pTypeInfo, &pTypeLib, &<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l04251"></a><span class="lineno"> 4251</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l04252"></a><span class="lineno"> 4252</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04253"></a><span class="lineno"> 4253</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to GetContainingTypeLib"</span>);</div><div class="line"><a name="l04254"></a><span class="lineno"> 4254</span>  }</div><div class="line"><a name="l04255"></a><span class="lineno"> 4255</span>  <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a> = pTypeLib->lpVtbl->GetTypeInfoCount(pTypeLib);</div><div class="line"><a name="l04256"></a><span class="lineno"> 4256</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l04257"></a><span class="lineno"> 4257</span>  hr = pTypeLib->lpVtbl->GetDocumentation(pTypeLib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>,</div><div class="line"><a name="l04258"></a><span class="lineno"> 4258</span>  &bstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l04259"></a><span class="lineno"> 4259</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr) && <a class="code" href="../../db/d2e/intern_8h.html#aabbf48d0162ce9a462b13b71ccf683a5">rb_str_cmp</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr), <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>) == 0) {</div><div class="line"><a name="l04260"></a><span class="lineno"> 4260</span>  hr = pTypeLib->lpVtbl->GetTypeInfo(pTypeLib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &pTypeInfo);</div><div class="line"><a name="l04261"></a><span class="lineno"> 4261</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l04262"></a><span class="lineno"> 4262</span>  *ppti = pTypeInfo;</div><div class="line"><a name="l04263"></a><span class="lineno"> 4263</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04264"></a><span class="lineno"> 4264</span>  }</div><div class="line"><a name="l04265"></a><span class="lineno"> 4265</span>  }</div><div class="line"><a name="l04266"></a><span class="lineno"> 4266</span>  }</div><div class="line"><a name="l04267"></a><span class="lineno"> 4267</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeLib);</div><div class="line"><a name="l04268"></a><span class="lineno"> 4268</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l04269"></a><span class="lineno"> 4269</span> }</div><div class="line"><a name="l04270"></a><span class="lineno"> 4270</span> </div><div class="line"><a name="l04271"></a><span class="lineno"> 4271</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04272"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa75ee71798a27c50db9f316e59e77b27"> 4272</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa75ee71798a27c50db9f316e59e77b27">ole_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <span class="keywordtype">int</span> mask)</div><div class="line"><a name="l04273"></a><span class="lineno"> 4273</span> {</div><div class="line"><a name="l04274"></a><span class="lineno"> 4274</span>  ITypeInfo *pTypeInfo;</div><div class="line"><a name="l04275"></a><span class="lineno"> 4275</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04276"></a><span class="lineno"> 4276</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> methods;</div><div class="line"><a name="l04277"></a><span class="lineno"> 4277</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l04278"></a><span class="lineno"> 4278</span> </div><div class="line"><a name="l04279"></a><span class="lineno"> 4279</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l04280"></a><span class="lineno"> 4280</span>  methods = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l04281"></a><span class="lineno"> 4281</span> </div><div class="line"><a name="l04282"></a><span class="lineno"> 4282</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a4709657c93f560e08e25dc95bc54f689">typeinfo_from_ole</a>(pole, &pTypeInfo);</div><div class="line"><a name="l04283"></a><span class="lineno"> 4283</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l04284"></a><span class="lineno"> 4284</span>  <span class="keywordflow">return</span> methods;</div><div class="line"><a name="l04285"></a><span class="lineno"> 4285</span>  <a class="code" href="../../dc/dcc/array_8c.html#a9569be4d3661f4ce54bf56b12a2d98a8">rb_ary_concat</a>(methods, <a class="code" href="../../d2/d99/win32ole_8c.html#aad5717d16ab405a0b4b7d3211ff72527">ole_methods_from_typeinfo</a>(pTypeInfo, mask));</div><div class="line"><a name="l04286"></a><span class="lineno"> 4286</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l04287"></a><span class="lineno"> 4287</span>  <span class="keywordflow">return</span> methods;</div><div class="line"><a name="l04288"></a><span class="lineno"> 4288</span> }</div><div class="line"><a name="l04289"></a><span class="lineno"> 4289</span> </div><div class="line"><a name="l04290"></a><span class="lineno"> 4290</span> <span class="comment">/*</span></div><div class="line"><a name="l04291"></a><span class="lineno"> 4291</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04292"></a><span class="lineno"> 4292</span> <span class="comment"> * WIN32OLE#ole_methods</span></div><div class="line"><a name="l04293"></a><span class="lineno"> 4293</span> <span class="comment"> *</span></div><div class="line"><a name="l04294"></a><span class="lineno"> 4294</span> <span class="comment"> * Returns the array of WIN32OLE_METHOD object.</span></div><div class="line"><a name="l04295"></a><span class="lineno"> 4295</span> <span class="comment"> * The element is OLE method of WIN32OLE object.</span></div><div class="line"><a name="l04296"></a><span class="lineno"> 4296</span> <span class="comment"> *</span></div><div class="line"><a name="l04297"></a><span class="lineno"> 4297</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l04298"></a><span class="lineno"> 4298</span> <span class="comment"> * methods = excel.ole_methods</span></div><div class="line"><a name="l04299"></a><span class="lineno"> 4299</span> <span class="comment"> *</span></div><div class="line"><a name="l04300"></a><span class="lineno"> 4300</span> <span class="comment"> */</span></div><div class="line"><a name="l04301"></a><span class="lineno"> 4301</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04302"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7172b0aee359977f81f71251db26edc5"> 4302</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7172b0aee359977f81f71251db26edc5">fole_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04303"></a><span class="lineno"> 4303</span> {</div><div class="line"><a name="l04304"></a><span class="lineno"> 4304</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa75ee71798a27c50db9f316e59e77b27">ole_methods</a>( <span class="keyword">self</span>, INVOKE_FUNC | INVOKE_PROPERTYGET | INVOKE_PROPERTYPUT | INVOKE_PROPERTYPUTREF);</div><div class="line"><a name="l04305"></a><span class="lineno"> 4305</span> }</div><div class="line"><a name="l04306"></a><span class="lineno"> 4306</span> </div><div class="line"><a name="l04307"></a><span class="lineno"> 4307</span> <span class="comment">/*</span></div><div class="line"><a name="l04308"></a><span class="lineno"> 4308</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04309"></a><span class="lineno"> 4309</span> <span class="comment"> * WIN32OLE#ole_get_methods</span></div><div class="line"><a name="l04310"></a><span class="lineno"> 4310</span> <span class="comment"> *</span></div><div class="line"><a name="l04311"></a><span class="lineno"> 4311</span> <span class="comment"> * Returns the array of WIN32OLE_METHOD object .</span></div><div class="line"><a name="l04312"></a><span class="lineno"> 4312</span> <span class="comment"> * The element of the array is property (gettable) of WIN32OLE object.</span></div><div class="line"><a name="l04313"></a><span class="lineno"> 4313</span> <span class="comment"> *</span></div><div class="line"><a name="l04314"></a><span class="lineno"> 4314</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l04315"></a><span class="lineno"> 4315</span> <span class="comment"> * properties = excel.ole_get_methods</span></div><div class="line"><a name="l04316"></a><span class="lineno"> 4316</span> <span class="comment"> */</span></div><div class="line"><a name="l04317"></a><span class="lineno"> 4317</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04318"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aaff897843a1cf2bfb5857b77f78bd7f2"> 4318</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aaff897843a1cf2bfb5857b77f78bd7f2">fole_get_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04319"></a><span class="lineno"> 4319</span> {</div><div class="line"><a name="l04320"></a><span class="lineno"> 4320</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa75ee71798a27c50db9f316e59e77b27">ole_methods</a>( <span class="keyword">self</span>, INVOKE_PROPERTYGET);</div><div class="line"><a name="l04321"></a><span class="lineno"> 4321</span> }</div><div class="line"><a name="l04322"></a><span class="lineno"> 4322</span> </div><div class="line"><a name="l04323"></a><span class="lineno"> 4323</span> <span class="comment">/*</span></div><div class="line"><a name="l04324"></a><span class="lineno"> 4324</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04325"></a><span class="lineno"> 4325</span> <span class="comment"> * WIN32OLE#ole_put_methods</span></div><div class="line"><a name="l04326"></a><span class="lineno"> 4326</span> <span class="comment"> *</span></div><div class="line"><a name="l04327"></a><span class="lineno"> 4327</span> <span class="comment"> * Returns the array of WIN32OLE_METHOD object .</span></div><div class="line"><a name="l04328"></a><span class="lineno"> 4328</span> <span class="comment"> * The element of the array is property (settable) of WIN32OLE object.</span></div><div class="line"><a name="l04329"></a><span class="lineno"> 4329</span> <span class="comment"> *</span></div><div class="line"><a name="l04330"></a><span class="lineno"> 4330</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l04331"></a><span class="lineno"> 4331</span> <span class="comment"> * properties = excel.ole_put_methods</span></div><div class="line"><a name="l04332"></a><span class="lineno"> 4332</span> <span class="comment"> */</span></div><div class="line"><a name="l04333"></a><span class="lineno"> 4333</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04334"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1a1d911e7d192419a0bc563c1134e1f1"> 4334</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1a1d911e7d192419a0bc563c1134e1f1">fole_put_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04335"></a><span class="lineno"> 4335</span> {</div><div class="line"><a name="l04336"></a><span class="lineno"> 4336</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa75ee71798a27c50db9f316e59e77b27">ole_methods</a>( <span class="keyword">self</span>, INVOKE_PROPERTYPUT|INVOKE_PROPERTYPUTREF);</div><div class="line"><a name="l04337"></a><span class="lineno"> 4337</span> }</div><div class="line"><a name="l04338"></a><span class="lineno"> 4338</span> </div><div class="line"><a name="l04339"></a><span class="lineno"> 4339</span> <span class="comment">/*</span></div><div class="line"><a name="l04340"></a><span class="lineno"> 4340</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04341"></a><span class="lineno"> 4341</span> <span class="comment"> * WIN32OLE#ole_func_methods</span></div><div class="line"><a name="l04342"></a><span class="lineno"> 4342</span> <span class="comment"> *</span></div><div class="line"><a name="l04343"></a><span class="lineno"> 4343</span> <span class="comment"> * Returns the array of WIN32OLE_METHOD object .</span></div><div class="line"><a name="l04344"></a><span class="lineno"> 4344</span> <span class="comment"> * The element of the array is property (settable) of WIN32OLE object.</span></div><div class="line"><a name="l04345"></a><span class="lineno"> 4345</span> <span class="comment"> *</span></div><div class="line"><a name="l04346"></a><span class="lineno"> 4346</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l04347"></a><span class="lineno"> 4347</span> <span class="comment"> * properties = excel.ole_func_methods</span></div><div class="line"><a name="l04348"></a><span class="lineno"> 4348</span> <span class="comment"> *</span></div><div class="line"><a name="l04349"></a><span class="lineno"> 4349</span> <span class="comment"> */</span></div><div class="line"><a name="l04350"></a><span class="lineno"> 4350</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04351"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6a99140a5476f0da87c2c9aba0752f0f"> 4351</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6a99140a5476f0da87c2c9aba0752f0f">fole_func_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04352"></a><span class="lineno"> 4352</span> {</div><div class="line"><a name="l04353"></a><span class="lineno"> 4353</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa75ee71798a27c50db9f316e59e77b27">ole_methods</a>( <span class="keyword">self</span>, INVOKE_FUNC);</div><div class="line"><a name="l04354"></a><span class="lineno"> 4354</span> }</div><div class="line"><a name="l04355"></a><span class="lineno"> 4355</span> </div><div class="line"><a name="l04356"></a><span class="lineno"> 4356</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04357"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5e12333be1ac8271835f370a58abb6b2"> 4357</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5e12333be1ac8271835f370a58abb6b2">ole_type_from_itypeinfo</a>(ITypeInfo *pTypeInfo)</div><div class="line"><a name="l04358"></a><span class="lineno"> 4358</span> {</div><div class="line"><a name="l04359"></a><span class="lineno"> 4359</span>  ITypeLib *pTypeLib;</div><div class="line"><a name="l04360"></a><span class="lineno"> 4360</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04361"></a><span class="lineno"> 4361</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04362"></a><span class="lineno"> 4362</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> index;</div><div class="line"><a name="l04363"></a><span class="lineno"> 4363</span>  BSTR bstr;</div><div class="line"><a name="l04364"></a><span class="lineno"> 4364</span> </div><div class="line"><a name="l04365"></a><span class="lineno"> 4365</span>  hr = pTypeInfo->lpVtbl->GetContainingTypeLib( pTypeInfo, &pTypeLib, &index );</div><div class="line"><a name="l04366"></a><span class="lineno"> 4366</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l04367"></a><span class="lineno"> 4367</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04368"></a><span class="lineno"> 4368</span>  }</div><div class="line"><a name="l04369"></a><span class="lineno"> 4369</span>  hr = pTypeLib->lpVtbl->GetDocumentation( pTypeLib, index,</div><div class="line"><a name="l04370"></a><span class="lineno"> 4370</span>  &bstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l04371"></a><span class="lineno"> 4371</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeLib);</div><div class="line"><a name="l04372"></a><span class="lineno"> 4372</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04373"></a><span class="lineno"> 4373</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04374"></a><span class="lineno"> 4374</span>  }</div><div class="line"><a name="l04375"></a><span class="lineno"> 4375</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ac3ae981871b66fdb4efa0a05ad712256">foletype_s_allocate</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>);</div><div class="line"><a name="l04376"></a><span class="lineno"> 4376</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4ddfcdbb09e0396eab8089feb9923abd">oletype_set_member</a>(<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>, pTypeInfo, <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr));</div><div class="line"><a name="l04377"></a><span class="lineno"> 4377</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l04378"></a><span class="lineno"> 4378</span> }</div><div class="line"><a name="l04379"></a><span class="lineno"> 4379</span> </div><div class="line"><a name="l04380"></a><span class="lineno"> 4380</span> <span class="comment">/*</span></div><div class="line"><a name="l04381"></a><span class="lineno"> 4381</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04382"></a><span class="lineno"> 4382</span> <span class="comment"> * WIN32OLE#ole_type</span></div><div class="line"><a name="l04383"></a><span class="lineno"> 4383</span> <span class="comment"> *</span></div><div class="line"><a name="l04384"></a><span class="lineno"> 4384</span> <span class="comment"> * Returns WIN32OLE_TYPE object.</span></div><div class="line"><a name="l04385"></a><span class="lineno"> 4385</span> <span class="comment"> *</span></div><div class="line"><a name="l04386"></a><span class="lineno"> 4386</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l04387"></a><span class="lineno"> 4387</span> <span class="comment"> * tobj = excel.ole_type</span></div><div class="line"><a name="l04388"></a><span class="lineno"> 4388</span> <span class="comment"> */</span></div><div class="line"><a name="l04389"></a><span class="lineno"> 4389</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04390"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a190323bc253935196667f23146769fb3"> 4390</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a190323bc253935196667f23146769fb3">fole_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04391"></a><span class="lineno"> 4391</span> {</div><div class="line"><a name="l04392"></a><span class="lineno"> 4392</span>  ITypeInfo *pTypeInfo;</div><div class="line"><a name="l04393"></a><span class="lineno"> 4393</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04394"></a><span class="lineno"> 4394</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l04395"></a><span class="lineno"> 4395</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>;</div><div class="line"><a name="l04396"></a><span class="lineno"> 4396</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04397"></a><span class="lineno"> 4397</span> </div><div class="line"><a name="l04398"></a><span class="lineno"> 4398</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l04399"></a><span class="lineno"> 4399</span> </div><div class="line"><a name="l04400"></a><span class="lineno"> 4400</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->GetTypeInfo( pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, 0, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, &pTypeInfo );</div><div class="line"><a name="l04401"></a><span class="lineno"> 4401</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l04402"></a><span class="lineno"> 4402</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to GetTypeInfo"</span>);</div><div class="line"><a name="l04403"></a><span class="lineno"> 4403</span>  }</div><div class="line"><a name="l04404"></a><span class="lineno"> 4404</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a5e12333be1ac8271835f370a58abb6b2">ole_type_from_itypeinfo</a>(pTypeInfo);</div><div class="line"><a name="l04405"></a><span class="lineno"> 4405</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l04406"></a><span class="lineno"> 4406</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l04407"></a><span class="lineno"> 4407</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to create WIN32OLE_TYPE obj from ITypeInfo"</span>);</div><div class="line"><a name="l04408"></a><span class="lineno"> 4408</span>  }</div><div class="line"><a name="l04409"></a><span class="lineno"> 4409</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l04410"></a><span class="lineno"> 4410</span> }</div><div class="line"><a name="l04411"></a><span class="lineno"> 4411</span> </div><div class="line"><a name="l04412"></a><span class="lineno"> 4412</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04413"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a06b2abe1d4bcdc1f68258fff57e08f68"> 4413</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a06b2abe1d4bcdc1f68258fff57e08f68">ole_typelib_from_itypeinfo</a>(ITypeInfo *pTypeInfo)</div><div class="line"><a name="l04414"></a><span class="lineno"> 4414</span> {</div><div class="line"><a name="l04415"></a><span class="lineno"> 4415</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04416"></a><span class="lineno"> 4416</span>  ITypeLib *pTypeLib;</div><div class="line"><a name="l04417"></a><span class="lineno"> 4417</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> index;</div><div class="line"><a name="l04418"></a><span class="lineno"> 4418</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> retval = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04419"></a><span class="lineno"> 4419</span> </div><div class="line"><a name="l04420"></a><span class="lineno"> 4420</span>  hr = pTypeInfo->lpVtbl->GetContainingTypeLib(pTypeInfo, &pTypeLib, &index);</div><div class="line"><a name="l04421"></a><span class="lineno"> 4421</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l04422"></a><span class="lineno"> 4422</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04423"></a><span class="lineno"> 4423</span>  }</div><div class="line"><a name="l04424"></a><span class="lineno"> 4424</span>  retval = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"allocate"</span>), 0);</div><div class="line"><a name="l04425"></a><span class="lineno"> 4425</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a9b6b7a1648ea3f09e2572eaa5ee4ca94">oletypelib_set_member</a>(retval, pTypeLib);</div><div class="line"><a name="l04426"></a><span class="lineno"> 4426</span>  <span class="keywordflow">return</span> retval;</div><div class="line"><a name="l04427"></a><span class="lineno"> 4427</span> }</div><div class="line"><a name="l04428"></a><span class="lineno"> 4428</span> </div><div class="line"><a name="l04429"></a><span class="lineno"> 4429</span> <span class="comment">/*</span></div><div class="line"><a name="l04430"></a><span class="lineno"> 4430</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04431"></a><span class="lineno"> 4431</span> <span class="comment"> * WIN32OLE#ole_typelib -> The WIN32OLE_TYPELIB object</span></div><div class="line"><a name="l04432"></a><span class="lineno"> 4432</span> <span class="comment"> *</span></div><div class="line"><a name="l04433"></a><span class="lineno"> 4433</span> <span class="comment"> * Returns the WIN32OLE_TYPELIB object. The object represents the</span></div><div class="line"><a name="l04434"></a><span class="lineno"> 4434</span> <span class="comment"> * type library which contains the WIN32OLE object.</span></div><div class="line"><a name="l04435"></a><span class="lineno"> 4435</span> <span class="comment"> *</span></div><div class="line"><a name="l04436"></a><span class="lineno"> 4436</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l04437"></a><span class="lineno"> 4437</span> <span class="comment"> * tlib = excel.ole_typelib</span></div><div class="line"><a name="l04438"></a><span class="lineno"> 4438</span> <span class="comment"> * puts tlib.name # -> 'Microsoft Excel 9.0 Object Library'</span></div><div class="line"><a name="l04439"></a><span class="lineno"> 4439</span> <span class="comment"> */</span></div><div class="line"><a name="l04440"></a><span class="lineno"> 4440</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04441"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#abcd6997bfbcd8f8c44472b2f05480e39"> 4441</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#abcd6997bfbcd8f8c44472b2f05480e39">fole_typelib</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04442"></a><span class="lineno"> 4442</span> {</div><div class="line"><a name="l04443"></a><span class="lineno"> 4443</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l04444"></a><span class="lineno"> 4444</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04445"></a><span class="lineno"> 4445</span>  ITypeInfo *pTypeInfo;</div><div class="line"><a name="l04446"></a><span class="lineno"> 4446</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>;</div><div class="line"><a name="l04447"></a><span class="lineno"> 4447</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vtlib = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04448"></a><span class="lineno"> 4448</span> </div><div class="line"><a name="l04449"></a><span class="lineno"> 4449</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l04450"></a><span class="lineno"> 4450</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->GetTypeInfo(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>,</div><div class="line"><a name="l04451"></a><span class="lineno"> 4451</span>  0, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, &pTypeInfo);</div><div class="line"><a name="l04452"></a><span class="lineno"> 4452</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l04453"></a><span class="lineno"> 4453</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to GetTypeInfo"</span>);</div><div class="line"><a name="l04454"></a><span class="lineno"> 4454</span>  }</div><div class="line"><a name="l04455"></a><span class="lineno"> 4455</span>  vtlib = <a class="code" href="../../d2/d99/win32ole_8c.html#a06b2abe1d4bcdc1f68258fff57e08f68">ole_typelib_from_itypeinfo</a>(pTypeInfo);</div><div class="line"><a name="l04456"></a><span class="lineno"> 4456</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l04457"></a><span class="lineno"> 4457</span>  <span class="keywordflow">if</span> (vtlib == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l04458"></a><span class="lineno"> 4458</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to get type library info."</span>);</div><div class="line"><a name="l04459"></a><span class="lineno"> 4459</span>  }</div><div class="line"><a name="l04460"></a><span class="lineno"> 4460</span>  <span class="keywordflow">return</span> vtlib;</div><div class="line"><a name="l04461"></a><span class="lineno"> 4461</span> }</div><div class="line"><a name="l04462"></a><span class="lineno"> 4462</span> </div><div class="line"><a name="l04463"></a><span class="lineno"> 4463</span> <span class="comment">/*</span></div><div class="line"><a name="l04464"></a><span class="lineno"> 4464</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04465"></a><span class="lineno"> 4465</span> <span class="comment"> * WIN32OLE#ole_query_interface(iid) -> WIN32OLE object</span></div><div class="line"><a name="l04466"></a><span class="lineno"> 4466</span> <span class="comment"> *</span></div><div class="line"><a name="l04467"></a><span class="lineno"> 4467</span> <span class="comment"> * Returns WIN32OLE object for a specific dispatch or dual</span></div><div class="line"><a name="l04468"></a><span class="lineno"> 4468</span> <span class="comment"> * interface specified by iid.</span></div><div class="line"><a name="l04469"></a><span class="lineno"> 4469</span> <span class="comment"> *</span></div><div class="line"><a name="l04470"></a><span class="lineno"> 4470</span> <span class="comment"> * ie = WIN32OLE.new('InternetExplorer.Application')</span></div><div class="line"><a name="l04471"></a><span class="lineno"> 4471</span> <span class="comment"> * ie_web_app = ie.ole_query_interface('{0002DF05-0000-0000-C000-000000000046}') # => WIN32OLE object for dispinterface IWebBrowserApp</span></div><div class="line"><a name="l04472"></a><span class="lineno"> 4472</span> <span class="comment"> */</span></div><div class="line"><a name="l04473"></a><span class="lineno"> 4473</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04474"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1c2427bf2f78d7dc92d556bea85123ce"> 4474</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1c2427bf2f78d7dc92d556bea85123ce">fole_query_interface</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> str_iid)</div><div class="line"><a name="l04475"></a><span class="lineno"> 4475</span> {</div><div class="line"><a name="l04476"></a><span class="lineno"> 4476</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04477"></a><span class="lineno"> 4477</span>  OLECHAR *pBuf;</div><div class="line"><a name="l04478"></a><span class="lineno"> 4478</span>  IID iid;</div><div class="line"><a name="l04479"></a><span class="lineno"> 4479</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l04480"></a><span class="lineno"> 4480</span>  IDispatch *<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l04481"></a><span class="lineno"> 4481</span>  <span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l04482"></a><span class="lineno"> 4482</span> </div><div class="line"><a name="l04483"></a><span class="lineno"> 4483</span>  pBuf = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(str_iid);</div><div class="line"><a name="l04484"></a><span class="lineno"> 4484</span>  hr = CLSIDFromString(pBuf, &iid);</div><div class="line"><a name="l04485"></a><span class="lineno"> 4485</span>  SysFreeString(pBuf);</div><div class="line"><a name="l04486"></a><span class="lineno"> 4486</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l04487"></a><span class="lineno"> 4487</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l04488"></a><span class="lineno"> 4488</span>  <span class="stringliteral">"invalid iid: `%s'"</span>,</div><div class="line"><a name="l04489"></a><span class="lineno"> 4489</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(str_iid));</div><div class="line"><a name="l04490"></a><span class="lineno"> 4490</span>  }</div><div class="line"><a name="l04491"></a><span class="lineno"> 4491</span> </div><div class="line"><a name="l04492"></a><span class="lineno"> 4492</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l04493"></a><span class="lineno"> 4493</span>  <span class="keywordflow">if</span>(!pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>) {</div><div class="line"><a name="l04494"></a><span class="lineno"> 4494</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to get dispatch interface"</span>);</div><div class="line"><a name="l04495"></a><span class="lineno"> 4495</span>  }</div><div class="line"><a name="l04496"></a><span class="lineno"> 4496</span> </div><div class="line"><a name="l04497"></a><span class="lineno"> 4497</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->QueryInterface(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, &iid,</div><div class="line"><a name="l04498"></a><span class="lineno"> 4498</span>  &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l04499"></a><span class="lineno"> 4499</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l04500"></a><span class="lineno"> 4500</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l04501"></a><span class="lineno"> 4501</span>  <span class="stringliteral">"failed to get interface `%s'"</span>,</div><div class="line"><a name="l04502"></a><span class="lineno"> 4502</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(str_iid));</div><div class="line"><a name="l04503"></a><span class="lineno"> 4503</span>  }</div><div class="line"><a name="l04504"></a><span class="lineno"> 4504</span> </div><div class="line"><a name="l04505"></a><span class="lineno"> 4505</span>  <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l04506"></a><span class="lineno"> 4506</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ada66e0a6c7b3c3915de52016aa828026">create_win32ole_object</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, 0, 0);</div><div class="line"><a name="l04507"></a><span class="lineno"> 4507</span> }</div><div class="line"><a name="l04508"></a><span class="lineno"> 4508</span> </div><div class="line"><a name="l04509"></a><span class="lineno"> 4509</span> <span class="comment">/*</span></div><div class="line"><a name="l04510"></a><span class="lineno"> 4510</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04511"></a><span class="lineno"> 4511</span> <span class="comment"> * WIN32OLE#ole_respond_to?(method) -> true or false</span></div><div class="line"><a name="l04512"></a><span class="lineno"> 4512</span> <span class="comment"> *</span></div><div class="line"><a name="l04513"></a><span class="lineno"> 4513</span> <span class="comment"> * Returns true when OLE object has OLE method, otherwise returns false.</span></div><div class="line"><a name="l04514"></a><span class="lineno"> 4514</span> <span class="comment"> *</span></div><div class="line"><a name="l04515"></a><span class="lineno"> 4515</span> <span class="comment"> * ie = WIN32OLE.new('InternetExplorer.Application')</span></div><div class="line"><a name="l04516"></a><span class="lineno"> 4516</span> <span class="comment"> * ie.ole_respond_to?("gohome") => true</span></div><div class="line"><a name="l04517"></a><span class="lineno"> 4517</span> <span class="comment"> */</span></div><div class="line"><a name="l04518"></a><span class="lineno"> 4518</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04519"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af8996048ad14314fa7aef6d4d775731b"> 4519</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#af8996048ad14314fa7aef6d4d775731b">fole_respond_to</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> method)</div><div class="line"><a name="l04520"></a><span class="lineno"> 4520</span> {</div><div class="line"><a name="l04521"></a><span class="lineno"> 4521</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l04522"></a><span class="lineno"> 4522</span>  BSTR wcmdname;</div><div class="line"><a name="l04523"></a><span class="lineno"> 4523</span>  DISPID DispID;</div><div class="line"><a name="l04524"></a><span class="lineno"> 4524</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04525"></a><span class="lineno"> 4525</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a98b91af598acb64fe8497413ce498766">rb_secure</a>(4);</div><div class="line"><a name="l04526"></a><span class="lineno"> 4526</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(method) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a> && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(method) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a>) {</div><div class="line"><a name="l04527"></a><span class="lineno"> 4527</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"wrong argument type (expected String or Symbol)"</span>);</div><div class="line"><a name="l04528"></a><span class="lineno"> 4528</span>  }</div><div class="line"><a name="l04529"></a><span class="lineno"> 4529</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(method) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a>) {</div><div class="line"><a name="l04530"></a><span class="lineno"> 4530</span>  method = <a class="code" href="../../db/d2e/intern_8h.html#a6b530fce35a344ec394c08c6643cdd8a">rb_sym_to_s</a>(method);</div><div class="line"><a name="l04531"></a><span class="lineno"> 4531</span>  }</div><div class="line"><a name="l04532"></a><span class="lineno"> 4532</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l04533"></a><span class="lineno"> 4533</span>  wcmdname = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(method);</div><div class="line"><a name="l04534"></a><span class="lineno"> 4534</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->GetIDsOfNames( pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, &IID_NULL,</div><div class="line"><a name="l04535"></a><span class="lineno"> 4535</span>  &wcmdname, 1, <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>, &DispID);</div><div class="line"><a name="l04536"></a><span class="lineno"> 4536</span>  SysFreeString(wcmdname);</div><div class="line"><a name="l04537"></a><span class="lineno"> 4537</span>  <span class="keywordflow">return</span> SUCCEEDED(hr) ? <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a> : <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l04538"></a><span class="lineno"> 4538</span> }</div><div class="line"><a name="l04539"></a><span class="lineno"> 4539</span> </div><div class="line"><a name="l04540"></a><span class="lineno"> 4540</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a></div><div class="line"><a name="l04541"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#abb98c7449dc683552d93e0ab76a4d8ee"> 4541</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#abb98c7449dc683552d93e0ab76a4d8ee">ole_docinfo_from_type</a>(ITypeInfo *pTypeInfo, BSTR *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>, BSTR *helpstr, <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> *helpcontext, BSTR *helpfile)</div><div class="line"><a name="l04542"></a><span class="lineno"> 4542</span> {</div><div class="line"><a name="l04543"></a><span class="lineno"> 4543</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04544"></a><span class="lineno"> 4544</span>  ITypeLib *pTypeLib;</div><div class="line"><a name="l04545"></a><span class="lineno"> 4545</span>  UINT <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l04546"></a><span class="lineno"> 4546</span> </div><div class="line"><a name="l04547"></a><span class="lineno"> 4547</span>  hr = pTypeInfo->lpVtbl->GetContainingTypeLib(pTypeInfo, &pTypeLib, &<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l04548"></a><span class="lineno"> 4548</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04549"></a><span class="lineno"> 4549</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l04550"></a><span class="lineno"> 4550</span>  }</div><div class="line"><a name="l04551"></a><span class="lineno"> 4551</span> </div><div class="line"><a name="l04552"></a><span class="lineno"> 4552</span>  hr = pTypeLib->lpVtbl->GetDocumentation(pTypeLib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>,</div><div class="line"><a name="l04553"></a><span class="lineno"> 4553</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>, helpstr,</div><div class="line"><a name="l04554"></a><span class="lineno"> 4554</span>  helpcontext, helpfile);</div><div class="line"><a name="l04555"></a><span class="lineno"> 4555</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04556"></a><span class="lineno"> 4556</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeLib);</div><div class="line"><a name="l04557"></a><span class="lineno"> 4557</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l04558"></a><span class="lineno"> 4558</span>  }</div><div class="line"><a name="l04559"></a><span class="lineno"> 4559</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeLib);</div><div class="line"><a name="l04560"></a><span class="lineno"> 4560</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l04561"></a><span class="lineno"> 4561</span> }</div><div class="line"><a name="l04562"></a><span class="lineno"> 4562</span> </div><div class="line"><a name="l04563"></a><span class="lineno"> 4563</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04564"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af41d300448e793508177e5b703c4d0eb"> 4564</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#af41d300448e793508177e5b703c4d0eb">ole_usertype2val</a>(ITypeInfo *pTypeInfo, TYPEDESC *pTypeDesc, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typedetails)</div><div class="line"><a name="l04565"></a><span class="lineno"> 4565</span> {</div><div class="line"><a name="l04566"></a><span class="lineno"> 4566</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04567"></a><span class="lineno"> 4567</span>  BSTR bstr;</div><div class="line"><a name="l04568"></a><span class="lineno"> 4568</span>  ITypeInfo *pRefTypeInfo;</div><div class="line"><a name="l04569"></a><span class="lineno"> 4569</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04570"></a><span class="lineno"> 4570</span> </div><div class="line"><a name="l04571"></a><span class="lineno"> 4571</span>  hr = pTypeInfo->lpVtbl->GetRefTypeInfo(pTypeInfo,</div><div class="line"><a name="l04572"></a><span class="lineno"> 4572</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ac921f4ad75c62ef506c5d282bc39eb26">V_UNION1</a>(pTypeDesc, hreftype),</div><div class="line"><a name="l04573"></a><span class="lineno"> 4573</span>  &pRefTypeInfo);</div><div class="line"><a name="l04574"></a><span class="lineno"> 4574</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l04575"></a><span class="lineno"> 4575</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04576"></a><span class="lineno"> 4576</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#abb98c7449dc683552d93e0ab76a4d8ee">ole_docinfo_from_type</a>(pRefTypeInfo, &bstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l04577"></a><span class="lineno"> 4577</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l04578"></a><span class="lineno"> 4578</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pRefTypeInfo);</div><div class="line"><a name="l04579"></a><span class="lineno"> 4579</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04580"></a><span class="lineno"> 4580</span>  }</div><div class="line"><a name="l04581"></a><span class="lineno"> 4581</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pRefTypeInfo);</div><div class="line"><a name="l04582"></a><span class="lineno"> 4582</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr);</div><div class="line"><a name="l04583"></a><span class="lineno"> 4583</span>  <span class="keywordflow">if</span>(typedetails != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l04584"></a><span class="lineno"> 4584</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(typedetails, <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>);</div><div class="line"><a name="l04585"></a><span class="lineno"> 4585</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l04586"></a><span class="lineno"> 4586</span> }</div><div class="line"><a name="l04587"></a><span class="lineno"> 4587</span> </div><div class="line"><a name="l04588"></a><span class="lineno"> 4588</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04589"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3270db47af757cbdea41b2e897fd5b63"> 4589</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3270db47af757cbdea41b2e897fd5b63">ole_ptrtype2val</a>(ITypeInfo *pTypeInfo, TYPEDESC *pTypeDesc, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typedetails)</div><div class="line"><a name="l04590"></a><span class="lineno"> 4590</span> {</div><div class="line"><a name="l04591"></a><span class="lineno"> 4591</span>  TYPEDESC *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = pTypeDesc;</div><div class="line"><a name="l04592"></a><span class="lineno"> 4592</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">""</span>);</div><div class="line"><a name="l04593"></a><span class="lineno"> 4593</span> </div><div class="line"><a name="l04594"></a><span class="lineno"> 4594</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>->vt == VT_PTR || <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>->vt == VT_SAFEARRAY) {</div><div class="line"><a name="l04595"></a><span class="lineno"> 4595</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ac921f4ad75c62ef506c5d282bc39eb26">V_UNION1</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>, lptdesc);</div><div class="line"><a name="l04596"></a><span class="lineno"> 4596</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a>(pTypeInfo, <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>, typedetails);</div><div class="line"><a name="l04597"></a><span class="lineno"> 4597</span>  }</div><div class="line"><a name="l04598"></a><span class="lineno"> 4598</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l04599"></a><span class="lineno"> 4599</span> }</div><div class="line"><a name="l04600"></a><span class="lineno"> 4600</span> </div><div class="line"><a name="l04601"></a><span class="lineno"> 4601</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04602"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b"> 4602</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a>(ITypeInfo *pTypeInfo, TYPEDESC *pTypeDesc, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typedetails)</div><div class="line"><a name="l04603"></a><span class="lineno"> 4603</span> {</div><div class="line"><a name="l04604"></a><span class="lineno"> 4604</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> str;</div><div class="line"><a name="l04605"></a><span class="lineno"> 4605</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typestr = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04606"></a><span class="lineno"> 4606</span>  <span class="keywordflow">switch</span>(pTypeDesc->vt) {</div><div class="line"><a name="l04607"></a><span class="lineno"> 4607</span>  <span class="keywordflow">case</span> VT_I2:</div><div class="line"><a name="l04608"></a><span class="lineno"> 4608</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"I2"</span>);</div><div class="line"><a name="l04609"></a><span class="lineno"> 4609</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04610"></a><span class="lineno"> 4610</span>  <span class="keywordflow">case</span> VT_I4:</div><div class="line"><a name="l04611"></a><span class="lineno"> 4611</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"I4"</span>);</div><div class="line"><a name="l04612"></a><span class="lineno"> 4612</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04613"></a><span class="lineno"> 4613</span>  <span class="keywordflow">case</span> VT_R4:</div><div class="line"><a name="l04614"></a><span class="lineno"> 4614</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"R4"</span>);</div><div class="line"><a name="l04615"></a><span class="lineno"> 4615</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04616"></a><span class="lineno"> 4616</span>  <span class="keywordflow">case</span> VT_R8:</div><div class="line"><a name="l04617"></a><span class="lineno"> 4617</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"R8"</span>);</div><div class="line"><a name="l04618"></a><span class="lineno"> 4618</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04619"></a><span class="lineno"> 4619</span>  <span class="keywordflow">case</span> VT_CY:</div><div class="line"><a name="l04620"></a><span class="lineno"> 4620</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"CY"</span>);</div><div class="line"><a name="l04621"></a><span class="lineno"> 4621</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04622"></a><span class="lineno"> 4622</span>  <span class="keywordflow">case</span> VT_DATE:</div><div class="line"><a name="l04623"></a><span class="lineno"> 4623</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"DATE"</span>);</div><div class="line"><a name="l04624"></a><span class="lineno"> 4624</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04625"></a><span class="lineno"> 4625</span>  <span class="keywordflow">case</span> VT_BSTR:</div><div class="line"><a name="l04626"></a><span class="lineno"> 4626</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"BSTR"</span>);</div><div class="line"><a name="l04627"></a><span class="lineno"> 4627</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04628"></a><span class="lineno"> 4628</span>  <span class="keywordflow">case</span> VT_BOOL:</div><div class="line"><a name="l04629"></a><span class="lineno"> 4629</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"BOOL"</span>);</div><div class="line"><a name="l04630"></a><span class="lineno"> 4630</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04631"></a><span class="lineno"> 4631</span>  <span class="keywordflow">case</span> VT_VARIANT:</div><div class="line"><a name="l04632"></a><span class="lineno"> 4632</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"VARIANT"</span>);</div><div class="line"><a name="l04633"></a><span class="lineno"> 4633</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04634"></a><span class="lineno"> 4634</span>  <span class="keywordflow">case</span> VT_DECIMAL:</div><div class="line"><a name="l04635"></a><span class="lineno"> 4635</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"DECIMAL"</span>);</div><div class="line"><a name="l04636"></a><span class="lineno"> 4636</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04637"></a><span class="lineno"> 4637</span>  <span class="keywordflow">case</span> VT_I1:</div><div class="line"><a name="l04638"></a><span class="lineno"> 4638</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"I1"</span>);</div><div class="line"><a name="l04639"></a><span class="lineno"> 4639</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04640"></a><span class="lineno"> 4640</span>  <span class="keywordflow">case</span> VT_UI1:</div><div class="line"><a name="l04641"></a><span class="lineno"> 4641</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"UI1"</span>);</div><div class="line"><a name="l04642"></a><span class="lineno"> 4642</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04643"></a><span class="lineno"> 4643</span>  <span class="keywordflow">case</span> VT_UI2:</div><div class="line"><a name="l04644"></a><span class="lineno"> 4644</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"UI2"</span>);</div><div class="line"><a name="l04645"></a><span class="lineno"> 4645</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04646"></a><span class="lineno"> 4646</span>  <span class="keywordflow">case</span> VT_UI4:</div><div class="line"><a name="l04647"></a><span class="lineno"> 4647</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"UI4"</span>);</div><div class="line"><a name="l04648"></a><span class="lineno"> 4648</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04649"></a><span class="lineno"> 4649</span> <span class="preprocessor">#if (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__)</span></div><div class="line"><a name="l04650"></a><span class="lineno"> 4650</span>  <span class="keywordflow">case</span> VT_I8:</div><div class="line"><a name="l04651"></a><span class="lineno"> 4651</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"I8"</span>);</div><div class="line"><a name="l04652"></a><span class="lineno"> 4652</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04653"></a><span class="lineno"> 4653</span>  <span class="keywordflow">case</span> VT_UI8:</div><div class="line"><a name="l04654"></a><span class="lineno"> 4654</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"UI8"</span>);</div><div class="line"><a name="l04655"></a><span class="lineno"> 4655</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04656"></a><span class="lineno"> 4656</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l04657"></a><span class="lineno"> 4657</span>  <span class="keywordflow">case</span> VT_INT:</div><div class="line"><a name="l04658"></a><span class="lineno"> 4658</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"INT"</span>);</div><div class="line"><a name="l04659"></a><span class="lineno"> 4659</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04660"></a><span class="lineno"> 4660</span>  <span class="keywordflow">case</span> VT_UINT:</div><div class="line"><a name="l04661"></a><span class="lineno"> 4661</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"UINT"</span>);</div><div class="line"><a name="l04662"></a><span class="lineno"> 4662</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04663"></a><span class="lineno"> 4663</span>  <span class="keywordflow">case</span> VT_VOID:</div><div class="line"><a name="l04664"></a><span class="lineno"> 4664</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"VOID"</span>);</div><div class="line"><a name="l04665"></a><span class="lineno"> 4665</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04666"></a><span class="lineno"> 4666</span>  <span class="keywordflow">case</span> VT_HRESULT:</div><div class="line"><a name="l04667"></a><span class="lineno"> 4667</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"HRESULT"</span>);</div><div class="line"><a name="l04668"></a><span class="lineno"> 4668</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04669"></a><span class="lineno"> 4669</span>  <span class="keywordflow">case</span> VT_PTR:</div><div class="line"><a name="l04670"></a><span class="lineno"> 4670</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"PTR"</span>);</div><div class="line"><a name="l04671"></a><span class="lineno"> 4671</span>  <span class="keywordflow">if</span>(typedetails != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l04672"></a><span class="lineno"> 4672</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(typedetails, typestr);</div><div class="line"><a name="l04673"></a><span class="lineno"> 4673</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3270db47af757cbdea41b2e897fd5b63">ole_ptrtype2val</a>(pTypeInfo, pTypeDesc, typedetails);</div><div class="line"><a name="l04674"></a><span class="lineno"> 4674</span>  <span class="keywordflow">case</span> VT_SAFEARRAY:</div><div class="line"><a name="l04675"></a><span class="lineno"> 4675</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"SAFEARRAY"</span>);</div><div class="line"><a name="l04676"></a><span class="lineno"> 4676</span>  <span class="keywordflow">if</span>(typedetails != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l04677"></a><span class="lineno"> 4677</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(typedetails, typestr);</div><div class="line"><a name="l04678"></a><span class="lineno"> 4678</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3270db47af757cbdea41b2e897fd5b63">ole_ptrtype2val</a>(pTypeInfo, pTypeDesc, typedetails);</div><div class="line"><a name="l04679"></a><span class="lineno"> 4679</span>  <span class="keywordflow">case</span> VT_CARRAY:</div><div class="line"><a name="l04680"></a><span class="lineno"> 4680</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"CARRAY"</span>);</div><div class="line"><a name="l04681"></a><span class="lineno"> 4681</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04682"></a><span class="lineno"> 4682</span>  <span class="keywordflow">case</span> VT_USERDEFINED:</div><div class="line"><a name="l04683"></a><span class="lineno"> 4683</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"USERDEFINED"</span>);</div><div class="line"><a name="l04684"></a><span class="lineno"> 4684</span>  <span class="keywordflow">if</span> (typedetails != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l04685"></a><span class="lineno"> 4685</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(typedetails, typestr);</div><div class="line"><a name="l04686"></a><span class="lineno"> 4686</span>  str = <a class="code" href="../../d2/d99/win32ole_8c.html#af41d300448e793508177e5b703c4d0eb">ole_usertype2val</a>(pTypeInfo, pTypeDesc, typedetails);</div><div class="line"><a name="l04687"></a><span class="lineno"> 4687</span>  <span class="keywordflow">if</span> (str != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l04688"></a><span class="lineno"> 4688</span>  <span class="keywordflow">return</span> str;</div><div class="line"><a name="l04689"></a><span class="lineno"> 4689</span>  }</div><div class="line"><a name="l04690"></a><span class="lineno"> 4690</span>  <span class="keywordflow">return</span> typestr;</div><div class="line"><a name="l04691"></a><span class="lineno"> 4691</span>  <span class="keywordflow">case</span> VT_UNKNOWN:</div><div class="line"><a name="l04692"></a><span class="lineno"> 4692</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"UNKNOWN"</span>);</div><div class="line"><a name="l04693"></a><span class="lineno"> 4693</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04694"></a><span class="lineno"> 4694</span>  <span class="keywordflow">case</span> VT_DISPATCH:</div><div class="line"><a name="l04695"></a><span class="lineno"> 4695</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"DISPATCH"</span>);</div><div class="line"><a name="l04696"></a><span class="lineno"> 4696</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04697"></a><span class="lineno"> 4697</span>  <span class="keywordflow">case</span> VT_ERROR:</div><div class="line"><a name="l04698"></a><span class="lineno"> 4698</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"ERROR"</span>);</div><div class="line"><a name="l04699"></a><span class="lineno"> 4699</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04700"></a><span class="lineno"> 4700</span>  <span class="keywordflow">case</span> VT_LPWSTR:</div><div class="line"><a name="l04701"></a><span class="lineno"> 4701</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"LPWSTR"</span>);</div><div class="line"><a name="l04702"></a><span class="lineno"> 4702</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04703"></a><span class="lineno"> 4703</span>  <span class="keywordflow">case</span> VT_LPSTR:</div><div class="line"><a name="l04704"></a><span class="lineno"> 4704</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"LPSTR"</span>);</div><div class="line"><a name="l04705"></a><span class="lineno"> 4705</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04706"></a><span class="lineno"> 4706</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l04707"></a><span class="lineno"> 4707</span>  typestr = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"Unknown Type "</span>);</div><div class="line"><a name="l04708"></a><span class="lineno"> 4708</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2f12f7ad949fa2e6abb64f2311c6e2c5">rb_str_concat</a>(typestr, <a class="code" href="../../db/d2e/intern_8h.html#a514248a396e8910d80016bc5d3785a81">rb_fix2str</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(pTypeDesc->vt), 10));</div><div class="line"><a name="l04709"></a><span class="lineno"> 4709</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04710"></a><span class="lineno"> 4710</span>  }</div><div class="line"><a name="l04711"></a><span class="lineno"> 4711</span>  <span class="keywordflow">if</span> (typedetails != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l04712"></a><span class="lineno"> 4712</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(typedetails, typestr);</div><div class="line"><a name="l04713"></a><span class="lineno"> 4713</span>  <span class="keywordflow">return</span> typestr;</div><div class="line"><a name="l04714"></a><span class="lineno"> 4714</span> }</div><div class="line"><a name="l04715"></a><span class="lineno"> 4715</span> </div><div class="line"><a name="l04716"></a><span class="lineno"> 4716</span> <span class="comment">/*</span></div><div class="line"><a name="l04717"></a><span class="lineno"> 4717</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04718"></a><span class="lineno"> 4718</span> <span class="comment"> * WIN32OLE#ole_method_help(method)</span></div><div class="line"><a name="l04719"></a><span class="lineno"> 4719</span> <span class="comment"> *</span></div><div class="line"><a name="l04720"></a><span class="lineno"> 4720</span> <span class="comment"> * Returns WIN32OLE_METHOD object corresponding with method</span></div><div class="line"><a name="l04721"></a><span class="lineno"> 4721</span> <span class="comment"> * specified by 1st argument.</span></div><div class="line"><a name="l04722"></a><span class="lineno"> 4722</span> <span class="comment"> *</span></div><div class="line"><a name="l04723"></a><span class="lineno"> 4723</span> <span class="comment"> * excel = WIN32OLE.new('Excel.Application')</span></div><div class="line"><a name="l04724"></a><span class="lineno"> 4724</span> <span class="comment"> * method = excel.ole_method_help('Quit')</span></div><div class="line"><a name="l04725"></a><span class="lineno"> 4725</span> <span class="comment"> *</span></div><div class="line"><a name="l04726"></a><span class="lineno"> 4726</span> <span class="comment"> */</span></div><div class="line"><a name="l04727"></a><span class="lineno"> 4727</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04728"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a14d93d21d7208d39e5c3c63d50214abd"> 4728</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a14d93d21d7208d39e5c3c63d50214abd">fole_method_help</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> cmdname)</div><div class="line"><a name="l04729"></a><span class="lineno"> 4729</span> {</div><div class="line"><a name="l04730"></a><span class="lineno"> 4730</span>  ITypeInfo *pTypeInfo;</div><div class="line"><a name="l04731"></a><span class="lineno"> 4731</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04732"></a><span class="lineno"> 4732</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l04733"></a><span class="lineno"> 4733</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> method, obj;</div><div class="line"><a name="l04734"></a><span class="lineno"> 4734</span> </div><div class="line"><a name="l04735"></a><span class="lineno"> 4735</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0381640e2905c1b3e104194f91697ca4">SafeStringValue</a>(cmdname);</div><div class="line"><a name="l04736"></a><span class="lineno"> 4736</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l04737"></a><span class="lineno"> 4737</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a4709657c93f560e08e25dc95bc54f689">typeinfo_from_ole</a>(pole, &pTypeInfo);</div><div class="line"><a name="l04738"></a><span class="lineno"> 4738</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l04739"></a><span class="lineno"> 4739</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to get ITypeInfo"</span>);</div><div class="line"><a name="l04740"></a><span class="lineno"> 4740</span>  method = <a class="code" href="../../d2/d99/win32ole_8c.html#afb37c29e28b1f960fbf22b605993354d">folemethod_s_allocate</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>);</div><div class="line"><a name="l04741"></a><span class="lineno"> 4741</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a35aba07c890c79964cd4b15d29589917">olemethod_from_typeinfo</a>(method, pTypeInfo, cmdname);</div><div class="line"><a name="l04742"></a><span class="lineno"> 4742</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l04743"></a><span class="lineno"> 4743</span>  <span class="keywordflow">if</span> (obj == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l04744"></a><span class="lineno"> 4744</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"not found %s"</span>,</div><div class="line"><a name="l04745"></a><span class="lineno"> 4745</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(cmdname));</div><div class="line"><a name="l04746"></a><span class="lineno"> 4746</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l04747"></a><span class="lineno"> 4747</span> }</div><div class="line"><a name="l04748"></a><span class="lineno"> 4748</span> </div><div class="line"><a name="l04749"></a><span class="lineno"> 4749</span> <span class="comment">/*</span></div><div class="line"><a name="l04750"></a><span class="lineno"> 4750</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04751"></a><span class="lineno"> 4751</span> <span class="comment"> * WIN32OLE#ole_activex_initialize() -> Qnil</span></div><div class="line"><a name="l04752"></a><span class="lineno"> 4752</span> <span class="comment"> *</span></div><div class="line"><a name="l04753"></a><span class="lineno"> 4753</span> <span class="comment"> * Initialize WIN32OLE object(ActiveX Control) by calling</span></div><div class="line"><a name="l04754"></a><span class="lineno"> 4754</span> <span class="comment"> * IPersistMemory::InitNew.</span></div><div class="line"><a name="l04755"></a><span class="lineno"> 4755</span> <span class="comment"> *</span></div><div class="line"><a name="l04756"></a><span class="lineno"> 4756</span> <span class="comment"> * Before calling OLE method, some kind of the ActiveX controls</span></div><div class="line"><a name="l04757"></a><span class="lineno"> 4757</span> <span class="comment"> * created with MFC should be initialized by calling</span></div><div class="line"><a name="l04758"></a><span class="lineno"> 4758</span> <span class="comment"> * IPersistXXX::InitNew.</span></div><div class="line"><a name="l04759"></a><span class="lineno"> 4759</span> <span class="comment"> *</span></div><div class="line"><a name="l04760"></a><span class="lineno"> 4760</span> <span class="comment"> * If and only if you received the exception "HRESULT error code:</span></div><div class="line"><a name="l04761"></a><span class="lineno"> 4761</span> <span class="comment"> * 0x8000ffff catastrophic failure", try this method before</span></div><div class="line"><a name="l04762"></a><span class="lineno"> 4762</span> <span class="comment"> * invoking any ole_method.</span></div><div class="line"><a name="l04763"></a><span class="lineno"> 4763</span> <span class="comment"> *</span></div><div class="line"><a name="l04764"></a><span class="lineno"> 4764</span> <span class="comment"> * obj = WIN32OLE.new("ProgID_or_GUID_of_ActiveX_Control")</span></div><div class="line"><a name="l04765"></a><span class="lineno"> 4765</span> <span class="comment"> * obj.ole_activex_initialize</span></div><div class="line"><a name="l04766"></a><span class="lineno"> 4766</span> <span class="comment"> * obj.method(...)</span></div><div class="line"><a name="l04767"></a><span class="lineno"> 4767</span> <span class="comment"> *</span></div><div class="line"><a name="l04768"></a><span class="lineno"> 4768</span> <span class="comment"> */</span></div><div class="line"><a name="l04769"></a><span class="lineno"> 4769</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04770"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a60fc00d3ccda920f10703894be73a31d"> 4770</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a60fc00d3ccda920f10703894be73a31d">fole_activex_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04771"></a><span class="lineno"> 4771</span> {</div><div class="line"><a name="l04772"></a><span class="lineno"> 4772</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l04773"></a><span class="lineno"> 4773</span>  IPersistMemory *pPersistMemory;</div><div class="line"><a name="l04774"></a><span class="lineno"> 4774</span>  <span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l04775"></a><span class="lineno"> 4775</span> </div><div class="line"><a name="l04776"></a><span class="lineno"> 4776</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l04777"></a><span class="lineno"> 4777</span> </div><div class="line"><a name="l04778"></a><span class="lineno"> 4778</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(<span class="keyword">self</span>, pole);</div><div class="line"><a name="l04779"></a><span class="lineno"> 4779</span> </div><div class="line"><a name="l04780"></a><span class="lineno"> 4780</span>  hr = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->QueryInterface(pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, &IID_IPersistMemory, &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l04781"></a><span class="lineno"> 4781</span>  pPersistMemory = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l04782"></a><span class="lineno"> 4782</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l04783"></a><span class="lineno"> 4783</span>  hr = pPersistMemory->lpVtbl->InitNew(pPersistMemory);</div><div class="line"><a name="l04784"></a><span class="lineno"> 4784</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pPersistMemory);</div><div class="line"><a name="l04785"></a><span class="lineno"> 4785</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l04786"></a><span class="lineno"> 4786</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04787"></a><span class="lineno"> 4787</span>  }</div><div class="line"><a name="l04788"></a><span class="lineno"> 4788</span>  }</div><div class="line"><a name="l04789"></a><span class="lineno"> 4789</span> </div><div class="line"><a name="l04790"></a><span class="lineno"> 4790</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04791"></a><span class="lineno"> 4791</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"fail to initialize ActiveX control"</span>);</div><div class="line"><a name="l04792"></a><span class="lineno"> 4792</span>  }</div><div class="line"><a name="l04793"></a><span class="lineno"> 4793</span> </div><div class="line"><a name="l04794"></a><span class="lineno"> 4794</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04795"></a><span class="lineno"> 4795</span> }</div><div class="line"><a name="l04796"></a><span class="lineno"> 4796</span> </div><div class="line"><a name="l04797"></a><span class="lineno"> 4797</span> <span class="comment">/*</span></div><div class="line"><a name="l04798"></a><span class="lineno"> 4798</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04799"></a><span class="lineno"> 4799</span> <span class="comment"> * WIN32OLE_TYPE.ole_classes(typelib)</span></div><div class="line"><a name="l04800"></a><span class="lineno"> 4800</span> <span class="comment"> *</span></div><div class="line"><a name="l04801"></a><span class="lineno"> 4801</span> <span class="comment"> * Returns array of WIN32OLE_TYPE objects defined by the <i>typelib</i> type library.</span></div><div class="line"><a name="l04802"></a><span class="lineno"> 4802</span> <span class="comment"> * This method will be OBSOLETE. Use WIN32OLE_TYPELIB.new(typelib).ole_classes instead.</span></div><div class="line"><a name="l04803"></a><span class="lineno"> 4803</span> <span class="comment"> */</span></div><div class="line"><a name="l04804"></a><span class="lineno"> 4804</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04805"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6aba758cd00cea749b2a7e1ae22098df"> 4805</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6aba758cd00cea749b2a7e1ae22098df">foletype_s_ole_classes</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib)</div><div class="line"><a name="l04806"></a><span class="lineno"> 4806</span> {</div><div class="line"><a name="l04807"></a><span class="lineno"> 4807</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj;</div><div class="line"><a name="l04808"></a><span class="lineno"> 4808</span> </div><div class="line"><a name="l04809"></a><span class="lineno"> 4809</span>  <span class="comment">/*</span></div><div class="line"><a name="l04810"></a><span class="lineno"> 4810</span> <span class="comment"> rb_warn("%s is obsolete; use %s instead.",</span></div><div class="line"><a name="l04811"></a><span class="lineno"> 4811</span> <span class="comment"> "WIN32OLE_TYPE.ole_classes",</span></div><div class="line"><a name="l04812"></a><span class="lineno"> 4812</span> <span class="comment"> "WIN32OLE_TYPELIB.new(typelib).ole_types");</span></div><div class="line"><a name="l04813"></a><span class="lineno"> 4813</span> <span class="comment"> */</span></div><div class="line"><a name="l04814"></a><span class="lineno"> 4814</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"new"</span>), 1, typelib);</div><div class="line"><a name="l04815"></a><span class="lineno"> 4815</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(obj, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"ole_types"</span>), 0);</div><div class="line"><a name="l04816"></a><span class="lineno"> 4816</span> }</div><div class="line"><a name="l04817"></a><span class="lineno"> 4817</span> </div><div class="line"><a name="l04818"></a><span class="lineno"> 4818</span> <span class="comment">/*</span></div><div class="line"><a name="l04819"></a><span class="lineno"> 4819</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04820"></a><span class="lineno"> 4820</span> <span class="comment"> * WIN32OLE_TYPE.typelibs</span></div><div class="line"><a name="l04821"></a><span class="lineno"> 4821</span> <span class="comment"> *</span></div><div class="line"><a name="l04822"></a><span class="lineno"> 4822</span> <span class="comment"> * Returns array of type libraries.</span></div><div class="line"><a name="l04823"></a><span class="lineno"> 4823</span> <span class="comment"> * This method will be OBSOLETE. Use WIN32OLE_TYPELIB.typelibs.collect{|t| t.name} instead.</span></div><div class="line"><a name="l04824"></a><span class="lineno"> 4824</span> <span class="comment"> *</span></div><div class="line"><a name="l04825"></a><span class="lineno"> 4825</span> <span class="comment"> */</span></div><div class="line"><a name="l04826"></a><span class="lineno"> 4826</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04827"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad7869cc5544dece10a158bb1e6340e1e"> 4827</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad7869cc5544dece10a158bb1e6340e1e">foletype_s_typelibs</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04828"></a><span class="lineno"> 4828</span> {</div><div class="line"><a name="l04829"></a><span class="lineno"> 4829</span>  <span class="comment">/*</span></div><div class="line"><a name="l04830"></a><span class="lineno"> 4830</span> <span class="comment"> rb_warn("%s is obsolete. use %s instead.",</span></div><div class="line"><a name="l04831"></a><span class="lineno"> 4831</span> <span class="comment"> "WIN32OLE_TYPE.typelibs",</span></div><div class="line"><a name="l04832"></a><span class="lineno"> 4832</span> <span class="comment"> "WIN32OLE_TYPELIB.typelibs.collect{t|t.name}");</span></div><div class="line"><a name="l04833"></a><span class="lineno"> 4833</span> <span class="comment"> */</span></div><div class="line"><a name="l04834"></a><span class="lineno"> 4834</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a02d9b54a782bcf6c3d0137cefaa94c87">rb_eval_string</a>(<span class="stringliteral">"WIN32OLE_TYPELIB.typelibs.collect{|t|t.name}"</span>);</div><div class="line"><a name="l04835"></a><span class="lineno"> 4835</span> }</div><div class="line"><a name="l04836"></a><span class="lineno"> 4836</span> </div><div class="line"><a name="l04837"></a><span class="lineno"> 4837</span> <span class="comment">/*</span></div><div class="line"><a name="l04838"></a><span class="lineno"> 4838</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04839"></a><span class="lineno"> 4839</span> <span class="comment"> * WIN32OLE_TYPE.progids</span></div><div class="line"><a name="l04840"></a><span class="lineno"> 4840</span> <span class="comment"> *</span></div><div class="line"><a name="l04841"></a><span class="lineno"> 4841</span> <span class="comment"> * Returns array of ProgID.</span></div><div class="line"><a name="l04842"></a><span class="lineno"> 4842</span> <span class="comment"> */</span></div><div class="line"><a name="l04843"></a><span class="lineno"> 4843</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04844"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a900802f6db162dab47ccf45555a9905d"> 4844</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a900802f6db162dab47ccf45555a9905d">foletype_s_progids</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04845"></a><span class="lineno"> 4845</span> {</div><div class="line"><a name="l04846"></a><span class="lineno"> 4846</span>  HKEY hclsids, hclsid;</div><div class="line"><a name="l04847"></a><span class="lineno"> 4847</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l04848"></a><span class="lineno"> 4848</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l04849"></a><span class="lineno"> 4849</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> clsid;</div><div class="line"><a name="l04850"></a><span class="lineno"> 4850</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">""</span>);</div><div class="line"><a name="l04851"></a><span class="lineno"> 4851</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> progids = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l04852"></a><span class="lineno"> 4852</span> </div><div class="line"><a name="l04853"></a><span class="lineno"> 4853</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a>(HKEY_CLASSES_ROOT, <span class="stringliteral">"CLSID"</span>, &hclsids);</div><div class="line"><a name="l04854"></a><span class="lineno"> 4854</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS) {</div><div class="line"><a name="l04855"></a><span class="lineno"> 4855</span>  <span class="keywordflow">return</span> progids;</div><div class="line"><a name="l04856"></a><span class="lineno"> 4856</span>  }</div><div class="line"><a name="l04857"></a><span class="lineno"> 4857</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; ; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l04858"></a><span class="lineno"> 4858</span>  clsid = <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(hclsids, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l04859"></a><span class="lineno"> 4859</span>  <span class="keywordflow">if</span> (clsid == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l04860"></a><span class="lineno"> 4860</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04861"></a><span class="lineno"> 4861</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(hclsids, clsid, &hclsid);</div><div class="line"><a name="l04862"></a><span class="lineno"> 4862</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS)</div><div class="line"><a name="l04863"></a><span class="lineno"> 4863</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04864"></a><span class="lineno"> 4864</span>  <span class="keywordflow">if</span> ((<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a9eb9e2c430bab21f13d1a2ff462142be">reg_get_val2</a>(hclsid, <span class="stringliteral">"ProgID"</span>)) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l04865"></a><span class="lineno"> 4865</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(progids, <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>);</div><div class="line"><a name="l04866"></a><span class="lineno"> 4866</span>  <span class="keywordflow">if</span> ((<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a9eb9e2c430bab21f13d1a2ff462142be">reg_get_val2</a>(hclsid, <span class="stringliteral">"VersionIndependentProgID"</span>)) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l04867"></a><span class="lineno"> 4867</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(progids, <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>);</div><div class="line"><a name="l04868"></a><span class="lineno"> 4868</span>  RegCloseKey(hclsid);</div><div class="line"><a name="l04869"></a><span class="lineno"> 4869</span>  }</div><div class="line"><a name="l04870"></a><span class="lineno"> 4870</span>  RegCloseKey(hclsids);</div><div class="line"><a name="l04871"></a><span class="lineno"> 4871</span>  <span class="keywordflow">return</span> progids;</div><div class="line"><a name="l04872"></a><span class="lineno"> 4872</span> }</div><div class="line"><a name="l04873"></a><span class="lineno"> 4873</span> </div><div class="line"><a name="l04874"></a><span class="lineno"> 4874</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04875"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac3ae981871b66fdb4efa0a05ad712256"> 4875</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac3ae981871b66fdb4efa0a05ad712256">foletype_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass)</div><div class="line"><a name="l04876"></a><span class="lineno"> 4876</span> {</div><div class="line"><a name="l04877"></a><span class="lineno"> 4877</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *poletype;</div><div class="line"><a name="l04878"></a><span class="lineno"> 4878</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj;</div><div class="line"><a name="l04879"></a><span class="lineno"> 4879</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a>();</div><div class="line"><a name="l04880"></a><span class="lineno"> 4880</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad80ce51081780f829134de0338821b76">Data_Make_Struct</a>(klass,<span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>,0,<a class="code" href="../../d2/d99/win32ole_8c.html#aa277cd78a0fd28dcdbd08a2e93b36c34">oletype_free</a>,poletype);</div><div class="line"><a name="l04881"></a><span class="lineno"> 4881</span>  poletype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l04882"></a><span class="lineno"> 4882</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l04883"></a><span class="lineno"> 4883</span> }</div><div class="line"><a name="l04884"></a><span class="lineno"> 4884</span> </div><div class="line"><a name="l04885"></a><span class="lineno"> 4885</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04886"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a4ddfcdbb09e0396eab8089feb9923abd"> 4886</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4ddfcdbb09e0396eab8089feb9923abd">oletype_set_member</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>)</div><div class="line"><a name="l04887"></a><span class="lineno"> 4887</span> {</div><div class="line"><a name="l04888"></a><span class="lineno"> 4888</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l04889"></a><span class="lineno"> 4889</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l04890"></a><span class="lineno"> 4890</span>  <a class="code" href="../../db/d2e/intern_8h.html#acee88ad0375c8a9080e2283db494d257">rb_ivar_set</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>), <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>);</div><div class="line"><a name="l04891"></a><span class="lineno"> 4891</span>  ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a> = <a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>;</div><div class="line"><a name="l04892"></a><span class="lineno"> 4892</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>) <a class="code" href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5">OLE_ADDREF</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l04893"></a><span class="lineno"> 4893</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l04894"></a><span class="lineno"> 4894</span> }</div><div class="line"><a name="l04895"></a><span class="lineno"> 4895</span> </div><div class="line"><a name="l04896"></a><span class="lineno"> 4896</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04897"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a78014010885156d66440be3692ea4a13"> 4897</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a78014010885156d66440be3692ea4a13">oleclass_from_typelib</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeLib *pTypeLib, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> oleclass)</div><div class="line"><a name="l04898"></a><span class="lineno"> 4898</span> {</div><div class="line"><a name="l04899"></a><span class="lineno"> 4899</span> </div><div class="line"><a name="l04900"></a><span class="lineno"> 4900</span>  <span class="keywordtype">long</span> <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>;</div><div class="line"><a name="l04901"></a><span class="lineno"> 4901</span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l04902"></a><span class="lineno"> 4902</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04903"></a><span class="lineno"> 4903</span>  BSTR bstr;</div><div class="line"><a name="l04904"></a><span class="lineno"> 4904</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib;</div><div class="line"><a name="l04905"></a><span class="lineno"> 4905</span>  ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>;</div><div class="line"><a name="l04906"></a><span class="lineno"> 4906</span> </div><div class="line"><a name="l04907"></a><span class="lineno"> 4907</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> found = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l04908"></a><span class="lineno"> 4908</span> </div><div class="line"><a name="l04909"></a><span class="lineno"> 4909</span>  <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a> = pTypeLib->lpVtbl->GetTypeInfoCount(pTypeLib);</div><div class="line"><a name="l04910"></a><span class="lineno"> 4910</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a> && found == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l04911"></a><span class="lineno"> 4911</span>  hr = pTypeLib->lpVtbl->GetTypeInfo(pTypeLib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l04912"></a><span class="lineno"> 4912</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l04913"></a><span class="lineno"> 4913</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04914"></a><span class="lineno"> 4914</span>  hr = pTypeLib->lpVtbl->GetDocumentation(pTypeLib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>,</div><div class="line"><a name="l04915"></a><span class="lineno"> 4915</span>  &bstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l04916"></a><span class="lineno"> 4916</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l04917"></a><span class="lineno"> 4917</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04918"></a><span class="lineno"> 4918</span>  typelib = <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr);</div><div class="line"><a name="l04919"></a><span class="lineno"> 4919</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#aabbf48d0162ce9a462b13b71ccf683a5">rb_str_cmp</a>(oleclass, typelib) == 0) {</div><div class="line"><a name="l04920"></a><span class="lineno"> 4920</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4ddfcdbb09e0396eab8089feb9923abd">oletype_set_member</a>(<span class="keyword">self</span>, <a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, typelib);</div><div class="line"><a name="l04921"></a><span class="lineno"> 4921</span>  found = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l04922"></a><span class="lineno"> 4922</span>  }</div><div class="line"><a name="l04923"></a><span class="lineno"> 4923</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l04924"></a><span class="lineno"> 4924</span>  }</div><div class="line"><a name="l04925"></a><span class="lineno"> 4925</span>  <span class="keywordflow">return</span> found;</div><div class="line"><a name="l04926"></a><span class="lineno"> 4926</span> }</div><div class="line"><a name="l04927"></a><span class="lineno"> 4927</span> </div><div class="line"><a name="l04928"></a><span class="lineno"> 4928</span> <span class="comment">/*</span></div><div class="line"><a name="l04929"></a><span class="lineno"> 4929</span> <span class="comment"> * Document-class: WIN32OLE_TYPELIB</span></div><div class="line"><a name="l04930"></a><span class="lineno"> 4930</span> <span class="comment"> *</span></div><div class="line"><a name="l04931"></a><span class="lineno"> 4931</span> <span class="comment"> * <code>WIN32OLE_TYPELIB</code> objects represent OLE tyblib information.</span></div><div class="line"><a name="l04932"></a><span class="lineno"> 4932</span> <span class="comment"> */</span></div><div class="line"><a name="l04933"></a><span class="lineno"> 4933</span> </div><div class="line"><a name="l04934"></a><span class="lineno"> 4934</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04935"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9b6b7a1648ea3f09e2572eaa5ee4ca94"> 4935</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a9b6b7a1648ea3f09e2572eaa5ee4ca94">oletypelib_set_member</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeLib *pTypeLib)</div><div class="line"><a name="l04936"></a><span class="lineno"> 4936</span> {</div><div class="line"><a name="l04937"></a><span class="lineno"> 4937</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dd4/structoletypelibdata.html">oletypelibdata</a> *ptlib;</div><div class="line"><a name="l04938"></a><span class="lineno"> 4938</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d6/dd4/structoletypelibdata.html">oletypelibdata</a>, ptlib);</div><div class="line"><a name="l04939"></a><span class="lineno"> 4939</span>  ptlib-><a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l04940"></a><span class="lineno"> 4940</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l04941"></a><span class="lineno"> 4941</span> }</div><div class="line"><a name="l04942"></a><span class="lineno"> 4942</span> </div><div class="line"><a name="l04943"></a><span class="lineno"> 4943</span> <span class="keyword">static</span> ITypeLib *</div><div class="line"><a name="l04944"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948"> 4944</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04945"></a><span class="lineno"> 4945</span> {</div><div class="line"><a name="l04946"></a><span class="lineno"> 4946</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dd4/structoletypelibdata.html">oletypelibdata</a> *ptlib;</div><div class="line"><a name="l04947"></a><span class="lineno"> 4947</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d6/dd4/structoletypelibdata.html">oletypelibdata</a>, ptlib);</div><div class="line"><a name="l04948"></a><span class="lineno"> 4948</span>  <span class="keywordflow">return</span> ptlib-><a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l04949"></a><span class="lineno"> 4949</span> }</div><div class="line"><a name="l04950"></a><span class="lineno"> 4950</span> </div><div class="line"><a name="l04951"></a><span class="lineno"> 4951</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l04952"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6c5c0d1bde5f2871dc2127dacd9205fb"> 4952</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6c5c0d1bde5f2871dc2127dacd9205fb">oletypelib_get_libattr</a>(ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, TLIBATTR **ppTLibAttr)</div><div class="line"><a name="l04953"></a><span class="lineno"> 4953</span> {</div><div class="line"><a name="l04954"></a><span class="lineno"> 4954</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04955"></a><span class="lineno"> 4955</span>  hr = <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>->lpVtbl->GetLibAttr(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, ppTLibAttr);</div><div class="line"><a name="l04956"></a><span class="lineno"> 4956</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l04957"></a><span class="lineno"> 4957</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l04958"></a><span class="lineno"> 4958</span>  <span class="stringliteral">"failed to get library attribute(TLIBATTR) from ITypeLib"</span>);</div><div class="line"><a name="l04959"></a><span class="lineno"> 4959</span>  }</div><div class="line"><a name="l04960"></a><span class="lineno"> 4960</span> }</div><div class="line"><a name="l04961"></a><span class="lineno"> 4961</span> </div><div class="line"><a name="l04962"></a><span class="lineno"> 4962</span> <span class="comment">/*</span></div><div class="line"><a name="l04963"></a><span class="lineno"> 4963</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l04964"></a><span class="lineno"> 4964</span> <span class="comment"> *</span></div><div class="line"><a name="l04965"></a><span class="lineno"> 4965</span> <span class="comment"> * WIN32OLE_TYPELIB.typelibs</span></div><div class="line"><a name="l04966"></a><span class="lineno"> 4966</span> <span class="comment"> *</span></div><div class="line"><a name="l04967"></a><span class="lineno"> 4967</span> <span class="comment"> * Returns the array of WIN32OLE_TYPELIB object.</span></div><div class="line"><a name="l04968"></a><span class="lineno"> 4968</span> <span class="comment"> *</span></div><div class="line"><a name="l04969"></a><span class="lineno"> 4969</span> <span class="comment"> * tlibs = WIN32OLE_TYPELIB.typelibs</span></div><div class="line"><a name="l04970"></a><span class="lineno"> 4970</span> <span class="comment"> *</span></div><div class="line"><a name="l04971"></a><span class="lineno"> 4971</span> <span class="comment"> */</span></div><div class="line"><a name="l04972"></a><span class="lineno"> 4972</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l04973"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac1a1bad5f7ad2818c0d660068ab44e8a"> 4973</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac1a1bad5f7ad2818c0d660068ab44e8a">foletypelib_s_typelibs</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l04974"></a><span class="lineno"> 4974</span> {</div><div class="line"><a name="l04975"></a><span class="lineno"> 4975</span>  HKEY htypelib, hguid;</div><div class="line"><a name="l04976"></a><span class="lineno"> 4976</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, j;</div><div class="line"><a name="l04977"></a><span class="lineno"> 4977</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l04978"></a><span class="lineno"> 4978</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> guid;</div><div class="line"><a name="l04979"></a><span class="lineno"> 4979</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a>;</div><div class="line"><a name="l04980"></a><span class="lineno"> 4980</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04981"></a><span class="lineno"> 4981</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelibs = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l04982"></a><span class="lineno"> 4982</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l04983"></a><span class="lineno"> 4983</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l04984"></a><span class="lineno"> 4984</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l04985"></a><span class="lineno"> 4985</span> </div><div class="line"><a name="l04986"></a><span class="lineno"> 4986</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a>(HKEY_CLASSES_ROOT, <span class="stringliteral">"TypeLib"</span>, &htypelib);</div><div class="line"><a name="l04987"></a><span class="lineno"> 4987</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS) {</div><div class="line"><a name="l04988"></a><span class="lineno"> 4988</span>  <span class="keywordflow">return</span> typelibs;</div><div class="line"><a name="l04989"></a><span class="lineno"> 4989</span>  }</div><div class="line"><a name="l04990"></a><span class="lineno"> 4990</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; ; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l04991"></a><span class="lineno"> 4991</span>  guid = <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(htypelib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l04992"></a><span class="lineno"> 4992</span>  <span class="keywordflow">if</span> (guid == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l04993"></a><span class="lineno"> 4993</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l04994"></a><span class="lineno"> 4994</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(htypelib, guid, &hguid);</div><div class="line"><a name="l04995"></a><span class="lineno"> 4995</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS)</div><div class="line"><a name="l04996"></a><span class="lineno"> 4996</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l04997"></a><span class="lineno"> 4997</span>  <span class="keywordflow">for</span>(j = 0; ; j++) {</div><div class="line"><a name="l04998"></a><span class="lineno"> 4998</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(hguid, j);</div><div class="line"><a name="l04999"></a><span class="lineno"> 4999</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a> == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l05000"></a><span class="lineno"> 5000</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05001"></a><span class="lineno"> 5001</span>  <span class="keywordflow">if</span> ( (<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a9eb9e2c430bab21f13d1a2ff462142be">reg_get_val2</a>(hguid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a>))) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a> ) {</div><div class="line"><a name="l05002"></a><span class="lineno"> 5002</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a2e4070a13ab6ee3c4453a57d34362a91">oletypelib_from_guid</a>(guid, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a>, &<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05003"></a><span class="lineno"> 5003</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l05004"></a><span class="lineno"> 5004</span>  typelib = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"allocate"</span>), 0);</div><div class="line"><a name="l05005"></a><span class="lineno"> 5005</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a9b6b7a1648ea3f09e2572eaa5ee4ca94">oletypelib_set_member</a>(typelib, <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05006"></a><span class="lineno"> 5006</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(typelibs, typelib);</div><div class="line"><a name="l05007"></a><span class="lineno"> 5007</span>  }</div><div class="line"><a name="l05008"></a><span class="lineno"> 5008</span>  }</div><div class="line"><a name="l05009"></a><span class="lineno"> 5009</span>  }</div><div class="line"><a name="l05010"></a><span class="lineno"> 5010</span>  RegCloseKey(hguid);</div><div class="line"><a name="l05011"></a><span class="lineno"> 5011</span>  }</div><div class="line"><a name="l05012"></a><span class="lineno"> 5012</span>  RegCloseKey(htypelib);</div><div class="line"><a name="l05013"></a><span class="lineno"> 5013</span>  <span class="keywordflow">return</span> typelibs;</div><div class="line"><a name="l05014"></a><span class="lineno"> 5014</span> }</div><div class="line"><a name="l05015"></a><span class="lineno"> 5015</span> </div><div class="line"><a name="l05016"></a><span class="lineno"> 5016</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05017"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab92641d2d72c638085831df508b86b3f"> 5017</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab92641d2d72c638085831df508b86b3f">make_version_str</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a>)</div><div class="line"><a name="l05018"></a><span class="lineno"> 5018</span> {</div><div class="line"><a name="l05019"></a><span class="lineno"> 5019</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> version_str = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05020"></a><span class="lineno"> 5020</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> minor_str = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05021"></a><span class="lineno"> 5021</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a> == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l05022"></a><span class="lineno"> 5022</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05023"></a><span class="lineno"> 5023</span>  }</div><div class="line"><a name="l05024"></a><span class="lineno"> 5024</span>  version_str = <a class="code" href="../../db/d2e/intern_8h.html#ad7cf2d103c6ce7d9b82c0076effac263">rb_String</a>(<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a>);</div><div class="line"><a name="l05025"></a><span class="lineno"> 5025</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a> != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l05026"></a><span class="lineno"> 5026</span>  minor_str = <a class="code" href="../../db/d2e/intern_8h.html#ad7cf2d103c6ce7d9b82c0076effac263">rb_String</a>(<a class="code" href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a>);</div><div class="line"><a name="l05027"></a><span class="lineno"> 5027</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(version_str, <span class="stringliteral">"."</span>);</div><div class="line"><a name="l05028"></a><span class="lineno"> 5028</span>  <a class="code" href="../../db/d2e/intern_8h.html#ab592dcd9e193dea76fb0ff58b5d907e4">rb_str_append</a>(version_str, minor_str);</div><div class="line"><a name="l05029"></a><span class="lineno"> 5029</span>  }</div><div class="line"><a name="l05030"></a><span class="lineno"> 5030</span>  <span class="keywordflow">return</span> version_str;</div><div class="line"><a name="l05031"></a><span class="lineno"> 5031</span> }</div><div class="line"><a name="l05032"></a><span class="lineno"> 5032</span> </div><div class="line"><a name="l05033"></a><span class="lineno"> 5033</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05034"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae41de633323c960996403584ec558f81"> 5034</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ae41de633323c960996403584ec558f81">oletypelib_search_registry2</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>)</div><div class="line"><a name="l05035"></a><span class="lineno"> 5035</span> {</div><div class="line"><a name="l05036"></a><span class="lineno"> 5036</span>  HKEY htypelib, hguid, hversion;</div><div class="line"><a name="l05037"></a><span class="lineno"> 5037</span>  <span class="keywordtype">double</span> fver;</div><div class="line"><a name="l05038"></a><span class="lineno"> 5038</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> j;</div><div class="line"><a name="l05039"></a><span class="lineno"> 5039</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l05040"></a><span class="lineno"> 5040</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> found = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05041"></a><span class="lineno"> 5041</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tlib;</div><div class="line"><a name="l05042"></a><span class="lineno"> 5042</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ver;</div><div class="line"><a name="l05043"></a><span class="lineno"> 5043</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> version_str;</div><div class="line"><a name="l05044"></a><span class="lineno"> 5044</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05045"></a><span class="lineno"> 5045</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05046"></a><span class="lineno"> 5046</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05047"></a><span class="lineno"> 5047</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l05048"></a><span class="lineno"> 5048</span> </div><div class="line"><a name="l05049"></a><span class="lineno"> 5049</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> guid = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, 0);</div><div class="line"><a name="l05050"></a><span class="lineno"> 5050</span>  version_str = <a class="code" href="../../d2/d99/win32ole_8c.html#ab92641d2d72c638085831df508b86b3f">make_version_str</a>(<a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, 1), <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, 2));</div><div class="line"><a name="l05051"></a><span class="lineno"> 5051</span> </div><div class="line"><a name="l05052"></a><span class="lineno"> 5052</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a>(HKEY_CLASSES_ROOT, <span class="stringliteral">"TypeLib"</span>, &htypelib);</div><div class="line"><a name="l05053"></a><span class="lineno"> 5053</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS) {</div><div class="line"><a name="l05054"></a><span class="lineno"> 5054</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05055"></a><span class="lineno"> 5055</span>  }</div><div class="line"><a name="l05056"></a><span class="lineno"> 5056</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(htypelib, guid, &hguid);</div><div class="line"><a name="l05057"></a><span class="lineno"> 5057</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS) {</div><div class="line"><a name="l05058"></a><span class="lineno"> 5058</span>  RegCloseKey(htypelib);</div><div class="line"><a name="l05059"></a><span class="lineno"> 5059</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05060"></a><span class="lineno"> 5060</span>  }</div><div class="line"><a name="l05061"></a><span class="lineno"> 5061</span>  <span class="keywordflow">if</span> (version_str != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l05062"></a><span class="lineno"> 5062</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(hguid, version_str, &hversion);</div><div class="line"><a name="l05063"></a><span class="lineno"> 5063</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> == ERROR_SUCCESS) {</div><div class="line"><a name="l05064"></a><span class="lineno"> 5064</span>  tlib = <a class="code" href="../../d2/d99/win32ole_8c.html#ad1d7db020ebeab12bc94c56f82f43076">reg_get_val</a>(hversion, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l05065"></a><span class="lineno"> 5065</span>  <span class="keywordflow">if</span> (tlib != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l05066"></a><span class="lineno"> 5066</span>  typelib = tlib;</div><div class="line"><a name="l05067"></a><span class="lineno"> 5067</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a> = version_str;</div><div class="line"><a name="l05068"></a><span class="lineno"> 5068</span>  }</div><div class="line"><a name="l05069"></a><span class="lineno"> 5069</span>  }</div><div class="line"><a name="l05070"></a><span class="lineno"> 5070</span>  RegCloseKey(hversion);</div><div class="line"><a name="l05071"></a><span class="lineno"> 5071</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l05072"></a><span class="lineno"> 5072</span>  fver = 0.0;</div><div class="line"><a name="l05073"></a><span class="lineno"> 5073</span>  <span class="keywordflow">for</span>(j = 0; ;j++) {</div><div class="line"><a name="l05074"></a><span class="lineno"> 5074</span>  ver = <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(hguid, j);</div><div class="line"><a name="l05075"></a><span class="lineno"> 5075</span>  <span class="keywordflow">if</span> (ver == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l05076"></a><span class="lineno"> 5076</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05077"></a><span class="lineno"> 5077</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(hguid, ver, &hversion);</div><div class="line"><a name="l05078"></a><span class="lineno"> 5078</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS)</div><div class="line"><a name="l05079"></a><span class="lineno"> 5079</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l05080"></a><span class="lineno"> 5080</span>  tlib = <a class="code" href="../../d2/d99/win32ole_8c.html#ad1d7db020ebeab12bc94c56f82f43076">reg_get_val</a>(hversion, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l05081"></a><span class="lineno"> 5081</span>  <span class="keywordflow">if</span> (tlib == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l05082"></a><span class="lineno"> 5082</span>  RegCloseKey(hversion);</div><div class="line"><a name="l05083"></a><span class="lineno"> 5083</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l05084"></a><span class="lineno"> 5084</span>  }</div><div class="line"><a name="l05085"></a><span class="lineno"> 5085</span>  <span class="keywordflow">if</span> (fver < atof(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(ver))) {</div><div class="line"><a name="l05086"></a><span class="lineno"> 5086</span>  fver = atof(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(ver));</div><div class="line"><a name="l05087"></a><span class="lineno"> 5087</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a> = ver;</div><div class="line"><a name="l05088"></a><span class="lineno"> 5088</span>  typelib = tlib;</div><div class="line"><a name="l05089"></a><span class="lineno"> 5089</span>  }</div><div class="line"><a name="l05090"></a><span class="lineno"> 5090</span>  RegCloseKey(hversion);</div><div class="line"><a name="l05091"></a><span class="lineno"> 5091</span>  }</div><div class="line"><a name="l05092"></a><span class="lineno"> 5092</span>  }</div><div class="line"><a name="l05093"></a><span class="lineno"> 5093</span>  RegCloseKey(hguid);</div><div class="line"><a name="l05094"></a><span class="lineno"> 5094</span>  RegCloseKey(htypelib);</div><div class="line"><a name="l05095"></a><span class="lineno"> 5095</span>  <span class="keywordflow">if</span> (typelib != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l05096"></a><span class="lineno"> 5096</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a2e4070a13ab6ee3c4453a57d34362a91">oletypelib_from_guid</a>(guid, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a>, &<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05097"></a><span class="lineno"> 5097</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l05098"></a><span class="lineno"> 5098</span>  found = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05099"></a><span class="lineno"> 5099</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a9b6b7a1648ea3f09e2572eaa5ee4ca94">oletypelib_set_member</a>(<span class="keyword">self</span>, <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05100"></a><span class="lineno"> 5100</span>  }</div><div class="line"><a name="l05101"></a><span class="lineno"> 5101</span>  }</div><div class="line"><a name="l05102"></a><span class="lineno"> 5102</span>  <span class="keywordflow">return</span> found;</div><div class="line"><a name="l05103"></a><span class="lineno"> 5103</span> }</div><div class="line"><a name="l05104"></a><span class="lineno"> 5104</span> </div><div class="line"><a name="l05105"></a><span class="lineno"> 5105</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05106"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a88485f594ddcf839c3057757d8d91b53"> 5106</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a88485f594ddcf839c3057757d8d91b53">oletypelib_search_registry</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib)</div><div class="line"><a name="l05107"></a><span class="lineno"> 5107</span> {</div><div class="line"><a name="l05108"></a><span class="lineno"> 5108</span>  HKEY htypelib, hguid, hversion;</div><div class="line"><a name="l05109"></a><span class="lineno"> 5109</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, j;</div><div class="line"><a name="l05110"></a><span class="lineno"> 5110</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l05111"></a><span class="lineno"> 5111</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> found = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05112"></a><span class="lineno"> 5112</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> tlib;</div><div class="line"><a name="l05113"></a><span class="lineno"> 5113</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> guid;</div><div class="line"><a name="l05114"></a><span class="lineno"> 5114</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ver;</div><div class="line"><a name="l05115"></a><span class="lineno"> 5115</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05116"></a><span class="lineno"> 5116</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l05117"></a><span class="lineno"> 5117</span> </div><div class="line"><a name="l05118"></a><span class="lineno"> 5118</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a>(HKEY_CLASSES_ROOT, <span class="stringliteral">"TypeLib"</span>, &htypelib);</div><div class="line"><a name="l05119"></a><span class="lineno"> 5119</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS) {</div><div class="line"><a name="l05120"></a><span class="lineno"> 5120</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05121"></a><span class="lineno"> 5121</span>  }</div><div class="line"><a name="l05122"></a><span class="lineno"> 5122</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; !found; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l05123"></a><span class="lineno"> 5123</span>  guid = <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(htypelib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l05124"></a><span class="lineno"> 5124</span>  <span class="keywordflow">if</span> (guid == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l05125"></a><span class="lineno"> 5125</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05126"></a><span class="lineno"> 5126</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(htypelib, guid, &hguid);</div><div class="line"><a name="l05127"></a><span class="lineno"> 5127</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS)</div><div class="line"><a name="l05128"></a><span class="lineno"> 5128</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l05129"></a><span class="lineno"> 5129</span>  <span class="keywordflow">for</span>(j = 0; found == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>; j++) {</div><div class="line"><a name="l05130"></a><span class="lineno"> 5130</span>  ver = <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(hguid, j);</div><div class="line"><a name="l05131"></a><span class="lineno"> 5131</span>  <span class="keywordflow">if</span> (ver == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l05132"></a><span class="lineno"> 5132</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05133"></a><span class="lineno"> 5133</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(hguid, ver, &hversion);</div><div class="line"><a name="l05134"></a><span class="lineno"> 5134</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS)</div><div class="line"><a name="l05135"></a><span class="lineno"> 5135</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l05136"></a><span class="lineno"> 5136</span>  tlib = <a class="code" href="../../d2/d99/win32ole_8c.html#ad1d7db020ebeab12bc94c56f82f43076">reg_get_val</a>(hversion, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l05137"></a><span class="lineno"> 5137</span>  <span class="keywordflow">if</span> (tlib == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l05138"></a><span class="lineno"> 5138</span>  RegCloseKey(hversion);</div><div class="line"><a name="l05139"></a><span class="lineno"> 5139</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l05140"></a><span class="lineno"> 5140</span>  }</div><div class="line"><a name="l05141"></a><span class="lineno"> 5141</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#aabbf48d0162ce9a462b13b71ccf683a5">rb_str_cmp</a>(typelib, tlib) == 0) {</div><div class="line"><a name="l05142"></a><span class="lineno"> 5142</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a2e4070a13ab6ee3c4453a57d34362a91">oletypelib_from_guid</a>(guid, ver, &<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05143"></a><span class="lineno"> 5143</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l05144"></a><span class="lineno"> 5144</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a9b6b7a1648ea3f09e2572eaa5ee4ca94">oletypelib_set_member</a>(<span class="keyword">self</span>, <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05145"></a><span class="lineno"> 5145</span>  found = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05146"></a><span class="lineno"> 5146</span>  }</div><div class="line"><a name="l05147"></a><span class="lineno"> 5147</span>  }</div><div class="line"><a name="l05148"></a><span class="lineno"> 5148</span>  RegCloseKey(hversion);</div><div class="line"><a name="l05149"></a><span class="lineno"> 5149</span>  }</div><div class="line"><a name="l05150"></a><span class="lineno"> 5150</span>  RegCloseKey(hguid);</div><div class="line"><a name="l05151"></a><span class="lineno"> 5151</span>  }</div><div class="line"><a name="l05152"></a><span class="lineno"> 5152</span>  RegCloseKey(htypelib);</div><div class="line"><a name="l05153"></a><span class="lineno"> 5153</span>  <span class="keywordflow">return</span> found;</div><div class="line"><a name="l05154"></a><span class="lineno"> 5154</span> }</div><div class="line"><a name="l05155"></a><span class="lineno"> 5155</span> </div><div class="line"><a name="l05156"></a><span class="lineno"> 5156</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05157"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a038baf72fddd2f2f0317efe9f0b4c2ad"> 5157</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a038baf72fddd2f2f0317efe9f0b4c2ad">foletypelib_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass)</div><div class="line"><a name="l05158"></a><span class="lineno"> 5158</span> {</div><div class="line"><a name="l05159"></a><span class="lineno"> 5159</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dd4/structoletypelibdata.html">oletypelibdata</a> *poletypelib;</div><div class="line"><a name="l05160"></a><span class="lineno"> 5160</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj;</div><div class="line"><a name="l05161"></a><span class="lineno"> 5161</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a>();</div><div class="line"><a name="l05162"></a><span class="lineno"> 5162</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad80ce51081780f829134de0338821b76">Data_Make_Struct</a>(klass, <span class="keyword">struct</span> <a class="code" href="../../d6/dd4/structoletypelibdata.html">oletypelibdata</a>, 0, <a class="code" href="../../d2/d99/win32ole_8c.html#afc5830d08daccd1d3e65c2a374b17a77">oletypelib_free</a>, poletypelib);</div><div class="line"><a name="l05163"></a><span class="lineno"> 5163</span>  poletypelib-><a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l05164"></a><span class="lineno"> 5164</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l05165"></a><span class="lineno"> 5165</span> }</div><div class="line"><a name="l05166"></a><span class="lineno"> 5166</span> </div><div class="line"><a name="l05167"></a><span class="lineno"> 5167</span> <span class="comment">/*</span></div><div class="line"><a name="l05168"></a><span class="lineno"> 5168</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05169"></a><span class="lineno"> 5169</span> <span class="comment"> * WIN32OLE_TYPELIB.new(typelib [, version1, version2]) -> WIN32OLE_TYPELIB object</span></div><div class="line"><a name="l05170"></a><span class="lineno"> 5170</span> <span class="comment"> *</span></div><div class="line"><a name="l05171"></a><span class="lineno"> 5171</span> <span class="comment"> * Returns a new WIN32OLE_TYPELIB object.</span></div><div class="line"><a name="l05172"></a><span class="lineno"> 5172</span> <span class="comment"> *</span></div><div class="line"><a name="l05173"></a><span class="lineno"> 5173</span> <span class="comment"> * The first argument <i>typelib</i> specifies OLE type library name or GUID or</span></div><div class="line"><a name="l05174"></a><span class="lineno"> 5174</span> <span class="comment"> * OLE library file.</span></div><div class="line"><a name="l05175"></a><span class="lineno"> 5175</span> <span class="comment"> * The second argument is major version or version of the type library.</span></div><div class="line"><a name="l05176"></a><span class="lineno"> 5176</span> <span class="comment"> * The third argument is minor version.</span></div><div class="line"><a name="l05177"></a><span class="lineno"> 5177</span> <span class="comment"> * The second argument and third argument are optional.</span></div><div class="line"><a name="l05178"></a><span class="lineno"> 5178</span> <span class="comment"> * If the first argument is type library name, then the second and third argument</span></div><div class="line"><a name="l05179"></a><span class="lineno"> 5179</span> <span class="comment"> * are ignored.</span></div><div class="line"><a name="l05180"></a><span class="lineno"> 5180</span> <span class="comment"> *</span></div><div class="line"><a name="l05181"></a><span class="lineno"> 5181</span> <span class="comment"> * tlib1 = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05182"></a><span class="lineno"> 5182</span> <span class="comment"> * tlib2 = WIN32OLE_TYPELIB.new('{00020813-0000-0000-C000-000000000046}')</span></div><div class="line"><a name="l05183"></a><span class="lineno"> 5183</span> <span class="comment"> * tlib3 = WIN32OLE_TYPELIB.new('{00020813-0000-0000-C000-000000000046}', 1.3)</span></div><div class="line"><a name="l05184"></a><span class="lineno"> 5184</span> <span class="comment"> * tlib4 = WIN32OLE_TYPELIB.new('{00020813-0000-0000-C000-000000000046}', 1, 3)</span></div><div class="line"><a name="l05185"></a><span class="lineno"> 5185</span> <span class="comment"> * tlib5 = WIN32OLE_TYPELIB.new("C:\\WINNT\\SYSTEM32\\SHELL32.DLL")</span></div><div class="line"><a name="l05186"></a><span class="lineno"> 5186</span> <span class="comment"> * puts tlib1.name # -> 'Microsoft Excel 9.0 Object Library'</span></div><div class="line"><a name="l05187"></a><span class="lineno"> 5187</span> <span class="comment"> * puts tlib2.name # -> 'Microsoft Excel 9.0 Object Library'</span></div><div class="line"><a name="l05188"></a><span class="lineno"> 5188</span> <span class="comment"> * puts tlib3.name # -> 'Microsoft Excel 9.0 Object Library'</span></div><div class="line"><a name="l05189"></a><span class="lineno"> 5189</span> <span class="comment"> * puts tlib4.name # -> 'Microsoft Excel 9.0 Object Library'</span></div><div class="line"><a name="l05190"></a><span class="lineno"> 5190</span> <span class="comment"> * puts tlib5.name # -> 'Microsoft Shell Controls And Automation'</span></div><div class="line"><a name="l05191"></a><span class="lineno"> 5191</span> <span class="comment"> *</span></div><div class="line"><a name="l05192"></a><span class="lineno"> 5192</span> <span class="comment"> */</span></div><div class="line"><a name="l05193"></a><span class="lineno"> 5193</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05194"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9429c757d4fe15ece52d69edf0e094e2"> 5194</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a9429c757d4fe15ece52d69edf0e094e2">foletypelib_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>)</div><div class="line"><a name="l05195"></a><span class="lineno"> 5195</span> {</div><div class="line"><a name="l05196"></a><span class="lineno"> 5196</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> found = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05197"></a><span class="lineno"> 5197</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05198"></a><span class="lineno"> 5198</span>  <span class="keywordtype">int</span> len = 0;</div><div class="line"><a name="l05199"></a><span class="lineno"> 5199</span>  OLECHAR * pbuf;</div><div class="line"><a name="l05200"></a><span class="lineno"> 5200</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l05201"></a><span class="lineno"> 5201</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l05202"></a><span class="lineno"> 5202</span> </div><div class="line"><a name="l05203"></a><span class="lineno"> 5203</span>  len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l05204"></a><span class="lineno"> 5204</span>  <span class="keywordflow">if</span> (len < 1 || len > 3) {</div><div class="line"><a name="l05205"></a><span class="lineno"> 5205</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"wrong number of arguments (%d for 1..3)"</span>, len);</div><div class="line"><a name="l05206"></a><span class="lineno"> 5206</span>  }</div><div class="line"><a name="l05207"></a><span class="lineno"> 5207</span> </div><div class="line"><a name="l05208"></a><span class="lineno"> 5208</span>  typelib = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, 0);</div><div class="line"><a name="l05209"></a><span class="lineno"> 5209</span> </div><div class="line"><a name="l05210"></a><span class="lineno"> 5210</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0381640e2905c1b3e104194f91697ca4">SafeStringValue</a>(typelib);</div><div class="line"><a name="l05211"></a><span class="lineno"> 5211</span> </div><div class="line"><a name="l05212"></a><span class="lineno"> 5212</span>  found = <a class="code" href="../../d2/d99/win32ole_8c.html#a88485f594ddcf839c3057757d8d91b53">oletypelib_search_registry</a>(<span class="keyword">self</span>, typelib);</div><div class="line"><a name="l05213"></a><span class="lineno"> 5213</span>  <span class="keywordflow">if</span> (found == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>) {</div><div class="line"><a name="l05214"></a><span class="lineno"> 5214</span>  found = <a class="code" href="../../d2/d99/win32ole_8c.html#ae41de633323c960996403584ec558f81">oletypelib_search_registry2</a>(<span class="keyword">self</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l05215"></a><span class="lineno"> 5215</span>  }</div><div class="line"><a name="l05216"></a><span class="lineno"> 5216</span>  <span class="keywordflow">if</span> (found == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>) {</div><div class="line"><a name="l05217"></a><span class="lineno"> 5217</span>  pbuf = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(typelib);</div><div class="line"><a name="l05218"></a><span class="lineno"> 5218</span>  hr = LoadTypeLibEx(pbuf, REGKIND_NONE, &<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05219"></a><span class="lineno"> 5219</span>  SysFreeString(pbuf);</div><div class="line"><a name="l05220"></a><span class="lineno"> 5220</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l05221"></a><span class="lineno"> 5221</span>  found = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05222"></a><span class="lineno"> 5222</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a9b6b7a1648ea3f09e2572eaa5ee4ca94">oletypelib_set_member</a>(<span class="keyword">self</span>, <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05223"></a><span class="lineno"> 5223</span>  }</div><div class="line"><a name="l05224"></a><span class="lineno"> 5224</span>  }</div><div class="line"><a name="l05225"></a><span class="lineno"> 5225</span> </div><div class="line"><a name="l05226"></a><span class="lineno"> 5226</span>  <span class="keywordflow">if</span> (found == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>) {</div><div class="line"><a name="l05227"></a><span class="lineno"> 5227</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"not found type library `%s`"</span>,</div><div class="line"><a name="l05228"></a><span class="lineno"> 5228</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(typelib));</div><div class="line"><a name="l05229"></a><span class="lineno"> 5229</span>  }</div><div class="line"><a name="l05230"></a><span class="lineno"> 5230</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l05231"></a><span class="lineno"> 5231</span> }</div><div class="line"><a name="l05232"></a><span class="lineno"> 5232</span> </div><div class="line"><a name="l05233"></a><span class="lineno"> 5233</span> <span class="comment">/*</span></div><div class="line"><a name="l05234"></a><span class="lineno"> 5234</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05235"></a><span class="lineno"> 5235</span> <span class="comment"> * WIN32OLE_TYPELIB#guid -> The guid string.</span></div><div class="line"><a name="l05236"></a><span class="lineno"> 5236</span> <span class="comment"> *</span></div><div class="line"><a name="l05237"></a><span class="lineno"> 5237</span> <span class="comment"> * Returns guid string which specifies type library.</span></div><div class="line"><a name="l05238"></a><span class="lineno"> 5238</span> <span class="comment"> *</span></div><div class="line"><a name="l05239"></a><span class="lineno"> 5239</span> <span class="comment"> * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05240"></a><span class="lineno"> 5240</span> <span class="comment"> * guid = tlib.guid # -> '{00020813-0000-0000-C000-000000000046}'</span></div><div class="line"><a name="l05241"></a><span class="lineno"> 5241</span> <span class="comment"> */</span></div><div class="line"><a name="l05242"></a><span class="lineno"> 5242</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05243"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3757bad3ebff1b9c19971d2b364625b4"> 5243</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3757bad3ebff1b9c19971d2b364625b4">foletypelib_guid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05244"></a><span class="lineno"> 5244</span> {</div><div class="line"><a name="l05245"></a><span class="lineno"> 5245</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l05246"></a><span class="lineno"> 5246</span>  OLECHAR bstr[80];</div><div class="line"><a name="l05247"></a><span class="lineno"> 5247</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> guid = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05248"></a><span class="lineno"> 5248</span>  <span class="keywordtype">int</span> len;</div><div class="line"><a name="l05249"></a><span class="lineno"> 5249</span>  TLIBATTR *pTLibAttr;</div><div class="line"><a name="l05250"></a><span class="lineno"> 5250</span> </div><div class="line"><a name="l05251"></a><span class="lineno"> 5251</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l05252"></a><span class="lineno"> 5252</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a6c5c0d1bde5f2871dc2127dacd9205fb">oletypelib_get_libattr</a>(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, &pTLibAttr);</div><div class="line"><a name="l05253"></a><span class="lineno"> 5253</span>  len = StringFromGUID2(&pTLibAttr->guid, bstr, <span class="keyword">sizeof</span>(bstr)/<span class="keyword">sizeof</span>(OLECHAR));</div><div class="line"><a name="l05254"></a><span class="lineno"> 5254</span>  <span class="keywordflow">if</span> (len > 3) {</div><div class="line"><a name="l05255"></a><span class="lineno"> 5255</span>  guid = <a class="code" href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6">ole_wc2vstr</a>(bstr, <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l05256"></a><span class="lineno"> 5256</span>  }</div><div class="line"><a name="l05257"></a><span class="lineno"> 5257</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>->lpVtbl->ReleaseTLibAttr(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, pTLibAttr);</div><div class="line"><a name="l05258"></a><span class="lineno"> 5258</span>  <span class="keywordflow">return</span> guid;</div><div class="line"><a name="l05259"></a><span class="lineno"> 5259</span> }</div><div class="line"><a name="l05260"></a><span class="lineno"> 5260</span> </div><div class="line"><a name="l05261"></a><span class="lineno"> 5261</span> <span class="comment">/*</span></div><div class="line"><a name="l05262"></a><span class="lineno"> 5262</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05263"></a><span class="lineno"> 5263</span> <span class="comment"> * WIN32OLE_TYPELIB#name -> The type library name</span></div><div class="line"><a name="l05264"></a><span class="lineno"> 5264</span> <span class="comment"> *</span></div><div class="line"><a name="l05265"></a><span class="lineno"> 5265</span> <span class="comment"> * Returns the type library name.</span></div><div class="line"><a name="l05266"></a><span class="lineno"> 5266</span> <span class="comment"> *</span></div><div class="line"><a name="l05267"></a><span class="lineno"> 5267</span> <span class="comment"> * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05268"></a><span class="lineno"> 5268</span> <span class="comment"> * name = tlib.name # -> 'Microsoft Excel 9.0 Object Library'</span></div><div class="line"><a name="l05269"></a><span class="lineno"> 5269</span> <span class="comment"> */</span></div><div class="line"><a name="l05270"></a><span class="lineno"> 5270</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05271"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a91f2817851c7bb20c0fe5bd881163956"> 5271</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a91f2817851c7bb20c0fe5bd881163956">foletypelib_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05272"></a><span class="lineno"> 5272</span> {</div><div class="line"><a name="l05273"></a><span class="lineno"> 5273</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l05274"></a><span class="lineno"> 5274</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05275"></a><span class="lineno"> 5275</span>  BSTR bstr;</div><div class="line"><a name="l05276"></a><span class="lineno"> 5276</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>;</div><div class="line"><a name="l05277"></a><span class="lineno"> 5277</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l05278"></a><span class="lineno"> 5278</span>  hr = <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>->lpVtbl->GetDocumentation(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, -1,</div><div class="line"><a name="l05279"></a><span class="lineno"> 5279</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &bstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l05280"></a><span class="lineno"> 5280</span> </div><div class="line"><a name="l05281"></a><span class="lineno"> 5281</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l05282"></a><span class="lineno"> 5282</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to get name from ITypeLib"</span>);</div><div class="line"><a name="l05283"></a><span class="lineno"> 5283</span>  }</div><div class="line"><a name="l05284"></a><span class="lineno"> 5284</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr);</div><div class="line"><a name="l05285"></a><span class="lineno"> 5285</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/de3/encoding_8h.html#a6707b730597e0e614213beb11670aca2">rb_enc_str_new</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>), <a class="code" href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>)), <a class="code" href="../../d2/d99/win32ole_8c.html#a047992a0ec88c62f680c1d484e33d5c5">cWIN32OLE_enc</a>);</div><div class="line"><a name="l05286"></a><span class="lineno"> 5286</span> }</div><div class="line"><a name="l05287"></a><span class="lineno"> 5287</span> </div><div class="line"><a name="l05288"></a><span class="lineno"> 5288</span> <span class="comment">/*</span></div><div class="line"><a name="l05289"></a><span class="lineno"> 5289</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05290"></a><span class="lineno"> 5290</span> <span class="comment"> * WIN32OLE_TYPELIB#version -> The type library version.</span></div><div class="line"><a name="l05291"></a><span class="lineno"> 5291</span> <span class="comment"> *</span></div><div class="line"><a name="l05292"></a><span class="lineno"> 5292</span> <span class="comment"> * Returns the type library version.</span></div><div class="line"><a name="l05293"></a><span class="lineno"> 5293</span> <span class="comment"> *</span></div><div class="line"><a name="l05294"></a><span class="lineno"> 5294</span> <span class="comment"> * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05295"></a><span class="lineno"> 5295</span> <span class="comment"> * puts tlib.version #-> 1.3</span></div><div class="line"><a name="l05296"></a><span class="lineno"> 5296</span> <span class="comment"> */</span></div><div class="line"><a name="l05297"></a><span class="lineno"> 5297</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05298"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a11c9249c3a3713391907080d3e9d9d9b"> 5298</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a11c9249c3a3713391907080d3e9d9d9b">foletypelib_version</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05299"></a><span class="lineno"> 5299</span> {</div><div class="line"><a name="l05300"></a><span class="lineno"> 5300</span>  TLIBATTR *pTLibAttr;</div><div class="line"><a name="l05301"></a><span class="lineno"> 5301</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a>;</div><div class="line"><a name="l05302"></a><span class="lineno"> 5302</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a>;</div><div class="line"><a name="l05303"></a><span class="lineno"> 5303</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l05304"></a><span class="lineno"> 5304</span> </div><div class="line"><a name="l05305"></a><span class="lineno"> 5305</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l05306"></a><span class="lineno"> 5306</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a6c5c0d1bde5f2871dc2127dacd9205fb">oletypelib_get_libattr</a>(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, &pTLibAttr);</div><div class="line"><a name="l05307"></a><span class="lineno"> 5307</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>(pTLibAttr->wMajorVerNum);</div><div class="line"><a name="l05308"></a><span class="lineno"> 5308</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>(pTLibAttr->wMinorVerNum);</div><div class="line"><a name="l05309"></a><span class="lineno"> 5309</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>->lpVtbl->ReleaseTLibAttr(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, pTLibAttr);</div><div class="line"><a name="l05310"></a><span class="lineno"> 5310</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a2dbbded6179580510ae67c33f29505ec">rb_Float</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab92641d2d72c638085831df508b86b3f">make_version_str</a>(<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a>, <a class="code" href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a>));</div><div class="line"><a name="l05311"></a><span class="lineno"> 5311</span> }</div><div class="line"><a name="l05312"></a><span class="lineno"> 5312</span> </div><div class="line"><a name="l05313"></a><span class="lineno"> 5313</span> <span class="comment">/*</span></div><div class="line"><a name="l05314"></a><span class="lineno"> 5314</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05315"></a><span class="lineno"> 5315</span> <span class="comment"> * WIN32OLE_TYPELIB#major_version -> The type library major version.</span></div><div class="line"><a name="l05316"></a><span class="lineno"> 5316</span> <span class="comment"> *</span></div><div class="line"><a name="l05317"></a><span class="lineno"> 5317</span> <span class="comment"> * Returns the type library major version.</span></div><div class="line"><a name="l05318"></a><span class="lineno"> 5318</span> <span class="comment"> *</span></div><div class="line"><a name="l05319"></a><span class="lineno"> 5319</span> <span class="comment"> * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05320"></a><span class="lineno"> 5320</span> <span class="comment"> * puts tlib.major_version # -> 1</span></div><div class="line"><a name="l05321"></a><span class="lineno"> 5321</span> <span class="comment"> */</span></div><div class="line"><a name="l05322"></a><span class="lineno"> 5322</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05323"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a9a574ecfa512cc905e0c882fe0413b43"> 5323</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a9a574ecfa512cc905e0c882fe0413b43">foletypelib_major_version</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05324"></a><span class="lineno"> 5324</span> {</div><div class="line"><a name="l05325"></a><span class="lineno"> 5325</span>  TLIBATTR *pTLibAttr;</div><div class="line"><a name="l05326"></a><span class="lineno"> 5326</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a>;</div><div class="line"><a name="l05327"></a><span class="lineno"> 5327</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l05328"></a><span class="lineno"> 5328</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l05329"></a><span class="lineno"> 5329</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a6c5c0d1bde5f2871dc2127dacd9205fb">oletypelib_get_libattr</a>(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, &pTLibAttr);</div><div class="line"><a name="l05330"></a><span class="lineno"> 5330</span> </div><div class="line"><a name="l05331"></a><span class="lineno"> 5331</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>(pTLibAttr->wMajorVerNum);</div><div class="line"><a name="l05332"></a><span class="lineno"> 5332</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>->lpVtbl->ReleaseTLibAttr(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, pTLibAttr);</div><div class="line"><a name="l05333"></a><span class="lineno"> 5333</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a>;</div><div class="line"><a name="l05334"></a><span class="lineno"> 5334</span> }</div><div class="line"><a name="l05335"></a><span class="lineno"> 5335</span> </div><div class="line"><a name="l05336"></a><span class="lineno"> 5336</span> <span class="comment">/*</span></div><div class="line"><a name="l05337"></a><span class="lineno"> 5337</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05338"></a><span class="lineno"> 5338</span> <span class="comment"> * WIN32OLE_TYPELIB#minor_version -> The type library minor version.</span></div><div class="line"><a name="l05339"></a><span class="lineno"> 5339</span> <span class="comment"> *</span></div><div class="line"><a name="l05340"></a><span class="lineno"> 5340</span> <span class="comment"> * Returns the type library minor version.</span></div><div class="line"><a name="l05341"></a><span class="lineno"> 5341</span> <span class="comment"> *</span></div><div class="line"><a name="l05342"></a><span class="lineno"> 5342</span> <span class="comment"> * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05343"></a><span class="lineno"> 5343</span> <span class="comment"> * puts tlib.minor_version # -> 3</span></div><div class="line"><a name="l05344"></a><span class="lineno"> 5344</span> <span class="comment"> */</span></div><div class="line"><a name="l05345"></a><span class="lineno"> 5345</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05346"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aff402c8fcf8df12ad99c93c4ba96abd4"> 5346</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aff402c8fcf8df12ad99c93c4ba96abd4">foletypelib_minor_version</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05347"></a><span class="lineno"> 5347</span> {</div><div class="line"><a name="l05348"></a><span class="lineno"> 5348</span>  TLIBATTR *pTLibAttr;</div><div class="line"><a name="l05349"></a><span class="lineno"> 5349</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a>;</div><div class="line"><a name="l05350"></a><span class="lineno"> 5350</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l05351"></a><span class="lineno"> 5351</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l05352"></a><span class="lineno"> 5352</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a6c5c0d1bde5f2871dc2127dacd9205fb">oletypelib_get_libattr</a>(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, &pTLibAttr);</div><div class="line"><a name="l05353"></a><span class="lineno"> 5353</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>(pTLibAttr->wMinorVerNum);</div><div class="line"><a name="l05354"></a><span class="lineno"> 5354</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>->lpVtbl->ReleaseTLibAttr(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, pTLibAttr);</div><div class="line"><a name="l05355"></a><span class="lineno"> 5355</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a>;</div><div class="line"><a name="l05356"></a><span class="lineno"> 5356</span> }</div><div class="line"><a name="l05357"></a><span class="lineno"> 5357</span> </div><div class="line"><a name="l05358"></a><span class="lineno"> 5358</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05359"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1132f433eef2a0ab23bdf4d990799dc4"> 5359</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1132f433eef2a0ab23bdf4d990799dc4">oletypelib_path</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> guid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a>)</div><div class="line"><a name="l05360"></a><span class="lineno"> 5360</span> {</div><div class="line"><a name="l05361"></a><span class="lineno"> 5361</span>  <span class="keywordtype">int</span> k;</div><div class="line"><a name="l05362"></a><span class="lineno"> 5362</span>  LONG <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l05363"></a><span class="lineno"> 5363</span>  HKEY hkey;</div><div class="line"><a name="l05364"></a><span class="lineno"> 5364</span>  HKEY hlang;</div><div class="line"><a name="l05365"></a><span class="lineno"> 5365</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> lang;</div><div class="line"><a name="l05366"></a><span class="lineno"> 5366</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> path = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05367"></a><span class="lineno"> 5367</span> </div><div class="line"><a name="l05368"></a><span class="lineno"> 5368</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"TypeLib\\"</span>);</div><div class="line"><a name="l05369"></a><span class="lineno"> 5369</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2f12f7ad949fa2e6abb64f2311c6e2c5">rb_str_concat</a>(<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>, guid);</div><div class="line"><a name="l05370"></a><span class="lineno"> 5370</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>, <span class="stringliteral">"\\"</span>);</div><div class="line"><a name="l05371"></a><span class="lineno"> 5371</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2f12f7ad949fa2e6abb64f2311c6e2c5">rb_str_concat</a>(<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a>);</div><div class="line"><a name="l05372"></a><span class="lineno"> 5372</span> </div><div class="line"><a name="l05373"></a><span class="lineno"> 5373</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(HKEY_CLASSES_ROOT, <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>, &hkey);</div><div class="line"><a name="l05374"></a><span class="lineno"> 5374</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != ERROR_SUCCESS) {</div><div class="line"><a name="l05375"></a><span class="lineno"> 5375</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05376"></a><span class="lineno"> 5376</span>  }</div><div class="line"><a name="l05377"></a><span class="lineno"> 5377</span>  <span class="keywordflow">for</span>(k = 0; path == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>; k++) {</div><div class="line"><a name="l05378"></a><span class="lineno"> 5378</span>  lang = <a class="code" href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a>(hkey, k);</div><div class="line"><a name="l05379"></a><span class="lineno"> 5379</span>  <span class="keywordflow">if</span> (lang == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l05380"></a><span class="lineno"> 5380</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05381"></a><span class="lineno"> 5381</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a>(hkey, lang, &hlang);</div><div class="line"><a name="l05382"></a><span class="lineno"> 5382</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> == ERROR_SUCCESS) {</div><div class="line"><a name="l05383"></a><span class="lineno"> 5383</span>  path = <a class="code" href="../../d2/d99/win32ole_8c.html#a14f4f8b53e3617452f73d78095f02a45">reg_get_typelib_file_path</a>(hlang);</div><div class="line"><a name="l05384"></a><span class="lineno"> 5384</span>  RegCloseKey(hlang);</div><div class="line"><a name="l05385"></a><span class="lineno"> 5385</span>  }</div><div class="line"><a name="l05386"></a><span class="lineno"> 5386</span>  }</div><div class="line"><a name="l05387"></a><span class="lineno"> 5387</span>  RegCloseKey(hkey);</div><div class="line"><a name="l05388"></a><span class="lineno"> 5388</span>  <span class="keywordflow">return</span> path;</div><div class="line"><a name="l05389"></a><span class="lineno"> 5389</span> }</div><div class="line"><a name="l05390"></a><span class="lineno"> 5390</span> </div><div class="line"><a name="l05391"></a><span class="lineno"> 5391</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a></div><div class="line"><a name="l05392"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2e4070a13ab6ee3c4453a57d34362a91"> 5392</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2e4070a13ab6ee3c4453a57d34362a91">oletypelib_from_guid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> guid, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a>, ITypeLib **ppTypeLib)</div><div class="line"><a name="l05393"></a><span class="lineno"> 5393</span> {</div><div class="line"><a name="l05394"></a><span class="lineno"> 5394</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> path;</div><div class="line"><a name="l05395"></a><span class="lineno"> 5395</span>  OLECHAR *pBuf;</div><div class="line"><a name="l05396"></a><span class="lineno"> 5396</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05397"></a><span class="lineno"> 5397</span>  path = <a class="code" href="../../d2/d99/win32ole_8c.html#a1132f433eef2a0ab23bdf4d990799dc4">oletypelib_path</a>(guid, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a>);</div><div class="line"><a name="l05398"></a><span class="lineno"> 5398</span>  <span class="keywordflow">if</span> (path == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l05399"></a><span class="lineno"> 5399</span>  <span class="keywordflow">return</span> E_UNEXPECTED;</div><div class="line"><a name="l05400"></a><span class="lineno"> 5400</span>  }</div><div class="line"><a name="l05401"></a><span class="lineno"> 5401</span>  pBuf = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(path);</div><div class="line"><a name="l05402"></a><span class="lineno"> 5402</span>  hr = LoadTypeLibEx(pBuf, REGKIND_NONE, ppTypeLib);</div><div class="line"><a name="l05403"></a><span class="lineno"> 5403</span>  SysFreeString(pBuf);</div><div class="line"><a name="l05404"></a><span class="lineno"> 5404</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l05405"></a><span class="lineno"> 5405</span> }</div><div class="line"><a name="l05406"></a><span class="lineno"> 5406</span> </div><div class="line"><a name="l05407"></a><span class="lineno"> 5407</span> <span class="comment">/*</span></div><div class="line"><a name="l05408"></a><span class="lineno"> 5408</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05409"></a><span class="lineno"> 5409</span> <span class="comment"> * WIN32OLE_TYPELIB#path -> The type library file path.</span></div><div class="line"><a name="l05410"></a><span class="lineno"> 5410</span> <span class="comment"> *</span></div><div class="line"><a name="l05411"></a><span class="lineno"> 5411</span> <span class="comment"> * Returns the type library file path.</span></div><div class="line"><a name="l05412"></a><span class="lineno"> 5412</span> <span class="comment"> *</span></div><div class="line"><a name="l05413"></a><span class="lineno"> 5413</span> <span class="comment"> * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05414"></a><span class="lineno"> 5414</span> <span class="comment"> * puts tlib.path #-> 'C:\...\EXCEL9.OLB'</span></div><div class="line"><a name="l05415"></a><span class="lineno"> 5415</span> <span class="comment"> */</span></div><div class="line"><a name="l05416"></a><span class="lineno"> 5416</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05417"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a55c610157abbd413fa24145b5705907d"> 5417</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a55c610157abbd413fa24145b5705907d">foletypelib_path</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05418"></a><span class="lineno"> 5418</span> {</div><div class="line"><a name="l05419"></a><span class="lineno"> 5419</span>  TLIBATTR *pTLibAttr;</div><div class="line"><a name="l05420"></a><span class="lineno"> 5420</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l05421"></a><span class="lineno"> 5421</span>  BSTR bstr;</div><div class="line"><a name="l05422"></a><span class="lineno"> 5422</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>;</div><div class="line"><a name="l05423"></a><span class="lineno"> 5423</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> path;</div><div class="line"><a name="l05424"></a><span class="lineno"> 5424</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l05425"></a><span class="lineno"> 5425</span> </div><div class="line"><a name="l05426"></a><span class="lineno"> 5426</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l05427"></a><span class="lineno"> 5427</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a6c5c0d1bde5f2871dc2127dacd9205fb">oletypelib_get_libattr</a>(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, &pTLibAttr);</div><div class="line"><a name="l05428"></a><span class="lineno"> 5428</span>  hr = QueryPathOfRegTypeLib(&pTLibAttr->guid,</div><div class="line"><a name="l05429"></a><span class="lineno"> 5429</span>  pTLibAttr->wMajorVerNum,</div><div class="line"><a name="l05430"></a><span class="lineno"> 5430</span>  pTLibAttr->wMinorVerNum,</div><div class="line"><a name="l05431"></a><span class="lineno"> 5431</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>,</div><div class="line"><a name="l05432"></a><span class="lineno"> 5432</span>  &bstr);</div><div class="line"><a name="l05433"></a><span class="lineno"> 5433</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l05434"></a><span class="lineno"> 5434</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>->lpVtbl->ReleaseTLibAttr(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, pTLibAttr);</div><div class="line"><a name="l05435"></a><span class="lineno"> 5435</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to QueryPathOfRegTypeTypeLib"</span>);</div><div class="line"><a name="l05436"></a><span class="lineno"> 5436</span>  }</div><div class="line"><a name="l05437"></a><span class="lineno"> 5437</span> </div><div class="line"><a name="l05438"></a><span class="lineno"> 5438</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>->lpVtbl->ReleaseTLibAttr(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, pTLibAttr);</div><div class="line"><a name="l05439"></a><span class="lineno"> 5439</span>  path = <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr);</div><div class="line"><a name="l05440"></a><span class="lineno"> 5440</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/de3/encoding_8h.html#a6707b730597e0e614213beb11670aca2">rb_enc_str_new</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(path), <a class="code" href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(path)), <a class="code" href="../../d2/d99/win32ole_8c.html#a047992a0ec88c62f680c1d484e33d5c5">cWIN32OLE_enc</a>);</div><div class="line"><a name="l05441"></a><span class="lineno"> 5441</span> }</div><div class="line"><a name="l05442"></a><span class="lineno"> 5442</span> </div><div class="line"><a name="l05443"></a><span class="lineno"> 5443</span> <span class="comment">/*</span></div><div class="line"><a name="l05444"></a><span class="lineno"> 5444</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05445"></a><span class="lineno"> 5445</span> <span class="comment"> * WIN32OLE_TYPELIB#visible?</span></div><div class="line"><a name="l05446"></a><span class="lineno"> 5446</span> <span class="comment"> *</span></div><div class="line"><a name="l05447"></a><span class="lineno"> 5447</span> <span class="comment"> * Returns true if the type library information is not hidden.</span></div><div class="line"><a name="l05448"></a><span class="lineno"> 5448</span> <span class="comment"> * If wLibFlags of TLIBATTR is 0 or LIBFLAG_FRESTRICTED or LIBFLAG_FHIDDEN,</span></div><div class="line"><a name="l05449"></a><span class="lineno"> 5449</span> <span class="comment"> * the method returns false, otherwise, returns true.</span></div><div class="line"><a name="l05450"></a><span class="lineno"> 5450</span> <span class="comment"> * If the method fails to access the TLIBATTR information, then</span></div><div class="line"><a name="l05451"></a><span class="lineno"> 5451</span> <span class="comment"> * WIN32OLERuntimeError is raised.</span></div><div class="line"><a name="l05452"></a><span class="lineno"> 5452</span> <span class="comment"> *</span></div><div class="line"><a name="l05453"></a><span class="lineno"> 5453</span> <span class="comment"> * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05454"></a><span class="lineno"> 5454</span> <span class="comment"> * tlib.visible? # => true</span></div><div class="line"><a name="l05455"></a><span class="lineno"> 5455</span> <span class="comment"> */</span></div><div class="line"><a name="l05456"></a><span class="lineno"> 5456</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05457"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a60cc14e6fb03174de0b20323e13afcdd"> 5457</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a60cc14e6fb03174de0b20323e13afcdd">foletypelib_visible</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05458"></a><span class="lineno"> 5458</span> {</div><div class="line"><a name="l05459"></a><span class="lineno"> 5459</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l05460"></a><span class="lineno"> 5460</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> visible = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05461"></a><span class="lineno"> 5461</span>  TLIBATTR *pTLibAttr;</div><div class="line"><a name="l05462"></a><span class="lineno"> 5462</span> </div><div class="line"><a name="l05463"></a><span class="lineno"> 5463</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l05464"></a><span class="lineno"> 5464</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a6c5c0d1bde5f2871dc2127dacd9205fb">oletypelib_get_libattr</a>(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, &pTLibAttr);</div><div class="line"><a name="l05465"></a><span class="lineno"> 5465</span> </div><div class="line"><a name="l05466"></a><span class="lineno"> 5466</span>  <span class="keywordflow">if</span> ((pTLibAttr->wLibFlags == 0) ||</div><div class="line"><a name="l05467"></a><span class="lineno"> 5467</span>  (pTLibAttr->wLibFlags & LIBFLAG_FRESTRICTED) ||</div><div class="line"><a name="l05468"></a><span class="lineno"> 5468</span>  (pTLibAttr->wLibFlags & LIBFLAG_FHIDDEN)) {</div><div class="line"><a name="l05469"></a><span class="lineno"> 5469</span>  visible = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05470"></a><span class="lineno"> 5470</span>  }</div><div class="line"><a name="l05471"></a><span class="lineno"> 5471</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>->lpVtbl->ReleaseTLibAttr(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, pTLibAttr);</div><div class="line"><a name="l05472"></a><span class="lineno"> 5472</span>  <span class="keywordflow">return</span> visible;</div><div class="line"><a name="l05473"></a><span class="lineno"> 5473</span> }</div><div class="line"><a name="l05474"></a><span class="lineno"> 5474</span> </div><div class="line"><a name="l05475"></a><span class="lineno"> 5475</span> <span class="comment">/*</span></div><div class="line"><a name="l05476"></a><span class="lineno"> 5476</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05477"></a><span class="lineno"> 5477</span> <span class="comment"> * WIN32OLE_TYPELIB#library_name</span></div><div class="line"><a name="l05478"></a><span class="lineno"> 5478</span> <span class="comment"> *</span></div><div class="line"><a name="l05479"></a><span class="lineno"> 5479</span> <span class="comment"> * Returns library name.</span></div><div class="line"><a name="l05480"></a><span class="lineno"> 5480</span> <span class="comment"> * If the method fails to access library name, WIN32OLERuntimeError is raised.</span></div><div class="line"><a name="l05481"></a><span class="lineno"> 5481</span> <span class="comment"> *</span></div><div class="line"><a name="l05482"></a><span class="lineno"> 5482</span> <span class="comment"> * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05483"></a><span class="lineno"> 5483</span> <span class="comment"> * tlib.library_name # => Excel</span></div><div class="line"><a name="l05484"></a><span class="lineno"> 5484</span> <span class="comment"> */</span></div><div class="line"><a name="l05485"></a><span class="lineno"> 5485</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05486"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a31f75b0afdb68143a0ea46798c10b413"> 5486</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a31f75b0afdb68143a0ea46798c10b413">foletypelib_library_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05487"></a><span class="lineno"> 5487</span> {</div><div class="line"><a name="l05488"></a><span class="lineno"> 5488</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05489"></a><span class="lineno"> 5489</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l05490"></a><span class="lineno"> 5490</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> libname = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05491"></a><span class="lineno"> 5491</span>  BSTR bstr;</div><div class="line"><a name="l05492"></a><span class="lineno"> 5492</span> </div><div class="line"><a name="l05493"></a><span class="lineno"> 5493</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l05494"></a><span class="lineno"> 5494</span>  hr = <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>->lpVtbl->GetDocumentation(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, -1,</div><div class="line"><a name="l05495"></a><span class="lineno"> 5495</span>  &bstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l05496"></a><span class="lineno"> 5496</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l05497"></a><span class="lineno"> 5497</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to get library name"</span>);</div><div class="line"><a name="l05498"></a><span class="lineno"> 5498</span>  }</div><div class="line"><a name="l05499"></a><span class="lineno"> 5499</span>  libname = <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr);</div><div class="line"><a name="l05500"></a><span class="lineno"> 5500</span>  <span class="keywordflow">return</span> libname;</div><div class="line"><a name="l05501"></a><span class="lineno"> 5501</span> }</div><div class="line"><a name="l05502"></a><span class="lineno"> 5502</span> </div><div class="line"><a name="l05503"></a><span class="lineno"> 5503</span> </div><div class="line"><a name="l05504"></a><span class="lineno"> 5504</span> <span class="comment">/*</span></div><div class="line"><a name="l05505"></a><span class="lineno"> 5505</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05506"></a><span class="lineno"> 5506</span> <span class="comment"> * WIN32OLE_TYPELIB#ole_types -> The array of WIN32OLE_TYPE object included the type library.</span></div><div class="line"><a name="l05507"></a><span class="lineno"> 5507</span> <span class="comment"> *</span></div><div class="line"><a name="l05508"></a><span class="lineno"> 5508</span> <span class="comment"> * Returns the type library file path.</span></div><div class="line"><a name="l05509"></a><span class="lineno"> 5509</span> <span class="comment"> *</span></div><div class="line"><a name="l05510"></a><span class="lineno"> 5510</span> <span class="comment"> * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05511"></a><span class="lineno"> 5511</span> <span class="comment"> * classes = tlib.ole_types.collect{|k| k.name} # -> ['AddIn', 'AddIns' ...]</span></div><div class="line"><a name="l05512"></a><span class="lineno"> 5512</span> <span class="comment"> */</span></div><div class="line"><a name="l05513"></a><span class="lineno"> 5513</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05514"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad954f499199716efcb6d3656d6874aea"> 5514</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad954f499199716efcb6d3656d6874aea">foletypelib_ole_types</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05515"></a><span class="lineno"> 5515</span> {</div><div class="line"><a name="l05516"></a><span class="lineno"> 5516</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l05517"></a><span class="lineno"> 5517</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> classes = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l05518"></a><span class="lineno"> 5518</span>  <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l05519"></a><span class="lineno"> 5519</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a904af26931d02b6f49611a7201d3c9c1">ole_types_from_typelib</a>(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, classes);</div><div class="line"><a name="l05520"></a><span class="lineno"> 5520</span>  <span class="keywordflow">return</span> classes;</div><div class="line"><a name="l05521"></a><span class="lineno"> 5521</span> }</div><div class="line"><a name="l05522"></a><span class="lineno"> 5522</span> </div><div class="line"><a name="l05523"></a><span class="lineno"> 5523</span> <span class="comment">/*</span></div><div class="line"><a name="l05524"></a><span class="lineno"> 5524</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05525"></a><span class="lineno"> 5525</span> <span class="comment"> * WIN32OLE_TYPELIB#inspect -> String</span></div><div class="line"><a name="l05526"></a><span class="lineno"> 5526</span> <span class="comment"> *</span></div><div class="line"><a name="l05527"></a><span class="lineno"> 5527</span> <span class="comment"> * Returns the type library name with class name.</span></div><div class="line"><a name="l05528"></a><span class="lineno"> 5528</span> <span class="comment"> *</span></div><div class="line"><a name="l05529"></a><span class="lineno"> 5529</span> <span class="comment"> * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')</span></div><div class="line"><a name="l05530"></a><span class="lineno"> 5530</span> <span class="comment"> * tlib.inspect # => "<#WIN32OLE_TYPELIB:Microsoft Excel 9.0 Object Library>"</span></div><div class="line"><a name="l05531"></a><span class="lineno"> 5531</span> <span class="comment"> */</span></div><div class="line"><a name="l05532"></a><span class="lineno"> 5532</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05533"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa01105060883846e72031eed6131b7d7"> 5533</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa01105060883846e72031eed6131b7d7">foletypelib_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05534"></a><span class="lineno"> 5534</span> {</div><div class="line"><a name="l05535"></a><span class="lineno"> 5535</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1da595a8d1f22377435d6bd4fa5150d1">default_inspect</a>(<span class="keyword">self</span>, <span class="stringliteral">"WIN32OLE_TYPELIB"</span>);</div><div class="line"><a name="l05536"></a><span class="lineno"> 5536</span> }</div><div class="line"><a name="l05537"></a><span class="lineno"> 5537</span> </div><div class="line"><a name="l05538"></a><span class="lineno"> 5538</span> <span class="comment">/*</span></div><div class="line"><a name="l05539"></a><span class="lineno"> 5539</span> <span class="comment"> * Document-class: WIN32OLE_TYPE</span></div><div class="line"><a name="l05540"></a><span class="lineno"> 5540</span> <span class="comment"> *</span></div><div class="line"><a name="l05541"></a><span class="lineno"> 5541</span> <span class="comment"> * <code>WIN32OLE_TYPE</code> objects represent OLE type libarary information.</span></div><div class="line"><a name="l05542"></a><span class="lineno"> 5542</span> <span class="comment"> */</span></div><div class="line"><a name="l05543"></a><span class="lineno"> 5543</span> </div><div class="line"><a name="l05544"></a><span class="lineno"> 5544</span> <span class="comment">/*</span></div><div class="line"><a name="l05545"></a><span class="lineno"> 5545</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05546"></a><span class="lineno"> 5546</span> <span class="comment"> * WIN32OLE_TYPE.new(typelib, ole_class) -> WIN32OLE_TYPE object</span></div><div class="line"><a name="l05547"></a><span class="lineno"> 5547</span> <span class="comment"> *</span></div><div class="line"><a name="l05548"></a><span class="lineno"> 5548</span> <span class="comment"> * Returns a new WIN32OLE_TYPE object.</span></div><div class="line"><a name="l05549"></a><span class="lineno"> 5549</span> <span class="comment"> * The first argument <i>typelib</i> specifies OLE type library name.</span></div><div class="line"><a name="l05550"></a><span class="lineno"> 5550</span> <span class="comment"> * The second argument specifies OLE class name.</span></div><div class="line"><a name="l05551"></a><span class="lineno"> 5551</span> <span class="comment"> *</span></div><div class="line"><a name="l05552"></a><span class="lineno"> 5552</span> <span class="comment"> * WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')</span></div><div class="line"><a name="l05553"></a><span class="lineno"> 5553</span> <span class="comment"> * # => WIN32OLE_TYPE object of Application class of Excel.</span></div><div class="line"><a name="l05554"></a><span class="lineno"> 5554</span> <span class="comment"> */</span></div><div class="line"><a name="l05555"></a><span class="lineno"> 5555</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05556"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2fdc77d63c0a1d101a2597e9d13da037"> 5556</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2fdc77d63c0a1d101a2597e9d13da037">foletype_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typelib, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> oleclass)</div><div class="line"><a name="l05557"></a><span class="lineno"> 5557</span> {</div><div class="line"><a name="l05558"></a><span class="lineno"> 5558</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> file;</div><div class="line"><a name="l05559"></a><span class="lineno"> 5559</span>  OLECHAR * pbuf;</div><div class="line"><a name="l05560"></a><span class="lineno"> 5560</span>  ITypeLib *<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>;</div><div class="line"><a name="l05561"></a><span class="lineno"> 5561</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05562"></a><span class="lineno"> 5562</span> </div><div class="line"><a name="l05563"></a><span class="lineno"> 5563</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0381640e2905c1b3e104194f91697ca4">SafeStringValue</a>(oleclass);</div><div class="line"><a name="l05564"></a><span class="lineno"> 5564</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0381640e2905c1b3e104194f91697ca4">SafeStringValue</a>(typelib);</div><div class="line"><a name="l05565"></a><span class="lineno"> 5565</span>  file = <a class="code" href="../../d2/d99/win32ole_8c.html#afe7b5c965ce1a10b205d15b8c47646d9">typelib_file</a>(typelib);</div><div class="line"><a name="l05566"></a><span class="lineno"> 5566</span>  <span class="keywordflow">if</span> (file == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l05567"></a><span class="lineno"> 5567</span>  file = typelib;</div><div class="line"><a name="l05568"></a><span class="lineno"> 5568</span>  }</div><div class="line"><a name="l05569"></a><span class="lineno"> 5569</span>  pbuf = <a class="code" href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a>(file);</div><div class="line"><a name="l05570"></a><span class="lineno"> 5570</span>  hr = LoadTypeLibEx(pbuf, REGKIND_NONE, &<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05571"></a><span class="lineno"> 5571</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l05572"></a><span class="lineno"> 5572</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to LoadTypeLibEx"</span>);</div><div class="line"><a name="l05573"></a><span class="lineno"> 5573</span>  SysFreeString(pbuf);</div><div class="line"><a name="l05574"></a><span class="lineno"> 5574</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a78014010885156d66440be3692ea4a13">oleclass_from_typelib</a>(<span class="keyword">self</span>, <a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>, oleclass) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>) {</div><div class="line"><a name="l05575"></a><span class="lineno"> 5575</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05576"></a><span class="lineno"> 5576</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"not found `%s` in `%s`"</span>,</div><div class="line"><a name="l05577"></a><span class="lineno"> 5577</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(oleclass), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(typelib));</div><div class="line"><a name="l05578"></a><span class="lineno"> 5578</span>  }</div><div class="line"><a name="l05579"></a><span class="lineno"> 5579</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(<a class="code" href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">pTypeLib</a>);</div><div class="line"><a name="l05580"></a><span class="lineno"> 5580</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l05581"></a><span class="lineno"> 5581</span> }</div><div class="line"><a name="l05582"></a><span class="lineno"> 5582</span> </div><div class="line"><a name="l05583"></a><span class="lineno"> 5583</span> <span class="comment">/*</span></div><div class="line"><a name="l05584"></a><span class="lineno"> 5584</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05585"></a><span class="lineno"> 5585</span> <span class="comment"> * WIN32OLE_TYPE#name #=> OLE type name</span></div><div class="line"><a name="l05586"></a><span class="lineno"> 5586</span> <span class="comment"> *</span></div><div class="line"><a name="l05587"></a><span class="lineno"> 5587</span> <span class="comment"> * Returns OLE type name.</span></div><div class="line"><a name="l05588"></a><span class="lineno"> 5588</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')</span></div><div class="line"><a name="l05589"></a><span class="lineno"> 5589</span> <span class="comment"> * puts tobj.name # => Application</span></div><div class="line"><a name="l05590"></a><span class="lineno"> 5590</span> <span class="comment"> */</span></div><div class="line"><a name="l05591"></a><span class="lineno"> 5591</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05592"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae702a671c49f24709fcec4962b540fbd"> 5592</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ae702a671c49f24709fcec4962b540fbd">foletype_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05593"></a><span class="lineno"> 5593</span> {</div><div class="line"><a name="l05594"></a><span class="lineno"> 5594</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>));</div><div class="line"><a name="l05595"></a><span class="lineno"> 5595</span> }</div><div class="line"><a name="l05596"></a><span class="lineno"> 5596</span> </div><div class="line"><a name="l05597"></a><span class="lineno"> 5597</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05598"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aaa4e0270632c9307fd04b301c488cee1"> 5598</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aaa4e0270632c9307fd04b301c488cee1">ole_ole_type</a>(ITypeInfo *pTypeInfo)</div><div class="line"><a name="l05599"></a><span class="lineno"> 5599</span> {</div><div class="line"><a name="l05600"></a><span class="lineno"> 5600</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05601"></a><span class="lineno"> 5601</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l05602"></a><span class="lineno"> 5602</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05603"></a><span class="lineno"> 5603</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(pTypeInfo, &pTypeAttr);</div><div class="line"><a name="l05604"></a><span class="lineno"> 5604</span>  <span class="keywordflow">if</span>(FAILED(hr)){</div><div class="line"><a name="l05605"></a><span class="lineno"> 5605</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l05606"></a><span class="lineno"> 5606</span>  }</div><div class="line"><a name="l05607"></a><span class="lineno"> 5607</span>  <span class="keywordflow">switch</span>(pTypeAttr->typekind) {</div><div class="line"><a name="l05608"></a><span class="lineno"> 5608</span>  <span class="keywordflow">case</span> TKIND_ENUM:</div><div class="line"><a name="l05609"></a><span class="lineno"> 5609</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"Enum"</span>);</div><div class="line"><a name="l05610"></a><span class="lineno"> 5610</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05611"></a><span class="lineno"> 5611</span>  <span class="keywordflow">case</span> TKIND_RECORD:</div><div class="line"><a name="l05612"></a><span class="lineno"> 5612</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"Record"</span>);</div><div class="line"><a name="l05613"></a><span class="lineno"> 5613</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05614"></a><span class="lineno"> 5614</span>  <span class="keywordflow">case</span> TKIND_MODULE:</div><div class="line"><a name="l05615"></a><span class="lineno"> 5615</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"Module"</span>);</div><div class="line"><a name="l05616"></a><span class="lineno"> 5616</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05617"></a><span class="lineno"> 5617</span>  <span class="keywordflow">case</span> TKIND_INTERFACE:</div><div class="line"><a name="l05618"></a><span class="lineno"> 5618</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"Interface"</span>);</div><div class="line"><a name="l05619"></a><span class="lineno"> 5619</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05620"></a><span class="lineno"> 5620</span>  <span class="keywordflow">case</span> TKIND_DISPATCH:</div><div class="line"><a name="l05621"></a><span class="lineno"> 5621</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"Dispatch"</span>);</div><div class="line"><a name="l05622"></a><span class="lineno"> 5622</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05623"></a><span class="lineno"> 5623</span>  <span class="keywordflow">case</span> TKIND_COCLASS:</div><div class="line"><a name="l05624"></a><span class="lineno"> 5624</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"Class"</span>);</div><div class="line"><a name="l05625"></a><span class="lineno"> 5625</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05626"></a><span class="lineno"> 5626</span>  <span class="keywordflow">case</span> TKIND_ALIAS:</div><div class="line"><a name="l05627"></a><span class="lineno"> 5627</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"Alias"</span>);</div><div class="line"><a name="l05628"></a><span class="lineno"> 5628</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05629"></a><span class="lineno"> 5629</span>  <span class="keywordflow">case</span> TKIND_UNION:</div><div class="line"><a name="l05630"></a><span class="lineno"> 5630</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"Union"</span>);</div><div class="line"><a name="l05631"></a><span class="lineno"> 5631</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05632"></a><span class="lineno"> 5632</span>  <span class="keywordflow">case</span> TKIND_MAX:</div><div class="line"><a name="l05633"></a><span class="lineno"> 5633</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"Max"</span>);</div><div class="line"><a name="l05634"></a><span class="lineno"> 5634</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05635"></a><span class="lineno"> 5635</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l05636"></a><span class="lineno"> 5636</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05637"></a><span class="lineno"> 5637</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l05638"></a><span class="lineno"> 5638</span>  }</div><div class="line"><a name="l05639"></a><span class="lineno"> 5639</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(pTypeInfo, pTypeAttr);</div><div class="line"><a name="l05640"></a><span class="lineno"> 5640</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l05641"></a><span class="lineno"> 5641</span> }</div><div class="line"><a name="l05642"></a><span class="lineno"> 5642</span> </div><div class="line"><a name="l05643"></a><span class="lineno"> 5643</span> <span class="comment">/*</span></div><div class="line"><a name="l05644"></a><span class="lineno"> 5644</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05645"></a><span class="lineno"> 5645</span> <span class="comment"> * WIN32OLE_TYPE#ole_type #=> OLE type string.</span></div><div class="line"><a name="l05646"></a><span class="lineno"> 5646</span> <span class="comment"> *</span></div><div class="line"><a name="l05647"></a><span class="lineno"> 5647</span> <span class="comment"> * returns type of OLE class.</span></div><div class="line"><a name="l05648"></a><span class="lineno"> 5648</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')</span></div><div class="line"><a name="l05649"></a><span class="lineno"> 5649</span> <span class="comment"> * puts tobj.ole_type # => Class</span></div><div class="line"><a name="l05650"></a><span class="lineno"> 5650</span> <span class="comment"> */</span></div><div class="line"><a name="l05651"></a><span class="lineno"> 5651</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05652"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af7405fc306fc6dd47d3718be25b547b7"> 5652</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#af7405fc306fc6dd47d3718be25b547b7">foletype_ole_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05653"></a><span class="lineno"> 5653</span> {</div><div class="line"><a name="l05654"></a><span class="lineno"> 5654</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05655"></a><span class="lineno"> 5655</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05656"></a><span class="lineno"> 5656</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aaa4e0270632c9307fd04b301c488cee1">ole_ole_type</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05657"></a><span class="lineno"> 5657</span> }</div><div class="line"><a name="l05658"></a><span class="lineno"> 5658</span> </div><div class="line"><a name="l05659"></a><span class="lineno"> 5659</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05660"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5f7b09d5d74e06de5f6c89beae493338"> 5660</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5f7b09d5d74e06de5f6c89beae493338">ole_type_guid</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l05661"></a><span class="lineno"> 5661</span> {</div><div class="line"><a name="l05662"></a><span class="lineno"> 5662</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05663"></a><span class="lineno"> 5663</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l05664"></a><span class="lineno"> 5664</span>  <span class="keywordtype">int</span> len;</div><div class="line"><a name="l05665"></a><span class="lineno"> 5665</span>  OLECHAR bstr[80];</div><div class="line"><a name="l05666"></a><span class="lineno"> 5666</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> guid = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05667"></a><span class="lineno"> 5667</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &pTypeAttr);</div><div class="line"><a name="l05668"></a><span class="lineno"> 5668</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l05669"></a><span class="lineno"> 5669</span>  <span class="keywordflow">return</span> guid;</div><div class="line"><a name="l05670"></a><span class="lineno"> 5670</span>  len = StringFromGUID2(&pTypeAttr->guid, bstr, <span class="keyword">sizeof</span>(bstr)/<span class="keyword">sizeof</span>(OLECHAR));</div><div class="line"><a name="l05671"></a><span class="lineno"> 5671</span>  <span class="keywordflow">if</span> (len > 3) {</div><div class="line"><a name="l05672"></a><span class="lineno"> 5672</span>  guid = <a class="code" href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6">ole_wc2vstr</a>(bstr, <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l05673"></a><span class="lineno"> 5673</span>  }</div><div class="line"><a name="l05674"></a><span class="lineno"> 5674</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l05675"></a><span class="lineno"> 5675</span>  <span class="keywordflow">return</span> guid;</div><div class="line"><a name="l05676"></a><span class="lineno"> 5676</span> }</div><div class="line"><a name="l05677"></a><span class="lineno"> 5677</span> </div><div class="line"><a name="l05678"></a><span class="lineno"> 5678</span> <span class="comment">/*</span></div><div class="line"><a name="l05679"></a><span class="lineno"> 5679</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05680"></a><span class="lineno"> 5680</span> <span class="comment"> * WIN32OLE_TYPE#guid #=> GUID</span></div><div class="line"><a name="l05681"></a><span class="lineno"> 5681</span> <span class="comment"> *</span></div><div class="line"><a name="l05682"></a><span class="lineno"> 5682</span> <span class="comment"> * Returns GUID.</span></div><div class="line"><a name="l05683"></a><span class="lineno"> 5683</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')</span></div><div class="line"><a name="l05684"></a><span class="lineno"> 5684</span> <span class="comment"> * puts tobj.guid # => {00024500-0000-0000-C000-000000000046}</span></div><div class="line"><a name="l05685"></a><span class="lineno"> 5685</span> <span class="comment"> */</span></div><div class="line"><a name="l05686"></a><span class="lineno"> 5686</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05687"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a55b1c52400f549decd28910adf9534b0"> 5687</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a55b1c52400f549decd28910adf9534b0">foletype_guid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05688"></a><span class="lineno"> 5688</span> {</div><div class="line"><a name="l05689"></a><span class="lineno"> 5689</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05690"></a><span class="lineno"> 5690</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05691"></a><span class="lineno"> 5691</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5f7b09d5d74e06de5f6c89beae493338">ole_type_guid</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05692"></a><span class="lineno"> 5692</span> }</div><div class="line"><a name="l05693"></a><span class="lineno"> 5693</span> </div><div class="line"><a name="l05694"></a><span class="lineno"> 5694</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05695"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ade95b6654fa8f56b6d40a6773d2331ad"> 5695</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ade95b6654fa8f56b6d40a6773d2331ad">ole_type_progid</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l05696"></a><span class="lineno"> 5696</span> {</div><div class="line"><a name="l05697"></a><span class="lineno"> 5697</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05698"></a><span class="lineno"> 5698</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l05699"></a><span class="lineno"> 5699</span>  OLECHAR *pbuf;</div><div class="line"><a name="l05700"></a><span class="lineno"> 5700</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> progid = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05701"></a><span class="lineno"> 5701</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &pTypeAttr);</div><div class="line"><a name="l05702"></a><span class="lineno"> 5702</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l05703"></a><span class="lineno"> 5703</span>  <span class="keywordflow">return</span> progid;</div><div class="line"><a name="l05704"></a><span class="lineno"> 5704</span>  hr = ProgIDFromCLSID(&pTypeAttr->guid, &pbuf);</div><div class="line"><a name="l05705"></a><span class="lineno"> 5705</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l05706"></a><span class="lineno"> 5706</span>  progid = <a class="code" href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6">ole_wc2vstr</a>(pbuf, <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>);</div><div class="line"><a name="l05707"></a><span class="lineno"> 5707</span>  CoTaskMemFree(pbuf);</div><div class="line"><a name="l05708"></a><span class="lineno"> 5708</span>  }</div><div class="line"><a name="l05709"></a><span class="lineno"> 5709</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l05710"></a><span class="lineno"> 5710</span>  <span class="keywordflow">return</span> progid;</div><div class="line"><a name="l05711"></a><span class="lineno"> 5711</span> }</div><div class="line"><a name="l05712"></a><span class="lineno"> 5712</span> </div><div class="line"><a name="l05713"></a><span class="lineno"> 5713</span> <span class="comment">/*</span></div><div class="line"><a name="l05714"></a><span class="lineno"> 5714</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05715"></a><span class="lineno"> 5715</span> <span class="comment"> * WIN32OLE_TYPE#progid #=> ProgID</span></div><div class="line"><a name="l05716"></a><span class="lineno"> 5716</span> <span class="comment"> *</span></div><div class="line"><a name="l05717"></a><span class="lineno"> 5717</span> <span class="comment"> * Returns ProgID if it exists. If not found, then returns nil.</span></div><div class="line"><a name="l05718"></a><span class="lineno"> 5718</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')</span></div><div class="line"><a name="l05719"></a><span class="lineno"> 5719</span> <span class="comment"> * puts tobj.progid # => Excel.Application.9</span></div><div class="line"><a name="l05720"></a><span class="lineno"> 5720</span> <span class="comment"> */</span></div><div class="line"><a name="l05721"></a><span class="lineno"> 5721</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05722"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6f887102a87a5c6e8f1155ea69bd02a1"> 5722</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6f887102a87a5c6e8f1155ea69bd02a1">foletype_progid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05723"></a><span class="lineno"> 5723</span> {</div><div class="line"><a name="l05724"></a><span class="lineno"> 5724</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05725"></a><span class="lineno"> 5725</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05726"></a><span class="lineno"> 5726</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ade95b6654fa8f56b6d40a6773d2331ad">ole_type_progid</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05727"></a><span class="lineno"> 5727</span> }</div><div class="line"><a name="l05728"></a><span class="lineno"> 5728</span> </div><div class="line"><a name="l05729"></a><span class="lineno"> 5729</span> </div><div class="line"><a name="l05730"></a><span class="lineno"> 5730</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05731"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a53606d594d28df92bb76a6afb1ae94fe"> 5731</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a53606d594d28df92bb76a6afb1ae94fe">ole_type_visible</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l05732"></a><span class="lineno"> 5732</span> {</div><div class="line"><a name="l05733"></a><span class="lineno"> 5733</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05734"></a><span class="lineno"> 5734</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l05735"></a><span class="lineno"> 5735</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> visible;</div><div class="line"><a name="l05736"></a><span class="lineno"> 5736</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &pTypeAttr);</div><div class="line"><a name="l05737"></a><span class="lineno"> 5737</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l05738"></a><span class="lineno"> 5738</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05739"></a><span class="lineno"> 5739</span>  <span class="keywordflow">if</span> (pTypeAttr->wTypeFlags & (TYPEFLAG_FHIDDEN | TYPEFLAG_FRESTRICTED)) {</div><div class="line"><a name="l05740"></a><span class="lineno"> 5740</span>  visible = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l05741"></a><span class="lineno"> 5741</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l05742"></a><span class="lineno"> 5742</span>  visible = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l05743"></a><span class="lineno"> 5743</span>  }</div><div class="line"><a name="l05744"></a><span class="lineno"> 5744</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l05745"></a><span class="lineno"> 5745</span>  <span class="keywordflow">return</span> visible;</div><div class="line"><a name="l05746"></a><span class="lineno"> 5746</span> }</div><div class="line"><a name="l05747"></a><span class="lineno"> 5747</span> </div><div class="line"><a name="l05748"></a><span class="lineno"> 5748</span> <span class="comment">/*</span></div><div class="line"><a name="l05749"></a><span class="lineno"> 5749</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05750"></a><span class="lineno"> 5750</span> <span class="comment"> * WIN32OLE_TYPE#visible #=> true or false</span></div><div class="line"><a name="l05751"></a><span class="lineno"> 5751</span> <span class="comment"> *</span></div><div class="line"><a name="l05752"></a><span class="lineno"> 5752</span> <span class="comment"> * Returns true if the OLE class is public.</span></div><div class="line"><a name="l05753"></a><span class="lineno"> 5753</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')</span></div><div class="line"><a name="l05754"></a><span class="lineno"> 5754</span> <span class="comment"> * puts tobj.visible # => true</span></div><div class="line"><a name="l05755"></a><span class="lineno"> 5755</span> <span class="comment"> */</span></div><div class="line"><a name="l05756"></a><span class="lineno"> 5756</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05757"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a67538b99589f8465d34e18df229b9700"> 5757</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a67538b99589f8465d34e18df229b9700">foletype_visible</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05758"></a><span class="lineno"> 5758</span> {</div><div class="line"><a name="l05759"></a><span class="lineno"> 5759</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05760"></a><span class="lineno"> 5760</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05761"></a><span class="lineno"> 5761</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a53606d594d28df92bb76a6afb1ae94fe">ole_type_visible</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05762"></a><span class="lineno"> 5762</span> }</div><div class="line"><a name="l05763"></a><span class="lineno"> 5763</span> </div><div class="line"><a name="l05764"></a><span class="lineno"> 5764</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05765"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2d695e7b75d0ffd71513ceebaa6b0d3e"> 5765</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2d695e7b75d0ffd71513ceebaa6b0d3e">ole_type_major_version</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l05766"></a><span class="lineno"> 5766</span> {</div><div class="line"><a name="l05767"></a><span class="lineno"> 5767</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ver;</div><div class="line"><a name="l05768"></a><span class="lineno"> 5768</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l05769"></a><span class="lineno"> 5769</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05770"></a><span class="lineno"> 5770</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &pTypeAttr);</div><div class="line"><a name="l05771"></a><span class="lineno"> 5771</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l05772"></a><span class="lineno"> 5772</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetTypeAttr"</span>);</div><div class="line"><a name="l05773"></a><span class="lineno"> 5773</span>  ver = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(pTypeAttr->wMajorVerNum);</div><div class="line"><a name="l05774"></a><span class="lineno"> 5774</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l05775"></a><span class="lineno"> 5775</span>  <span class="keywordflow">return</span> ver;</div><div class="line"><a name="l05776"></a><span class="lineno"> 5776</span> }</div><div class="line"><a name="l05777"></a><span class="lineno"> 5777</span> </div><div class="line"><a name="l05778"></a><span class="lineno"> 5778</span> <span class="comment">/*</span></div><div class="line"><a name="l05779"></a><span class="lineno"> 5779</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05780"></a><span class="lineno"> 5780</span> <span class="comment"> * WIN32OLE_TYPE#major_version</span></div><div class="line"><a name="l05781"></a><span class="lineno"> 5781</span> <span class="comment"> *</span></div><div class="line"><a name="l05782"></a><span class="lineno"> 5782</span> <span class="comment"> * Returns major version.</span></div><div class="line"><a name="l05783"></a><span class="lineno"> 5783</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Word 10.0 Object Library', 'Documents')</span></div><div class="line"><a name="l05784"></a><span class="lineno"> 5784</span> <span class="comment"> * puts tobj.major_version # => 8</span></div><div class="line"><a name="l05785"></a><span class="lineno"> 5785</span> <span class="comment"> */</span></div><div class="line"><a name="l05786"></a><span class="lineno"> 5786</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05787"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a198156271b35da99714f298e4885d34c"> 5787</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a198156271b35da99714f298e4885d34c">foletype_major_version</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05788"></a><span class="lineno"> 5788</span> {</div><div class="line"><a name="l05789"></a><span class="lineno"> 5789</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05790"></a><span class="lineno"> 5790</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05791"></a><span class="lineno"> 5791</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2d695e7b75d0ffd71513ceebaa6b0d3e">ole_type_major_version</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05792"></a><span class="lineno"> 5792</span> }</div><div class="line"><a name="l05793"></a><span class="lineno"> 5793</span> </div><div class="line"><a name="l05794"></a><span class="lineno"> 5794</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05795"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac0c506b36e89c160b8d9bb7b5877a103"> 5795</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac0c506b36e89c160b8d9bb7b5877a103">ole_type_minor_version</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l05796"></a><span class="lineno"> 5796</span> {</div><div class="line"><a name="l05797"></a><span class="lineno"> 5797</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ver;</div><div class="line"><a name="l05798"></a><span class="lineno"> 5798</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l05799"></a><span class="lineno"> 5799</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05800"></a><span class="lineno"> 5800</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &pTypeAttr);</div><div class="line"><a name="l05801"></a><span class="lineno"> 5801</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l05802"></a><span class="lineno"> 5802</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetTypeAttr"</span>);</div><div class="line"><a name="l05803"></a><span class="lineno"> 5803</span>  ver = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(pTypeAttr->wMinorVerNum);</div><div class="line"><a name="l05804"></a><span class="lineno"> 5804</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l05805"></a><span class="lineno"> 5805</span>  <span class="keywordflow">return</span> ver;</div><div class="line"><a name="l05806"></a><span class="lineno"> 5806</span> }</div><div class="line"><a name="l05807"></a><span class="lineno"> 5807</span> </div><div class="line"><a name="l05808"></a><span class="lineno"> 5808</span> <span class="comment">/*</span></div><div class="line"><a name="l05809"></a><span class="lineno"> 5809</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05810"></a><span class="lineno"> 5810</span> <span class="comment"> * WIN32OLE_TYPE#minor_version #=> OLE minor version</span></div><div class="line"><a name="l05811"></a><span class="lineno"> 5811</span> <span class="comment"> *</span></div><div class="line"><a name="l05812"></a><span class="lineno"> 5812</span> <span class="comment"> * Returns minor version.</span></div><div class="line"><a name="l05813"></a><span class="lineno"> 5813</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Word 10.0 Object Library', 'Documents')</span></div><div class="line"><a name="l05814"></a><span class="lineno"> 5814</span> <span class="comment"> * puts tobj.minor_version # => 2</span></div><div class="line"><a name="l05815"></a><span class="lineno"> 5815</span> <span class="comment"> */</span></div><div class="line"><a name="l05816"></a><span class="lineno"> 5816</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05817"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aad76daf1fd7ba9e72d79d2906bb41254"> 5817</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aad76daf1fd7ba9e72d79d2906bb41254">foletype_minor_version</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05818"></a><span class="lineno"> 5818</span> {</div><div class="line"><a name="l05819"></a><span class="lineno"> 5819</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05820"></a><span class="lineno"> 5820</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05821"></a><span class="lineno"> 5821</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac0c506b36e89c160b8d9bb7b5877a103">ole_type_minor_version</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05822"></a><span class="lineno"> 5822</span> }</div><div class="line"><a name="l05823"></a><span class="lineno"> 5823</span> </div><div class="line"><a name="l05824"></a><span class="lineno"> 5824</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05825"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a742e80085d039b7877e50611a81e9dda"> 5825</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a742e80085d039b7877e50611a81e9dda">ole_type_typekind</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l05826"></a><span class="lineno"> 5826</span> {</div><div class="line"><a name="l05827"></a><span class="lineno"> 5827</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typekind;</div><div class="line"><a name="l05828"></a><span class="lineno"> 5828</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l05829"></a><span class="lineno"> 5829</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05830"></a><span class="lineno"> 5830</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &pTypeAttr);</div><div class="line"><a name="l05831"></a><span class="lineno"> 5831</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l05832"></a><span class="lineno"> 5832</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetTypeAttr"</span>);</div><div class="line"><a name="l05833"></a><span class="lineno"> 5833</span>  typekind = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(pTypeAttr->typekind);</div><div class="line"><a name="l05834"></a><span class="lineno"> 5834</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l05835"></a><span class="lineno"> 5835</span>  <span class="keywordflow">return</span> typekind;</div><div class="line"><a name="l05836"></a><span class="lineno"> 5836</span> }</div><div class="line"><a name="l05837"></a><span class="lineno"> 5837</span> </div><div class="line"><a name="l05838"></a><span class="lineno"> 5838</span> <span class="comment">/*</span></div><div class="line"><a name="l05839"></a><span class="lineno"> 5839</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05840"></a><span class="lineno"> 5840</span> <span class="comment"> * WIN32OLE_TYPE#typekind #=> number of type.</span></div><div class="line"><a name="l05841"></a><span class="lineno"> 5841</span> <span class="comment"> *</span></div><div class="line"><a name="l05842"></a><span class="lineno"> 5842</span> <span class="comment"> * Returns number which represents type.</span></div><div class="line"><a name="l05843"></a><span class="lineno"> 5843</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Word 10.0 Object Library', 'Documents')</span></div><div class="line"><a name="l05844"></a><span class="lineno"> 5844</span> <span class="comment"> * puts tobj.typekind # => 4</span></div><div class="line"><a name="l05845"></a><span class="lineno"> 5845</span> <span class="comment"> *</span></div><div class="line"><a name="l05846"></a><span class="lineno"> 5846</span> <span class="comment"> */</span></div><div class="line"><a name="l05847"></a><span class="lineno"> 5847</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05848"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a8b4f3db715ec27ff1b90d5a594e17556"> 5848</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a8b4f3db715ec27ff1b90d5a594e17556">foletype_typekind</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05849"></a><span class="lineno"> 5849</span> {</div><div class="line"><a name="l05850"></a><span class="lineno"> 5850</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05851"></a><span class="lineno"> 5851</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05852"></a><span class="lineno"> 5852</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a742e80085d039b7877e50611a81e9dda">ole_type_typekind</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05853"></a><span class="lineno"> 5853</span> }</div><div class="line"><a name="l05854"></a><span class="lineno"> 5854</span> </div><div class="line"><a name="l05855"></a><span class="lineno"> 5855</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05856"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#acf83d71ee993025e217320481f0c146d"> 5856</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#acf83d71ee993025e217320481f0c146d">ole_type_helpstring</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l05857"></a><span class="lineno"> 5857</span> {</div><div class="line"><a name="l05858"></a><span class="lineno"> 5858</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05859"></a><span class="lineno"> 5859</span>  BSTR bhelpstr;</div><div class="line"><a name="l05860"></a><span class="lineno"> 5860</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#abb98c7449dc683552d93e0ab76a4d8ee">ole_docinfo_from_type</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &bhelpstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l05861"></a><span class="lineno"> 5861</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l05862"></a><span class="lineno"> 5862</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05863"></a><span class="lineno"> 5863</span>  }</div><div class="line"><a name="l05864"></a><span class="lineno"> 5864</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bhelpstr);</div><div class="line"><a name="l05865"></a><span class="lineno"> 5865</span> }</div><div class="line"><a name="l05866"></a><span class="lineno"> 5866</span> </div><div class="line"><a name="l05867"></a><span class="lineno"> 5867</span> <span class="comment">/*</span></div><div class="line"><a name="l05868"></a><span class="lineno"> 5868</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05869"></a><span class="lineno"> 5869</span> <span class="comment"> * WIN32OLE_TYPE#helpstring #=> help string.</span></div><div class="line"><a name="l05870"></a><span class="lineno"> 5870</span> <span class="comment"> *</span></div><div class="line"><a name="l05871"></a><span class="lineno"> 5871</span> <span class="comment"> * Returns help string.</span></div><div class="line"><a name="l05872"></a><span class="lineno"> 5872</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Internet Controls', 'IWebBrowser')</span></div><div class="line"><a name="l05873"></a><span class="lineno"> 5873</span> <span class="comment"> * puts tobj.helpstring # => Web Browser interface</span></div><div class="line"><a name="l05874"></a><span class="lineno"> 5874</span> <span class="comment"> */</span></div><div class="line"><a name="l05875"></a><span class="lineno"> 5875</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05876"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a536bbe39f587ff60fd0cee5db26dc333"> 5876</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a536bbe39f587ff60fd0cee5db26dc333">foletype_helpstring</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05877"></a><span class="lineno"> 5877</span> {</div><div class="line"><a name="l05878"></a><span class="lineno"> 5878</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05879"></a><span class="lineno"> 5879</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05880"></a><span class="lineno"> 5880</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acf83d71ee993025e217320481f0c146d">ole_type_helpstring</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05881"></a><span class="lineno"> 5881</span> }</div><div class="line"><a name="l05882"></a><span class="lineno"> 5882</span> </div><div class="line"><a name="l05883"></a><span class="lineno"> 5883</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05884"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa1d0781d2d7caceef543c9e4d584c614"> 5884</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa1d0781d2d7caceef543c9e4d584c614">ole_type_src_type</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l05885"></a><span class="lineno"> 5885</span> {</div><div class="line"><a name="l05886"></a><span class="lineno"> 5886</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05887"></a><span class="lineno"> 5887</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l05888"></a><span class="lineno"> 5888</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#aae877041546563a319dff9e25bc3aaf7">alias</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05889"></a><span class="lineno"> 5889</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &pTypeAttr);</div><div class="line"><a name="l05890"></a><span class="lineno"> 5890</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l05891"></a><span class="lineno"> 5891</span>  <span class="keywordflow">return</span> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#aae877041546563a319dff9e25bc3aaf7">alias</a>;</div><div class="line"><a name="l05892"></a><span class="lineno"> 5892</span>  <span class="keywordflow">if</span>(pTypeAttr->typekind != TKIND_ALIAS) {</div><div class="line"><a name="l05893"></a><span class="lineno"> 5893</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l05894"></a><span class="lineno"> 5894</span>  <span class="keywordflow">return</span> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#aae877041546563a319dff9e25bc3aaf7">alias</a>;</div><div class="line"><a name="l05895"></a><span class="lineno"> 5895</span>  }</div><div class="line"><a name="l05896"></a><span class="lineno"> 5896</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#aae877041546563a319dff9e25bc3aaf7">alias</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &(pTypeAttr->tdescAlias), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>);</div><div class="line"><a name="l05897"></a><span class="lineno"> 5897</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l05898"></a><span class="lineno"> 5898</span>  <span class="keywordflow">return</span> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#aae877041546563a319dff9e25bc3aaf7">alias</a>;</div><div class="line"><a name="l05899"></a><span class="lineno"> 5899</span> }</div><div class="line"><a name="l05900"></a><span class="lineno"> 5900</span> </div><div class="line"><a name="l05901"></a><span class="lineno"> 5901</span> <span class="comment">/*</span></div><div class="line"><a name="l05902"></a><span class="lineno"> 5902</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05903"></a><span class="lineno"> 5903</span> <span class="comment"> * WIN32OLE_TYPE#src_type #=> OLE source class</span></div><div class="line"><a name="l05904"></a><span class="lineno"> 5904</span> <span class="comment"> *</span></div><div class="line"><a name="l05905"></a><span class="lineno"> 5905</span> <span class="comment"> * Returns source class when the OLE class is 'Alias'.</span></div><div class="line"><a name="l05906"></a><span class="lineno"> 5906</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Office 9.0 Object Library', 'MsoRGBType')</span></div><div class="line"><a name="l05907"></a><span class="lineno"> 5907</span> <span class="comment"> * puts tobj.src_type # => I4</span></div><div class="line"><a name="l05908"></a><span class="lineno"> 5908</span> <span class="comment"> *</span></div><div class="line"><a name="l05909"></a><span class="lineno"> 5909</span> <span class="comment"> */</span></div><div class="line"><a name="l05910"></a><span class="lineno"> 5910</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05911"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1a24f6def4ff0e89e8f3884381b49be2"> 5911</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1a24f6def4ff0e89e8f3884381b49be2">foletype_src_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05912"></a><span class="lineno"> 5912</span> {</div><div class="line"><a name="l05913"></a><span class="lineno"> 5913</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05914"></a><span class="lineno"> 5914</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05915"></a><span class="lineno"> 5915</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa1d0781d2d7caceef543c9e4d584c614">ole_type_src_type</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05916"></a><span class="lineno"> 5916</span> }</div><div class="line"><a name="l05917"></a><span class="lineno"> 5917</span> </div><div class="line"><a name="l05918"></a><span class="lineno"> 5918</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05919"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1aa2ee3a59a0ec370676af5858be7215"> 5919</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1aa2ee3a59a0ec370676af5858be7215">ole_type_helpfile</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l05920"></a><span class="lineno"> 5920</span> {</div><div class="line"><a name="l05921"></a><span class="lineno"> 5921</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05922"></a><span class="lineno"> 5922</span>  BSTR bhelpfile;</div><div class="line"><a name="l05923"></a><span class="lineno"> 5923</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#abb98c7449dc683552d93e0ab76a4d8ee">ole_docinfo_from_type</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &bhelpfile);</div><div class="line"><a name="l05924"></a><span class="lineno"> 5924</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l05925"></a><span class="lineno"> 5925</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05926"></a><span class="lineno"> 5926</span>  }</div><div class="line"><a name="l05927"></a><span class="lineno"> 5927</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bhelpfile);</div><div class="line"><a name="l05928"></a><span class="lineno"> 5928</span> }</div><div class="line"><a name="l05929"></a><span class="lineno"> 5929</span> </div><div class="line"><a name="l05930"></a><span class="lineno"> 5930</span> <span class="comment">/*</span></div><div class="line"><a name="l05931"></a><span class="lineno"> 5931</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05932"></a><span class="lineno"> 5932</span> <span class="comment"> * WIN32OLE_TYPE#helpfile</span></div><div class="line"><a name="l05933"></a><span class="lineno"> 5933</span> <span class="comment"> *</span></div><div class="line"><a name="l05934"></a><span class="lineno"> 5934</span> <span class="comment"> * Returns helpfile path. If helpfile is not found, then returns nil.</span></div><div class="line"><a name="l05935"></a><span class="lineno"> 5935</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Worksheet')</span></div><div class="line"><a name="l05936"></a><span class="lineno"> 5936</span> <span class="comment"> * puts tobj.helpfile # => C:\...\VBAXL9.CHM</span></div><div class="line"><a name="l05937"></a><span class="lineno"> 5937</span> <span class="comment"> *</span></div><div class="line"><a name="l05938"></a><span class="lineno"> 5938</span> <span class="comment"> */</span></div><div class="line"><a name="l05939"></a><span class="lineno"> 5939</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05940"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a0f560d82cf2e4604437fc3bb7280cec3"> 5940</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a0f560d82cf2e4604437fc3bb7280cec3">foletype_helpfile</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05941"></a><span class="lineno"> 5941</span> {</div><div class="line"><a name="l05942"></a><span class="lineno"> 5942</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05943"></a><span class="lineno"> 5943</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05944"></a><span class="lineno"> 5944</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1aa2ee3a59a0ec370676af5858be7215">ole_type_helpfile</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05945"></a><span class="lineno"> 5945</span> }</div><div class="line"><a name="l05946"></a><span class="lineno"> 5946</span> </div><div class="line"><a name="l05947"></a><span class="lineno"> 5947</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05948"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6ea161e7d9af7836343b5fc9078e45d4"> 5948</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6ea161e7d9af7836343b5fc9078e45d4">ole_type_helpcontext</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l05949"></a><span class="lineno"> 5949</span> {</div><div class="line"><a name="l05950"></a><span class="lineno"> 5950</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05951"></a><span class="lineno"> 5951</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> helpcontext;</div><div class="line"><a name="l05952"></a><span class="lineno"> 5952</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#abb98c7449dc683552d93e0ab76a4d8ee">ole_docinfo_from_type</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>,</div><div class="line"><a name="l05953"></a><span class="lineno"> 5953</span>  &helpcontext, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l05954"></a><span class="lineno"> 5954</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l05955"></a><span class="lineno"> 5955</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l05956"></a><span class="lineno"> 5956</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(helpcontext);</div><div class="line"><a name="l05957"></a><span class="lineno"> 5957</span> }</div><div class="line"><a name="l05958"></a><span class="lineno"> 5958</span> </div><div class="line"><a name="l05959"></a><span class="lineno"> 5959</span> <span class="comment">/*</span></div><div class="line"><a name="l05960"></a><span class="lineno"> 5960</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05961"></a><span class="lineno"> 5961</span> <span class="comment"> * WIN32OLE_TYPE#helpcontext</span></div><div class="line"><a name="l05962"></a><span class="lineno"> 5962</span> <span class="comment"> *</span></div><div class="line"><a name="l05963"></a><span class="lineno"> 5963</span> <span class="comment"> * Returns helpcontext. If helpcontext is not found, then returns nil.</span></div><div class="line"><a name="l05964"></a><span class="lineno"> 5964</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Worksheet')</span></div><div class="line"><a name="l05965"></a><span class="lineno"> 5965</span> <span class="comment"> * puts tobj.helpfile # => 131185</span></div><div class="line"><a name="l05966"></a><span class="lineno"> 5966</span> <span class="comment"> */</span></div><div class="line"><a name="l05967"></a><span class="lineno"> 5967</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05968"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a17402178059917f6dd6803ee73df6426"> 5968</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a17402178059917f6dd6803ee73df6426">foletype_helpcontext</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05969"></a><span class="lineno"> 5969</span> {</div><div class="line"><a name="l05970"></a><span class="lineno"> 5970</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05971"></a><span class="lineno"> 5971</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05972"></a><span class="lineno"> 5972</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6ea161e7d9af7836343b5fc9078e45d4">ole_type_helpcontext</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05973"></a><span class="lineno"> 5973</span> }</div><div class="line"><a name="l05974"></a><span class="lineno"> 5974</span> </div><div class="line"><a name="l05975"></a><span class="lineno"> 5975</span> <span class="comment">/*</span></div><div class="line"><a name="l05976"></a><span class="lineno"> 5976</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l05977"></a><span class="lineno"> 5977</span> <span class="comment"> * WIN32OLE_TYPE#ole_typelib</span></div><div class="line"><a name="l05978"></a><span class="lineno"> 5978</span> <span class="comment"> *</span></div><div class="line"><a name="l05979"></a><span class="lineno"> 5979</span> <span class="comment"> * Returns the WIN32OLE_TYPELIB object which is including the WIN32OLE_TYPE</span></div><div class="line"><a name="l05980"></a><span class="lineno"> 5980</span> <span class="comment"> * object. If it is not found, then returns nil.</span></div><div class="line"><a name="l05981"></a><span class="lineno"> 5981</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Worksheet')</span></div><div class="line"><a name="l05982"></a><span class="lineno"> 5982</span> <span class="comment"> * puts tobj.ole_typelib # => 'Microsoft Excel 9.0 Object Library'</span></div><div class="line"><a name="l05983"></a><span class="lineno"> 5983</span> <span class="comment"> */</span></div><div class="line"><a name="l05984"></a><span class="lineno"> 5984</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05985"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae383fe3eb9655495e30cac84b29e6168"> 5985</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ae383fe3eb9655495e30cac84b29e6168">foletype_ole_typelib</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l05986"></a><span class="lineno"> 5986</span> {</div><div class="line"><a name="l05987"></a><span class="lineno"> 5987</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l05988"></a><span class="lineno"> 5988</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l05989"></a><span class="lineno"> 5989</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a06b2abe1d4bcdc1f68258fff57e08f68">ole_typelib_from_itypeinfo</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l05990"></a><span class="lineno"> 5990</span> }</div><div class="line"><a name="l05991"></a><span class="lineno"> 5991</span> </div><div class="line"><a name="l05992"></a><span class="lineno"> 5992</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l05993"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a029768b0134384136ccb8fec098031a7"> 5993</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a029768b0134384136ccb8fec098031a7">ole_type_impl_ole_types</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, <span class="keywordtype">int</span> implflags)</div><div class="line"><a name="l05994"></a><span class="lineno"> 5994</span> {</div><div class="line"><a name="l05995"></a><span class="lineno"> 5995</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l05996"></a><span class="lineno"> 5996</span>  ITypeInfo *pRefTypeInfo;</div><div class="line"><a name="l05997"></a><span class="lineno"> 5997</span>  HREFTYPE href;</div><div class="line"><a name="l05998"></a><span class="lineno"> 5998</span>  WORD <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l05999"></a><span class="lineno"> 5999</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l06000"></a><span class="lineno"> 6000</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l06001"></a><span class="lineno"> 6001</span>  <span class="keywordtype">int</span> flags;</div><div class="line"><a name="l06002"></a><span class="lineno"> 6002</span> </div><div class="line"><a name="l06003"></a><span class="lineno"> 6003</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> types = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l06004"></a><span class="lineno"> 6004</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &pTypeAttr);</div><div class="line"><a name="l06005"></a><span class="lineno"> 6005</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l06006"></a><span class="lineno"> 6006</span>  <span class="keywordflow">return</span> types;</div><div class="line"><a name="l06007"></a><span class="lineno"> 6007</span>  }</div><div class="line"><a name="l06008"></a><span class="lineno"> 6008</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < pTypeAttr->cImplTypes; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l06009"></a><span class="lineno"> 6009</span>  hr = <a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>->lpVtbl->GetImplTypeFlags(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &flags);</div><div class="line"><a name="l06010"></a><span class="lineno"> 6010</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06011"></a><span class="lineno"> 6011</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l06012"></a><span class="lineno"> 6012</span> </div><div class="line"><a name="l06013"></a><span class="lineno"> 6013</span>  hr = <a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>->lpVtbl->GetRefTypeOfImplType(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &href);</div><div class="line"><a name="l06014"></a><span class="lineno"> 6014</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06015"></a><span class="lineno"> 6015</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l06016"></a><span class="lineno"> 6016</span>  hr = <a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>->lpVtbl->GetRefTypeInfo(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, href, &pRefTypeInfo);</div><div class="line"><a name="l06017"></a><span class="lineno"> 6017</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06018"></a><span class="lineno"> 6018</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l06019"></a><span class="lineno"> 6019</span> </div><div class="line"><a name="l06020"></a><span class="lineno"> 6020</span>  <span class="keywordflow">if</span> ((flags & implflags) == implflags) {</div><div class="line"><a name="l06021"></a><span class="lineno"> 6021</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a5e12333be1ac8271835f370a58abb6b2">ole_type_from_itypeinfo</a>(pRefTypeInfo);</div><div class="line"><a name="l06022"></a><span class="lineno"> 6022</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l06023"></a><span class="lineno"> 6023</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(types, <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>);</div><div class="line"><a name="l06024"></a><span class="lineno"> 6024</span>  }</div><div class="line"><a name="l06025"></a><span class="lineno"> 6025</span>  }</div><div class="line"><a name="l06026"></a><span class="lineno"> 6026</span> </div><div class="line"><a name="l06027"></a><span class="lineno"> 6027</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pRefTypeInfo);</div><div class="line"><a name="l06028"></a><span class="lineno"> 6028</span>  }</div><div class="line"><a name="l06029"></a><span class="lineno"> 6029</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l06030"></a><span class="lineno"> 6030</span>  <span class="keywordflow">return</span> types;</div><div class="line"><a name="l06031"></a><span class="lineno"> 6031</span> }</div><div class="line"><a name="l06032"></a><span class="lineno"> 6032</span> </div><div class="line"><a name="l06033"></a><span class="lineno"> 6033</span> <span class="comment">/*</span></div><div class="line"><a name="l06034"></a><span class="lineno"> 6034</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06035"></a><span class="lineno"> 6035</span> <span class="comment"> * WIN32OLE_TYPE#implemented_ole_types</span></div><div class="line"><a name="l06036"></a><span class="lineno"> 6036</span> <span class="comment"> *</span></div><div class="line"><a name="l06037"></a><span class="lineno"> 6037</span> <span class="comment"> * Returns the array of WIN32OLE_TYPE object which is implemented by the WIN32OLE_TYPE</span></div><div class="line"><a name="l06038"></a><span class="lineno"> 6038</span> <span class="comment"> * object.</span></div><div class="line"><a name="l06039"></a><span class="lineno"> 6039</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Worksheet')</span></div><div class="line"><a name="l06040"></a><span class="lineno"> 6040</span> <span class="comment"> * p tobj.implemented_ole_types # => [_Worksheet, DocEvents]</span></div><div class="line"><a name="l06041"></a><span class="lineno"> 6041</span> <span class="comment"> */</span></div><div class="line"><a name="l06042"></a><span class="lineno"> 6042</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06043"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad0f95a9f48f7af93146a71963663ec1d"> 6043</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad0f95a9f48f7af93146a71963663ec1d">foletype_impl_ole_types</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06044"></a><span class="lineno"> 6044</span> {</div><div class="line"><a name="l06045"></a><span class="lineno"> 6045</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l06046"></a><span class="lineno"> 6046</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l06047"></a><span class="lineno"> 6047</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a029768b0134384136ccb8fec098031a7">ole_type_impl_ole_types</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, 0);</div><div class="line"><a name="l06048"></a><span class="lineno"> 6048</span> }</div><div class="line"><a name="l06049"></a><span class="lineno"> 6049</span> </div><div class="line"><a name="l06050"></a><span class="lineno"> 6050</span> <span class="comment">/*</span></div><div class="line"><a name="l06051"></a><span class="lineno"> 6051</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06052"></a><span class="lineno"> 6052</span> <span class="comment"> * WIN32OLE_TYPE#source_ole_types</span></div><div class="line"><a name="l06053"></a><span class="lineno"> 6053</span> <span class="comment"> *</span></div><div class="line"><a name="l06054"></a><span class="lineno"> 6054</span> <span class="comment"> * Returns the array of WIN32OLE_TYPE object which is implemented by the WIN32OLE_TYPE</span></div><div class="line"><a name="l06055"></a><span class="lineno"> 6055</span> <span class="comment"> * object and having IMPLTYPEFLAG_FSOURCE.</span></div><div class="line"><a name="l06056"></a><span class="lineno"> 6056</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Internet Controls', "InternetExplorer")</span></div><div class="line"><a name="l06057"></a><span class="lineno"> 6057</span> <span class="comment"> * p tobj.source_ole_types</span></div><div class="line"><a name="l06058"></a><span class="lineno"> 6058</span> <span class="comment"> * # => [#<WIN32OLE_TYPE:DWebBrowserEvents2>, #<WIN32OLE_TYPE:DWebBrowserEvents>]</span></div><div class="line"><a name="l06059"></a><span class="lineno"> 6059</span> <span class="comment"> */</span></div><div class="line"><a name="l06060"></a><span class="lineno"> 6060</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06061"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6a2bfa6c8da64466fb5babc49837e561"> 6061</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6a2bfa6c8da64466fb5babc49837e561">foletype_source_ole_types</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06062"></a><span class="lineno"> 6062</span> {</div><div class="line"><a name="l06063"></a><span class="lineno"> 6063</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l06064"></a><span class="lineno"> 6064</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l06065"></a><span class="lineno"> 6065</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a029768b0134384136ccb8fec098031a7">ole_type_impl_ole_types</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, IMPLTYPEFLAG_FSOURCE);</div><div class="line"><a name="l06066"></a><span class="lineno"> 6066</span> }</div><div class="line"><a name="l06067"></a><span class="lineno"> 6067</span> </div><div class="line"><a name="l06068"></a><span class="lineno"> 6068</span> <span class="comment">/*</span></div><div class="line"><a name="l06069"></a><span class="lineno"> 6069</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06070"></a><span class="lineno"> 6070</span> <span class="comment"> * WIN32OLE_TYPE#default_event_sources</span></div><div class="line"><a name="l06071"></a><span class="lineno"> 6071</span> <span class="comment"> *</span></div><div class="line"><a name="l06072"></a><span class="lineno"> 6072</span> <span class="comment"> * Returns the array of WIN32OLE_TYPE object which is implemented by the WIN32OLE_TYPE</span></div><div class="line"><a name="l06073"></a><span class="lineno"> 6073</span> <span class="comment"> * object and having IMPLTYPEFLAG_FSOURCE and IMPLTYPEFLAG_FDEFAULT.</span></div><div class="line"><a name="l06074"></a><span class="lineno"> 6074</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Internet Controls', "InternetExplorer")</span></div><div class="line"><a name="l06075"></a><span class="lineno"> 6075</span> <span class="comment"> * p tobj.default_event_sources # => [#<WIN32OLE_TYPE:DWebBrowserEvents2>]</span></div><div class="line"><a name="l06076"></a><span class="lineno"> 6076</span> <span class="comment"> */</span></div><div class="line"><a name="l06077"></a><span class="lineno"> 6077</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06078"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2ea06a0d884fd9971f1540791dadb03a"> 6078</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2ea06a0d884fd9971f1540791dadb03a">foletype_default_event_sources</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06079"></a><span class="lineno"> 6079</span> {</div><div class="line"><a name="l06080"></a><span class="lineno"> 6080</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l06081"></a><span class="lineno"> 6081</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l06082"></a><span class="lineno"> 6082</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a029768b0134384136ccb8fec098031a7">ole_type_impl_ole_types</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, IMPLTYPEFLAG_FSOURCE|IMPLTYPEFLAG_FDEFAULT);</div><div class="line"><a name="l06083"></a><span class="lineno"> 6083</span> }</div><div class="line"><a name="l06084"></a><span class="lineno"> 6084</span> </div><div class="line"><a name="l06085"></a><span class="lineno"> 6085</span> <span class="comment">/*</span></div><div class="line"><a name="l06086"></a><span class="lineno"> 6086</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06087"></a><span class="lineno"> 6087</span> <span class="comment"> * WIN32OLE_TYPE#default_ole_types</span></div><div class="line"><a name="l06088"></a><span class="lineno"> 6088</span> <span class="comment"> *</span></div><div class="line"><a name="l06089"></a><span class="lineno"> 6089</span> <span class="comment"> * Returns the array of WIN32OLE_TYPE object which is implemented by the WIN32OLE_TYPE</span></div><div class="line"><a name="l06090"></a><span class="lineno"> 6090</span> <span class="comment"> * object and having IMPLTYPEFLAG_FDEFAULT.</span></div><div class="line"><a name="l06091"></a><span class="lineno"> 6091</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Internet Controls', "InternetExplorer")</span></div><div class="line"><a name="l06092"></a><span class="lineno"> 6092</span> <span class="comment"> * p tobj.default_ole_types</span></div><div class="line"><a name="l06093"></a><span class="lineno"> 6093</span> <span class="comment"> * # => [#<WIN32OLE_TYPE:IWebBrowser2>, #<WIN32OLE_TYPE:DWebBrowserEvents2>]</span></div><div class="line"><a name="l06094"></a><span class="lineno"> 6094</span> <span class="comment"> */</span></div><div class="line"><a name="l06095"></a><span class="lineno"> 6095</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06096"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1aa9cb27ad3f5c039b159d04221c2730"> 6096</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1aa9cb27ad3f5c039b159d04221c2730">foletype_default_ole_types</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06097"></a><span class="lineno"> 6097</span> {</div><div class="line"><a name="l06098"></a><span class="lineno"> 6098</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l06099"></a><span class="lineno"> 6099</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l06100"></a><span class="lineno"> 6100</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a029768b0134384136ccb8fec098031a7">ole_type_impl_ole_types</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, IMPLTYPEFLAG_FDEFAULT);</div><div class="line"><a name="l06101"></a><span class="lineno"> 6101</span> }</div><div class="line"><a name="l06102"></a><span class="lineno"> 6102</span> </div><div class="line"><a name="l06103"></a><span class="lineno"> 6103</span> <span class="comment">/*</span></div><div class="line"><a name="l06104"></a><span class="lineno"> 6104</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06105"></a><span class="lineno"> 6105</span> <span class="comment"> * WIN32OLE_TYPE#inspect -> String</span></div><div class="line"><a name="l06106"></a><span class="lineno"> 6106</span> <span class="comment"> *</span></div><div class="line"><a name="l06107"></a><span class="lineno"> 6107</span> <span class="comment"> * Returns the type name with class name.</span></div><div class="line"><a name="l06108"></a><span class="lineno"> 6108</span> <span class="comment"> *</span></div><div class="line"><a name="l06109"></a><span class="lineno"> 6109</span> <span class="comment"> * ie = WIN32OLE.new('InternetExplorer.Application')</span></div><div class="line"><a name="l06110"></a><span class="lineno"> 6110</span> <span class="comment"> * ie.ole_type.inspect => #<WIN32OLE_TYPE:IWebBrowser2></span></div><div class="line"><a name="l06111"></a><span class="lineno"> 6111</span> <span class="comment"> */</span></div><div class="line"><a name="l06112"></a><span class="lineno"> 6112</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06113"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a865684be9919637fc636e618fcfc34c0"> 6113</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a865684be9919637fc636e618fcfc34c0">foletype_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06114"></a><span class="lineno"> 6114</span> {</div><div class="line"><a name="l06115"></a><span class="lineno"> 6115</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1da595a8d1f22377435d6bd4fa5150d1">default_inspect</a>(<span class="keyword">self</span>, <span class="stringliteral">"WIN32OLE_TYPE"</span>);</div><div class="line"><a name="l06116"></a><span class="lineno"> 6116</span> }</div><div class="line"><a name="l06117"></a><span class="lineno"> 6117</span> </div><div class="line"><a name="l06118"></a><span class="lineno"> 6118</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06119"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7262dc332f64e74ef33ab4f1c804f6d6"> 6119</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7262dc332f64e74ef33ab4f1c804f6d6">ole_variables</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>)</div><div class="line"><a name="l06120"></a><span class="lineno"> 6120</span> {</div><div class="line"><a name="l06121"></a><span class="lineno"> 6121</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06122"></a><span class="lineno"> 6122</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l06123"></a><span class="lineno"> 6123</span>  WORD <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l06124"></a><span class="lineno"> 6124</span>  UINT len;</div><div class="line"><a name="l06125"></a><span class="lineno"> 6125</span>  BSTR bstr;</div><div class="line"><a name="l06126"></a><span class="lineno"> 6126</span>  VARDESC *pVarDesc;</div><div class="line"><a name="l06127"></a><span class="lineno"> 6127</span>  <span class="keyword">struct </span><a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a> *pvar;</div><div class="line"><a name="l06128"></a><span class="lineno"> 6128</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> var;</div><div class="line"><a name="l06129"></a><span class="lineno"> 6129</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> variables = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l06130"></a><span class="lineno"> 6130</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, &pTypeAttr);</div><div class="line"><a name="l06131"></a><span class="lineno"> 6131</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l06132"></a><span class="lineno"> 6132</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetTypeAttr"</span>);</div><div class="line"><a name="l06133"></a><span class="lineno"> 6133</span>  }</div><div class="line"><a name="l06134"></a><span class="lineno"> 6134</span> </div><div class="line"><a name="l06135"></a><span class="lineno"> 6135</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < pTypeAttr->cVars; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l06136"></a><span class="lineno"> 6136</span>  hr = <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->GetVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &pVarDesc);</div><div class="line"><a name="l06137"></a><span class="lineno"> 6137</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l06138"></a><span class="lineno"> 6138</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l06139"></a><span class="lineno"> 6139</span>  len = 0;</div><div class="line"><a name="l06140"></a><span class="lineno"> 6140</span>  hr = <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->GetNames(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pVarDesc->memid, &bstr,</div><div class="line"><a name="l06141"></a><span class="lineno"> 6141</span>  1, &len);</div><div class="line"><a name="l06142"></a><span class="lineno"> 6142</span>  <span class="keywordflow">if</span>(FAILED(hr) || len == 0 || !bstr)</div><div class="line"><a name="l06143"></a><span class="lineno"> 6143</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l06144"></a><span class="lineno"> 6144</span> </div><div class="line"><a name="l06145"></a><span class="lineno"> 6145</span>  var = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad80ce51081780f829134de0338821b76">Data_Make_Struct</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>, <span class="keyword">struct</span> <a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a>,</div><div class="line"><a name="l06146"></a><span class="lineno"> 6146</span>  0,<a class="code" href="../../d2/d99/win32ole_8c.html#aae0f4a590a5c1279929e891188052399">olevariable_free</a>,pvar);</div><div class="line"><a name="l06147"></a><span class="lineno"> 6147</span>  pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a> = <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>;</div><div class="line"><a name="l06148"></a><span class="lineno"> 6148</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5">OLE_ADDREF</a>(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>);</div><div class="line"><a name="l06149"></a><span class="lineno"> 6149</span>  pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be">index</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l06150"></a><span class="lineno"> 6150</span>  <a class="code" href="../../db/d2e/intern_8h.html#acee88ad0375c8a9080e2283db494d257">rb_ivar_set</a>(var, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>), <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr));</div><div class="line"><a name="l06151"></a><span class="lineno"> 6151</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(variables, var);</div><div class="line"><a name="l06152"></a><span class="lineno"> 6152</span> </div><div class="line"><a name="l06153"></a><span class="lineno"> 6153</span>  <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->ReleaseVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pVarDesc);</div><div class="line"><a name="l06154"></a><span class="lineno"> 6154</span>  pVarDesc = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l06155"></a><span class="lineno"> 6155</span>  }</div><div class="line"><a name="l06156"></a><span class="lineno"> 6156</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l06157"></a><span class="lineno"> 6157</span>  <span class="keywordflow">return</span> variables;</div><div class="line"><a name="l06158"></a><span class="lineno"> 6158</span> }</div><div class="line"><a name="l06159"></a><span class="lineno"> 6159</span> </div><div class="line"><a name="l06160"></a><span class="lineno"> 6160</span> <span class="comment">/*</span></div><div class="line"><a name="l06161"></a><span class="lineno"> 6161</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06162"></a><span class="lineno"> 6162</span> <span class="comment"> * WIN32OLE_TYPE#variables</span></div><div class="line"><a name="l06163"></a><span class="lineno"> 6163</span> <span class="comment"> *</span></div><div class="line"><a name="l06164"></a><span class="lineno"> 6164</span> <span class="comment"> * Returns array of WIN32OLE_VARIABLE objects which represent variables</span></div><div class="line"><a name="l06165"></a><span class="lineno"> 6165</span> <span class="comment"> * defined in OLE class.</span></div><div class="line"><a name="l06166"></a><span class="lineno"> 6166</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'XlSheetType')</span></div><div class="line"><a name="l06167"></a><span class="lineno"> 6167</span> <span class="comment"> * vars = tobj.variables</span></div><div class="line"><a name="l06168"></a><span class="lineno"> 6168</span> <span class="comment"> * vars.each do |v|</span></div><div class="line"><a name="l06169"></a><span class="lineno"> 6169</span> <span class="comment"> * puts "#{v.name} = #{v.value}"</span></div><div class="line"><a name="l06170"></a><span class="lineno"> 6170</span> <span class="comment"> * end</span></div><div class="line"><a name="l06171"></a><span class="lineno"> 6171</span> <span class="comment"> *</span></div><div class="line"><a name="l06172"></a><span class="lineno"> 6172</span> <span class="comment"> * The result of above sample script is follows:</span></div><div class="line"><a name="l06173"></a><span class="lineno"> 6173</span> <span class="comment"> * xlChart = -4109</span></div><div class="line"><a name="l06174"></a><span class="lineno"> 6174</span> <span class="comment"> * xlDialogSheet = -4116</span></div><div class="line"><a name="l06175"></a><span class="lineno"> 6175</span> <span class="comment"> * xlExcel4IntlMacroSheet = 4</span></div><div class="line"><a name="l06176"></a><span class="lineno"> 6176</span> <span class="comment"> * xlExcel4MacroSheet = 3</span></div><div class="line"><a name="l06177"></a><span class="lineno"> 6177</span> <span class="comment"> * xlWorksheet = -4167</span></div><div class="line"><a name="l06178"></a><span class="lineno"> 6178</span> <span class="comment"> *</span></div><div class="line"><a name="l06179"></a><span class="lineno"> 6179</span> <span class="comment"> */</span></div><div class="line"><a name="l06180"></a><span class="lineno"> 6180</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06181"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7601c0e4082bdf69b36e4b712c71d849"> 6181</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7601c0e4082bdf69b36e4b712c71d849">foletype_variables</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06182"></a><span class="lineno"> 6182</span> {</div><div class="line"><a name="l06183"></a><span class="lineno"> 6183</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l06184"></a><span class="lineno"> 6184</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l06185"></a><span class="lineno"> 6185</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7262dc332f64e74ef33ab4f1c804f6d6">ole_variables</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>);</div><div class="line"><a name="l06186"></a><span class="lineno"> 6186</span> }</div><div class="line"><a name="l06187"></a><span class="lineno"> 6187</span> </div><div class="line"><a name="l06188"></a><span class="lineno"> 6188</span> <span class="comment">/*</span></div><div class="line"><a name="l06189"></a><span class="lineno"> 6189</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06190"></a><span class="lineno"> 6190</span> <span class="comment"> * WIN32OLE_TYPE#ole_methods # the array of WIN32OLE_METHOD objects.</span></div><div class="line"><a name="l06191"></a><span class="lineno"> 6191</span> <span class="comment"> *</span></div><div class="line"><a name="l06192"></a><span class="lineno"> 6192</span> <span class="comment"> * Returns array of WIN32OLE_METHOD objects which represent OLE method defined in</span></div><div class="line"><a name="l06193"></a><span class="lineno"> 6193</span> <span class="comment"> * OLE type library.</span></div><div class="line"><a name="l06194"></a><span class="lineno"> 6194</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Worksheet')</span></div><div class="line"><a name="l06195"></a><span class="lineno"> 6195</span> <span class="comment"> * methods = tobj.ole_methods.collect{|m|</span></div><div class="line"><a name="l06196"></a><span class="lineno"> 6196</span> <span class="comment"> * m.name</span></div><div class="line"><a name="l06197"></a><span class="lineno"> 6197</span> <span class="comment"> * }</span></div><div class="line"><a name="l06198"></a><span class="lineno"> 6198</span> <span class="comment"> * # => ['Activate', 'Copy', 'Delete',....]</span></div><div class="line"><a name="l06199"></a><span class="lineno"> 6199</span> <span class="comment"> */</span></div><div class="line"><a name="l06200"></a><span class="lineno"> 6200</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06201"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a80ab193b9c367a2c3582c7b8513d0ccf"> 6201</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a80ab193b9c367a2c3582c7b8513d0ccf">foletype_methods</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06202"></a><span class="lineno"> 6202</span> {</div><div class="line"><a name="l06203"></a><span class="lineno"> 6203</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l06204"></a><span class="lineno"> 6204</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l06205"></a><span class="lineno"> 6205</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aad5717d16ab405a0b4b7d3211ff72527">ole_methods_from_typeinfo</a>(ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, INVOKE_FUNC | INVOKE_PROPERTYGET | INVOKE_PROPERTYPUT | INVOKE_PROPERTYPUTREF);</div><div class="line"><a name="l06206"></a><span class="lineno"> 6206</span> }</div><div class="line"><a name="l06207"></a><span class="lineno"> 6207</span> </div><div class="line"><a name="l06208"></a><span class="lineno"> 6208</span> <span class="comment">/*</span></div><div class="line"><a name="l06209"></a><span class="lineno"> 6209</span> <span class="comment"> * Document-class: WIN32OLE_VARIABLE</span></div><div class="line"><a name="l06210"></a><span class="lineno"> 6210</span> <span class="comment"> *</span></div><div class="line"><a name="l06211"></a><span class="lineno"> 6211</span> <span class="comment"> * <code>WIN32OLE_VARIABLE</code> objects represent OLE variable information.</span></div><div class="line"><a name="l06212"></a><span class="lineno"> 6212</span> <span class="comment"> */</span></div><div class="line"><a name="l06213"></a><span class="lineno"> 6213</span> </div><div class="line"><a name="l06214"></a><span class="lineno"> 6214</span> <span class="comment">/*</span></div><div class="line"><a name="l06215"></a><span class="lineno"> 6215</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06216"></a><span class="lineno"> 6216</span> <span class="comment"> * WIN32OLE_VARIABLE#name</span></div><div class="line"><a name="l06217"></a><span class="lineno"> 6217</span> <span class="comment"> *</span></div><div class="line"><a name="l06218"></a><span class="lineno"> 6218</span> <span class="comment"> * Returns the name of variable.</span></div><div class="line"><a name="l06219"></a><span class="lineno"> 6219</span> <span class="comment"> *</span></div><div class="line"><a name="l06220"></a><span class="lineno"> 6220</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'XlSheetType')</span></div><div class="line"><a name="l06221"></a><span class="lineno"> 6221</span> <span class="comment"> * variables = tobj.variables</span></div><div class="line"><a name="l06222"></a><span class="lineno"> 6222</span> <span class="comment"> * variables.each do |variable|</span></div><div class="line"><a name="l06223"></a><span class="lineno"> 6223</span> <span class="comment"> * puts "#{variable.name}"</span></div><div class="line"><a name="l06224"></a><span class="lineno"> 6224</span> <span class="comment"> * end</span></div><div class="line"><a name="l06225"></a><span class="lineno"> 6225</span> <span class="comment"> *</span></div><div class="line"><a name="l06226"></a><span class="lineno"> 6226</span> <span class="comment"> * The result of above script is following:</span></div><div class="line"><a name="l06227"></a><span class="lineno"> 6227</span> <span class="comment"> * xlChart</span></div><div class="line"><a name="l06228"></a><span class="lineno"> 6228</span> <span class="comment"> * xlDialogSheet</span></div><div class="line"><a name="l06229"></a><span class="lineno"> 6229</span> <span class="comment"> * xlExcel4IntlMacroSheet</span></div><div class="line"><a name="l06230"></a><span class="lineno"> 6230</span> <span class="comment"> * xlExcel4MacroSheet</span></div><div class="line"><a name="l06231"></a><span class="lineno"> 6231</span> <span class="comment"> * xlWorksheet</span></div><div class="line"><a name="l06232"></a><span class="lineno"> 6232</span> <span class="comment"> *</span></div><div class="line"><a name="l06233"></a><span class="lineno"> 6233</span> <span class="comment"> */</span></div><div class="line"><a name="l06234"></a><span class="lineno"> 6234</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06235"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2e6e042a244e5434dd410a469ed351c9"> 6235</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2e6e042a244e5434dd410a469ed351c9">folevariable_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06236"></a><span class="lineno"> 6236</span> {</div><div class="line"><a name="l06237"></a><span class="lineno"> 6237</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>));</div><div class="line"><a name="l06238"></a><span class="lineno"> 6238</span> }</div><div class="line"><a name="l06239"></a><span class="lineno"> 6239</span> </div><div class="line"><a name="l06240"></a><span class="lineno"> 6240</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06241"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af239c482ec64dc4a3ae7f782792b8ee2"> 6241</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#af239c482ec64dc4a3ae7f782792b8ee2">ole_variable_ole_type</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, UINT var_index)</div><div class="line"><a name="l06242"></a><span class="lineno"> 6242</span> {</div><div class="line"><a name="l06243"></a><span class="lineno"> 6243</span>  VARDESC *pVarDesc;</div><div class="line"><a name="l06244"></a><span class="lineno"> 6244</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06245"></a><span class="lineno"> 6245</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l06246"></a><span class="lineno"> 6246</span>  hr = <a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>->lpVtbl->GetVarDesc(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, var_index, &pVarDesc);</div><div class="line"><a name="l06247"></a><span class="lineno"> 6247</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06248"></a><span class="lineno"> 6248</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetVarDesc"</span>);</div><div class="line"><a name="l06249"></a><span class="lineno"> 6249</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &(pVarDesc->elemdescVar.tdesc), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>);</div><div class="line"><a name="l06250"></a><span class="lineno"> 6250</span>  <a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>->lpVtbl->ReleaseVarDesc(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pVarDesc);</div><div class="line"><a name="l06251"></a><span class="lineno"> 6251</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l06252"></a><span class="lineno"> 6252</span> }</div><div class="line"><a name="l06253"></a><span class="lineno"> 6253</span> </div><div class="line"><a name="l06254"></a><span class="lineno"> 6254</span> <span class="comment">/*</span></div><div class="line"><a name="l06255"></a><span class="lineno"> 6255</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06256"></a><span class="lineno"> 6256</span> <span class="comment"> * WIN32OLE_VARIABLE#ole_type</span></div><div class="line"><a name="l06257"></a><span class="lineno"> 6257</span> <span class="comment"> *</span></div><div class="line"><a name="l06258"></a><span class="lineno"> 6258</span> <span class="comment"> * Returns OLE type string.</span></div><div class="line"><a name="l06259"></a><span class="lineno"> 6259</span> <span class="comment"> *</span></div><div class="line"><a name="l06260"></a><span class="lineno"> 6260</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'XlSheetType')</span></div><div class="line"><a name="l06261"></a><span class="lineno"> 6261</span> <span class="comment"> * variables = tobj.variables</span></div><div class="line"><a name="l06262"></a><span class="lineno"> 6262</span> <span class="comment"> * variables.each do |variable|</span></div><div class="line"><a name="l06263"></a><span class="lineno"> 6263</span> <span class="comment"> * puts "#{variable.ole_type} #{variable.name}"</span></div><div class="line"><a name="l06264"></a><span class="lineno"> 6264</span> <span class="comment"> * end</span></div><div class="line"><a name="l06265"></a><span class="lineno"> 6265</span> <span class="comment"> *</span></div><div class="line"><a name="l06266"></a><span class="lineno"> 6266</span> <span class="comment"> * The result of above script is following:</span></div><div class="line"><a name="l06267"></a><span class="lineno"> 6267</span> <span class="comment"> * INT xlChart</span></div><div class="line"><a name="l06268"></a><span class="lineno"> 6268</span> <span class="comment"> * INT xlDialogSheet</span></div><div class="line"><a name="l06269"></a><span class="lineno"> 6269</span> <span class="comment"> * INT xlExcel4IntlMacroSheet</span></div><div class="line"><a name="l06270"></a><span class="lineno"> 6270</span> <span class="comment"> * INT xlExcel4MacroSheet</span></div><div class="line"><a name="l06271"></a><span class="lineno"> 6271</span> <span class="comment"> * INT xlWorksheet</span></div><div class="line"><a name="l06272"></a><span class="lineno"> 6272</span> <span class="comment"> *</span></div><div class="line"><a name="l06273"></a><span class="lineno"> 6273</span> <span class="comment"> */</span></div><div class="line"><a name="l06274"></a><span class="lineno"> 6274</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06275"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a20fb23da064c1347bccf49c1e676ddbb"> 6275</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a20fb23da064c1347bccf49c1e676ddbb">folevariable_ole_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06276"></a><span class="lineno"> 6276</span> {</div><div class="line"><a name="l06277"></a><span class="lineno"> 6277</span>  <span class="keyword">struct </span><a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a> *pvar;</div><div class="line"><a name="l06278"></a><span class="lineno"> 6278</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a>, pvar);</div><div class="line"><a name="l06279"></a><span class="lineno"> 6279</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#af239c482ec64dc4a3ae7f782792b8ee2">ole_variable_ole_type</a>(pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be">index</a>);</div><div class="line"><a name="l06280"></a><span class="lineno"> 6280</span> }</div><div class="line"><a name="l06281"></a><span class="lineno"> 6281</span> </div><div class="line"><a name="l06282"></a><span class="lineno"> 6282</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06283"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a19cdf5ad474e3d5a5e1eb768bc1863ab"> 6283</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a19cdf5ad474e3d5a5e1eb768bc1863ab">ole_variable_ole_type_detail</a>(ITypeInfo *<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, UINT var_index)</div><div class="line"><a name="l06284"></a><span class="lineno"> 6284</span> {</div><div class="line"><a name="l06285"></a><span class="lineno"> 6285</span>  VARDESC *pVarDesc;</div><div class="line"><a name="l06286"></a><span class="lineno"> 6286</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06287"></a><span class="lineno"> 6287</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l06288"></a><span class="lineno"> 6288</span>  hr = <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->GetVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, var_index, &pVarDesc);</div><div class="line"><a name="l06289"></a><span class="lineno"> 6289</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06290"></a><span class="lineno"> 6290</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetVarDesc"</span>);</div><div class="line"><a name="l06291"></a><span class="lineno"> 6291</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a>(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, &(pVarDesc->elemdescVar.tdesc), <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>);</div><div class="line"><a name="l06292"></a><span class="lineno"> 6292</span>  <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->ReleaseVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pVarDesc);</div><div class="line"><a name="l06293"></a><span class="lineno"> 6293</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l06294"></a><span class="lineno"> 6294</span> }</div><div class="line"><a name="l06295"></a><span class="lineno"> 6295</span> </div><div class="line"><a name="l06296"></a><span class="lineno"> 6296</span> <span class="comment">/*</span></div><div class="line"><a name="l06297"></a><span class="lineno"> 6297</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06298"></a><span class="lineno"> 6298</span> <span class="comment"> * WIN32OLE_VARIABLE#ole_type_detail</span></div><div class="line"><a name="l06299"></a><span class="lineno"> 6299</span> <span class="comment"> *</span></div><div class="line"><a name="l06300"></a><span class="lineno"> 6300</span> <span class="comment"> * Returns detail information of type. The information is array of type.</span></div><div class="line"><a name="l06301"></a><span class="lineno"> 6301</span> <span class="comment"> *</span></div><div class="line"><a name="l06302"></a><span class="lineno"> 6302</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('DirectX 7 for Visual Basic Type Library', 'D3DCLIPSTATUS')</span></div><div class="line"><a name="l06303"></a><span class="lineno"> 6303</span> <span class="comment"> * variable = tobj.variables.find {|variable| variable.name == 'lFlags'}</span></div><div class="line"><a name="l06304"></a><span class="lineno"> 6304</span> <span class="comment"> * tdetail = variable.ole_type_detail</span></div><div class="line"><a name="l06305"></a><span class="lineno"> 6305</span> <span class="comment"> * p tdetail # => ["USERDEFINED", "CONST_D3DCLIPSTATUSFLAGS"]</span></div><div class="line"><a name="l06306"></a><span class="lineno"> 6306</span> <span class="comment"> *</span></div><div class="line"><a name="l06307"></a><span class="lineno"> 6307</span> <span class="comment"> */</span></div><div class="line"><a name="l06308"></a><span class="lineno"> 6308</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06309"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7fd47663ce9b04a6aab54fbeb42a8298"> 6309</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7fd47663ce9b04a6aab54fbeb42a8298">folevariable_ole_type_detail</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06310"></a><span class="lineno"> 6310</span> {</div><div class="line"><a name="l06311"></a><span class="lineno"> 6311</span>  <span class="keyword">struct </span><a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a> *pvar;</div><div class="line"><a name="l06312"></a><span class="lineno"> 6312</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a>, pvar);</div><div class="line"><a name="l06313"></a><span class="lineno"> 6313</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a19cdf5ad474e3d5a5e1eb768bc1863ab">ole_variable_ole_type_detail</a>(pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be">index</a>);</div><div class="line"><a name="l06314"></a><span class="lineno"> 6314</span> }</div><div class="line"><a name="l06315"></a><span class="lineno"> 6315</span> </div><div class="line"><a name="l06316"></a><span class="lineno"> 6316</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06317"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6b9cb77954f22e0de4393538501f8619"> 6317</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6b9cb77954f22e0de4393538501f8619">ole_variable_value</a>(ITypeInfo *<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, UINT var_index)</div><div class="line"><a name="l06318"></a><span class="lineno"> 6318</span> {</div><div class="line"><a name="l06319"></a><span class="lineno"> 6319</span>  VARDESC *pVarDesc;</div><div class="line"><a name="l06320"></a><span class="lineno"> 6320</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06321"></a><span class="lineno"> 6321</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06322"></a><span class="lineno"> 6322</span>  hr = <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->GetVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, var_index, &pVarDesc);</div><div class="line"><a name="l06323"></a><span class="lineno"> 6323</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06324"></a><span class="lineno"> 6324</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06325"></a><span class="lineno"> 6325</span>  <span class="keywordflow">if</span>(pVarDesc->varkind == VAR_CONST)</div><div class="line"><a name="l06326"></a><span class="lineno"> 6326</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ac921f4ad75c62ef506c5d282bc39eb26">V_UNION1</a>(pVarDesc, lpvarValue));</div><div class="line"><a name="l06327"></a><span class="lineno"> 6327</span>  <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->ReleaseVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pVarDesc);</div><div class="line"><a name="l06328"></a><span class="lineno"> 6328</span>  <span class="keywordflow">return</span> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l06329"></a><span class="lineno"> 6329</span> }</div><div class="line"><a name="l06330"></a><span class="lineno"> 6330</span> </div><div class="line"><a name="l06331"></a><span class="lineno"> 6331</span> <span class="comment">/*</span></div><div class="line"><a name="l06332"></a><span class="lineno"> 6332</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06333"></a><span class="lineno"> 6333</span> <span class="comment"> * WIN32OLE_VARIABLE#value</span></div><div class="line"><a name="l06334"></a><span class="lineno"> 6334</span> <span class="comment"> *</span></div><div class="line"><a name="l06335"></a><span class="lineno"> 6335</span> <span class="comment"> * Returns value if value is exists. If the value does not exist,</span></div><div class="line"><a name="l06336"></a><span class="lineno"> 6336</span> <span class="comment"> * this method returns nil.</span></div><div class="line"><a name="l06337"></a><span class="lineno"> 6337</span> <span class="comment"> *</span></div><div class="line"><a name="l06338"></a><span class="lineno"> 6338</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'XlSheetType')</span></div><div class="line"><a name="l06339"></a><span class="lineno"> 6339</span> <span class="comment"> * variables = tobj.variables</span></div><div class="line"><a name="l06340"></a><span class="lineno"> 6340</span> <span class="comment"> * variables.each do |variable|</span></div><div class="line"><a name="l06341"></a><span class="lineno"> 6341</span> <span class="comment"> * puts "#{variable.name} #{variable.value}"</span></div><div class="line"><a name="l06342"></a><span class="lineno"> 6342</span> <span class="comment"> * end</span></div><div class="line"><a name="l06343"></a><span class="lineno"> 6343</span> <span class="comment"> *</span></div><div class="line"><a name="l06344"></a><span class="lineno"> 6344</span> <span class="comment"> * The result of above script is following:</span></div><div class="line"><a name="l06345"></a><span class="lineno"> 6345</span> <span class="comment"> * xlChart = -4109</span></div><div class="line"><a name="l06346"></a><span class="lineno"> 6346</span> <span class="comment"> * xlDialogSheet = -4116</span></div><div class="line"><a name="l06347"></a><span class="lineno"> 6347</span> <span class="comment"> * xlExcel4IntlMacroSheet = 4</span></div><div class="line"><a name="l06348"></a><span class="lineno"> 6348</span> <span class="comment"> * xlExcel4MacroSheet = 3</span></div><div class="line"><a name="l06349"></a><span class="lineno"> 6349</span> <span class="comment"> * xlWorksheet = -4167</span></div><div class="line"><a name="l06350"></a><span class="lineno"> 6350</span> <span class="comment"> *</span></div><div class="line"><a name="l06351"></a><span class="lineno"> 6351</span> <span class="comment"> */</span></div><div class="line"><a name="l06352"></a><span class="lineno"> 6352</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06353"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a0b0b26c0997cc209fd7a7f6aa8f7f21c"> 6353</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a0b0b26c0997cc209fd7a7f6aa8f7f21c">folevariable_value</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06354"></a><span class="lineno"> 6354</span> {</div><div class="line"><a name="l06355"></a><span class="lineno"> 6355</span>  <span class="keyword">struct </span><a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a> *pvar;</div><div class="line"><a name="l06356"></a><span class="lineno"> 6356</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a>, pvar);</div><div class="line"><a name="l06357"></a><span class="lineno"> 6357</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6b9cb77954f22e0de4393538501f8619">ole_variable_value</a>(pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be">index</a>);</div><div class="line"><a name="l06358"></a><span class="lineno"> 6358</span> }</div><div class="line"><a name="l06359"></a><span class="lineno"> 6359</span> </div><div class="line"><a name="l06360"></a><span class="lineno"> 6360</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06361"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a193adc17c1530bdbca68249ac0761baa"> 6361</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a193adc17c1530bdbca68249ac0761baa">ole_variable_visible</a>(ITypeInfo *<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, UINT var_index)</div><div class="line"><a name="l06362"></a><span class="lineno"> 6362</span> {</div><div class="line"><a name="l06363"></a><span class="lineno"> 6363</span>  VARDESC *pVarDesc;</div><div class="line"><a name="l06364"></a><span class="lineno"> 6364</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06365"></a><span class="lineno"> 6365</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> visible = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l06366"></a><span class="lineno"> 6366</span>  hr = <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->GetVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, var_index, &pVarDesc);</div><div class="line"><a name="l06367"></a><span class="lineno"> 6367</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06368"></a><span class="lineno"> 6368</span>  <span class="keywordflow">return</span> visible;</div><div class="line"><a name="l06369"></a><span class="lineno"> 6369</span>  <span class="keywordflow">if</span> (!(pVarDesc->wVarFlags & (VARFLAG_FHIDDEN |</div><div class="line"><a name="l06370"></a><span class="lineno"> 6370</span>  VARFLAG_FRESTRICTED |</div><div class="line"><a name="l06371"></a><span class="lineno"> 6371</span>  VARFLAG_FNONBROWSABLE))) {</div><div class="line"><a name="l06372"></a><span class="lineno"> 6372</span>  visible = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l06373"></a><span class="lineno"> 6373</span>  }</div><div class="line"><a name="l06374"></a><span class="lineno"> 6374</span>  <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->ReleaseVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pVarDesc);</div><div class="line"><a name="l06375"></a><span class="lineno"> 6375</span>  <span class="keywordflow">return</span> visible;</div><div class="line"><a name="l06376"></a><span class="lineno"> 6376</span> }</div><div class="line"><a name="l06377"></a><span class="lineno"> 6377</span> </div><div class="line"><a name="l06378"></a><span class="lineno"> 6378</span> <span class="comment">/*</span></div><div class="line"><a name="l06379"></a><span class="lineno"> 6379</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06380"></a><span class="lineno"> 6380</span> <span class="comment"> * WIN32OLE_VARIABLE#visible?</span></div><div class="line"><a name="l06381"></a><span class="lineno"> 6381</span> <span class="comment"> *</span></div><div class="line"><a name="l06382"></a><span class="lineno"> 6382</span> <span class="comment"> * Returns true if the variable is public.</span></div><div class="line"><a name="l06383"></a><span class="lineno"> 6383</span> <span class="comment"> *</span></div><div class="line"><a name="l06384"></a><span class="lineno"> 6384</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'XlSheetType')</span></div><div class="line"><a name="l06385"></a><span class="lineno"> 6385</span> <span class="comment"> * variables = tobj.variables</span></div><div class="line"><a name="l06386"></a><span class="lineno"> 6386</span> <span class="comment"> * variables.each do |variable|</span></div><div class="line"><a name="l06387"></a><span class="lineno"> 6387</span> <span class="comment"> * puts "#{variable.name} #{variable.visible?}"</span></div><div class="line"><a name="l06388"></a><span class="lineno"> 6388</span> <span class="comment"> * end</span></div><div class="line"><a name="l06389"></a><span class="lineno"> 6389</span> <span class="comment"> *</span></div><div class="line"><a name="l06390"></a><span class="lineno"> 6390</span> <span class="comment"> * The result of above script is following:</span></div><div class="line"><a name="l06391"></a><span class="lineno"> 6391</span> <span class="comment"> * xlChart true</span></div><div class="line"><a name="l06392"></a><span class="lineno"> 6392</span> <span class="comment"> * xlDialogSheet true</span></div><div class="line"><a name="l06393"></a><span class="lineno"> 6393</span> <span class="comment"> * xlExcel4IntlMacroSheet true</span></div><div class="line"><a name="l06394"></a><span class="lineno"> 6394</span> <span class="comment"> * xlExcel4MacroSheet true</span></div><div class="line"><a name="l06395"></a><span class="lineno"> 6395</span> <span class="comment"> * xlWorksheet true</span></div><div class="line"><a name="l06396"></a><span class="lineno"> 6396</span> <span class="comment"> *</span></div><div class="line"><a name="l06397"></a><span class="lineno"> 6397</span> <span class="comment"> */</span></div><div class="line"><a name="l06398"></a><span class="lineno"> 6398</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06399"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad362e99b0e786cf59de8ca21b1509d9e"> 6399</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad362e99b0e786cf59de8ca21b1509d9e">folevariable_visible</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06400"></a><span class="lineno"> 6400</span> {</div><div class="line"><a name="l06401"></a><span class="lineno"> 6401</span>  <span class="keyword">struct </span><a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a> *pvar;</div><div class="line"><a name="l06402"></a><span class="lineno"> 6402</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a>, pvar);</div><div class="line"><a name="l06403"></a><span class="lineno"> 6403</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a193adc17c1530bdbca68249ac0761baa">ole_variable_visible</a>(pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be">index</a>);</div><div class="line"><a name="l06404"></a><span class="lineno"> 6404</span> }</div><div class="line"><a name="l06405"></a><span class="lineno"> 6405</span> </div><div class="line"><a name="l06406"></a><span class="lineno"> 6406</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06407"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a23d4b2b48618ab5d151662931e221172"> 6407</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a23d4b2b48618ab5d151662931e221172">ole_variable_kind</a>(ITypeInfo *<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, UINT var_index)</div><div class="line"><a name="l06408"></a><span class="lineno"> 6408</span> {</div><div class="line"><a name="l06409"></a><span class="lineno"> 6409</span>  VARDESC *pVarDesc;</div><div class="line"><a name="l06410"></a><span class="lineno"> 6410</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06411"></a><span class="lineno"> 6411</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> kind = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"UNKNOWN"</span>);</div><div class="line"><a name="l06412"></a><span class="lineno"> 6412</span>  hr = <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->GetVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, var_index, &pVarDesc);</div><div class="line"><a name="l06413"></a><span class="lineno"> 6413</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06414"></a><span class="lineno"> 6414</span>  <span class="keywordflow">return</span> kind;</div><div class="line"><a name="l06415"></a><span class="lineno"> 6415</span>  <span class="keywordflow">switch</span>(pVarDesc->varkind) {</div><div class="line"><a name="l06416"></a><span class="lineno"> 6416</span>  <span class="keywordflow">case</span> VAR_PERINSTANCE:</div><div class="line"><a name="l06417"></a><span class="lineno"> 6417</span>  kind = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"PERINSTANCE"</span>);</div><div class="line"><a name="l06418"></a><span class="lineno"> 6418</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l06419"></a><span class="lineno"> 6419</span>  <span class="keywordflow">case</span> VAR_STATIC:</div><div class="line"><a name="l06420"></a><span class="lineno"> 6420</span>  kind = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"STATIC"</span>);</div><div class="line"><a name="l06421"></a><span class="lineno"> 6421</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l06422"></a><span class="lineno"> 6422</span>  <span class="keywordflow">case</span> VAR_CONST:</div><div class="line"><a name="l06423"></a><span class="lineno"> 6423</span>  kind = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"CONSTANT"</span>);</div><div class="line"><a name="l06424"></a><span class="lineno"> 6424</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l06425"></a><span class="lineno"> 6425</span>  <span class="keywordflow">case</span> VAR_DISPATCH:</div><div class="line"><a name="l06426"></a><span class="lineno"> 6426</span>  kind = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"DISPATCH"</span>);</div><div class="line"><a name="l06427"></a><span class="lineno"> 6427</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l06428"></a><span class="lineno"> 6428</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l06429"></a><span class="lineno"> 6429</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l06430"></a><span class="lineno"> 6430</span>  }</div><div class="line"><a name="l06431"></a><span class="lineno"> 6431</span>  <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->ReleaseVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pVarDesc);</div><div class="line"><a name="l06432"></a><span class="lineno"> 6432</span>  <span class="keywordflow">return</span> kind;</div><div class="line"><a name="l06433"></a><span class="lineno"> 6433</span> }</div><div class="line"><a name="l06434"></a><span class="lineno"> 6434</span> </div><div class="line"><a name="l06435"></a><span class="lineno"> 6435</span> <span class="comment">/*</span></div><div class="line"><a name="l06436"></a><span class="lineno"> 6436</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06437"></a><span class="lineno"> 6437</span> <span class="comment"> * WIN32OLE_VARIABLE#variable_kind</span></div><div class="line"><a name="l06438"></a><span class="lineno"> 6438</span> <span class="comment"> *</span></div><div class="line"><a name="l06439"></a><span class="lineno"> 6439</span> <span class="comment"> * Returns variable kind string.</span></div><div class="line"><a name="l06440"></a><span class="lineno"> 6440</span> <span class="comment"> *</span></div><div class="line"><a name="l06441"></a><span class="lineno"> 6441</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'XlSheetType')</span></div><div class="line"><a name="l06442"></a><span class="lineno"> 6442</span> <span class="comment"> * variables = tobj.variables</span></div><div class="line"><a name="l06443"></a><span class="lineno"> 6443</span> <span class="comment"> * variables.each do |variable|</span></div><div class="line"><a name="l06444"></a><span class="lineno"> 6444</span> <span class="comment"> * puts "#{variable.name} #{variable.variable_kind}"</span></div><div class="line"><a name="l06445"></a><span class="lineno"> 6445</span> <span class="comment"> * end</span></div><div class="line"><a name="l06446"></a><span class="lineno"> 6446</span> <span class="comment"> *</span></div><div class="line"><a name="l06447"></a><span class="lineno"> 6447</span> <span class="comment"> * The result of above script is following:</span></div><div class="line"><a name="l06448"></a><span class="lineno"> 6448</span> <span class="comment"> * xlChart CONSTANT</span></div><div class="line"><a name="l06449"></a><span class="lineno"> 6449</span> <span class="comment"> * xlDialogSheet CONSTANT</span></div><div class="line"><a name="l06450"></a><span class="lineno"> 6450</span> <span class="comment"> * xlExcel4IntlMacroSheet CONSTANT</span></div><div class="line"><a name="l06451"></a><span class="lineno"> 6451</span> <span class="comment"> * xlExcel4MacroSheet CONSTANT</span></div><div class="line"><a name="l06452"></a><span class="lineno"> 6452</span> <span class="comment"> * xlWorksheet CONSTANT</span></div><div class="line"><a name="l06453"></a><span class="lineno"> 6453</span> <span class="comment"> */</span></div><div class="line"><a name="l06454"></a><span class="lineno"> 6454</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06455"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a0fc97ff3ba5a68010e19aac6920897cc"> 6455</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a0fc97ff3ba5a68010e19aac6920897cc">folevariable_variable_kind</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06456"></a><span class="lineno"> 6456</span> {</div><div class="line"><a name="l06457"></a><span class="lineno"> 6457</span>  <span class="keyword">struct </span><a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a> *pvar;</div><div class="line"><a name="l06458"></a><span class="lineno"> 6458</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a>, pvar);</div><div class="line"><a name="l06459"></a><span class="lineno"> 6459</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a23d4b2b48618ab5d151662931e221172">ole_variable_kind</a>(pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be">index</a>);</div><div class="line"><a name="l06460"></a><span class="lineno"> 6460</span> }</div><div class="line"><a name="l06461"></a><span class="lineno"> 6461</span> </div><div class="line"><a name="l06462"></a><span class="lineno"> 6462</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06463"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a54ad2dbeaac58c98d5aab369aacc7650"> 6463</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a54ad2dbeaac58c98d5aab369aacc7650">ole_variable_varkind</a>(ITypeInfo *<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, UINT var_index)</div><div class="line"><a name="l06464"></a><span class="lineno"> 6464</span> {</div><div class="line"><a name="l06465"></a><span class="lineno"> 6465</span>  VARDESC *pVarDesc;</div><div class="line"><a name="l06466"></a><span class="lineno"> 6466</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06467"></a><span class="lineno"> 6467</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> kind = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06468"></a><span class="lineno"> 6468</span>  hr = <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->GetVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, var_index, &pVarDesc);</div><div class="line"><a name="l06469"></a><span class="lineno"> 6469</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06470"></a><span class="lineno"> 6470</span>  <span class="keywordflow">return</span> kind;</div><div class="line"><a name="l06471"></a><span class="lineno"> 6471</span>  <a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>->lpVtbl->ReleaseVarDesc(<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pVarDesc);</div><div class="line"><a name="l06472"></a><span class="lineno"> 6472</span>  kind = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(pVarDesc->varkind);</div><div class="line"><a name="l06473"></a><span class="lineno"> 6473</span>  <span class="keywordflow">return</span> kind;</div><div class="line"><a name="l06474"></a><span class="lineno"> 6474</span> }</div><div class="line"><a name="l06475"></a><span class="lineno"> 6475</span> </div><div class="line"><a name="l06476"></a><span class="lineno"> 6476</span> <span class="comment">/*</span></div><div class="line"><a name="l06477"></a><span class="lineno"> 6477</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06478"></a><span class="lineno"> 6478</span> <span class="comment"> * WIN32OLE_VARIABLE#varkind</span></div><div class="line"><a name="l06479"></a><span class="lineno"> 6479</span> <span class="comment"> *</span></div><div class="line"><a name="l06480"></a><span class="lineno"> 6480</span> <span class="comment"> * Returns the number which represents variable kind.</span></div><div class="line"><a name="l06481"></a><span class="lineno"> 6481</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'XlSheetType')</span></div><div class="line"><a name="l06482"></a><span class="lineno"> 6482</span> <span class="comment"> * variables = tobj.variables</span></div><div class="line"><a name="l06483"></a><span class="lineno"> 6483</span> <span class="comment"> * variables.each do |variable|</span></div><div class="line"><a name="l06484"></a><span class="lineno"> 6484</span> <span class="comment"> * puts "#{variable.name} #{variable.varkind}"</span></div><div class="line"><a name="l06485"></a><span class="lineno"> 6485</span> <span class="comment"> * end</span></div><div class="line"><a name="l06486"></a><span class="lineno"> 6486</span> <span class="comment"> *</span></div><div class="line"><a name="l06487"></a><span class="lineno"> 6487</span> <span class="comment"> * The result of above script is following:</span></div><div class="line"><a name="l06488"></a><span class="lineno"> 6488</span> <span class="comment"> * xlChart 2</span></div><div class="line"><a name="l06489"></a><span class="lineno"> 6489</span> <span class="comment"> * xlDialogSheet 2</span></div><div class="line"><a name="l06490"></a><span class="lineno"> 6490</span> <span class="comment"> * xlExcel4IntlMacroSheet 2</span></div><div class="line"><a name="l06491"></a><span class="lineno"> 6491</span> <span class="comment"> * xlExcel4MacroSheet 2</span></div><div class="line"><a name="l06492"></a><span class="lineno"> 6492</span> <span class="comment"> * xlWorksheet 2</span></div><div class="line"><a name="l06493"></a><span class="lineno"> 6493</span> <span class="comment"> */</span></div><div class="line"><a name="l06494"></a><span class="lineno"> 6494</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06495"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af2f972ca981683bd7a3e06d766776420"> 6495</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#af2f972ca981683bd7a3e06d766776420">folevariable_varkind</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06496"></a><span class="lineno"> 6496</span> {</div><div class="line"><a name="l06497"></a><span class="lineno"> 6497</span>  <span class="keyword">struct </span><a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a> *pvar;</div><div class="line"><a name="l06498"></a><span class="lineno"> 6498</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d2/d9a/structolevariabledata.html">olevariabledata</a>, pvar);</div><div class="line"><a name="l06499"></a><span class="lineno"> 6499</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a54ad2dbeaac58c98d5aab369aacc7650">ole_variable_varkind</a>(pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, pvar-><a class="code" href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be">index</a>);</div><div class="line"><a name="l06500"></a><span class="lineno"> 6500</span> }</div><div class="line"><a name="l06501"></a><span class="lineno"> 6501</span> </div><div class="line"><a name="l06502"></a><span class="lineno"> 6502</span> <span class="comment">/*</span></div><div class="line"><a name="l06503"></a><span class="lineno"> 6503</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06504"></a><span class="lineno"> 6504</span> <span class="comment"> * WIN32OLE_VARIABLE#inspect -> String</span></div><div class="line"><a name="l06505"></a><span class="lineno"> 6505</span> <span class="comment"> *</span></div><div class="line"><a name="l06506"></a><span class="lineno"> 6506</span> <span class="comment"> * Returns the OLE variable name and the value with class name.</span></div><div class="line"><a name="l06507"></a><span class="lineno"> 6507</span> <span class="comment"> *</span></div><div class="line"><a name="l06508"></a><span class="lineno"> 6508</span> <span class="comment"> */</span></div><div class="line"><a name="l06509"></a><span class="lineno"> 6509</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06510"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aca6350a62c8eea366d1df29eca78dc48"> 6510</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aca6350a62c8eea366d1df29eca78dc48">folevariable_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06511"></a><span class="lineno"> 6511</span> {</div><div class="line"><a name="l06512"></a><span class="lineno"> 6512</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> detail = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"to_s"</span>), 0);</div><div class="line"><a name="l06513"></a><span class="lineno"> 6513</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(detail, <span class="stringliteral">"="</span>);</div><div class="line"><a name="l06514"></a><span class="lineno"> 6514</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2f12f7ad949fa2e6abb64f2311c6e2c5">rb_str_concat</a>(detail, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"value"</span>), 0), <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"inspect"</span>), 0));</div><div class="line"><a name="l06515"></a><span class="lineno"> 6515</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#afbdc037edc37f16c9ab3e62d5c25f65f">make_inspect</a>(<span class="stringliteral">"WIN32OLE_VARIABLE"</span>, detail);</div><div class="line"><a name="l06516"></a><span class="lineno"> 6516</span> }</div><div class="line"><a name="l06517"></a><span class="lineno"> 6517</span> </div><div class="line"><a name="l06518"></a><span class="lineno"> 6518</span> <span class="comment">/*</span></div><div class="line"><a name="l06519"></a><span class="lineno"> 6519</span> <span class="comment"> * Document-class: WIN32OLE_METHOD</span></div><div class="line"><a name="l06520"></a><span class="lineno"> 6520</span> <span class="comment"> *</span></div><div class="line"><a name="l06521"></a><span class="lineno"> 6521</span> <span class="comment"> * <code>WIN32OLE_METHOD</code> objects represent OLE method information.</span></div><div class="line"><a name="l06522"></a><span class="lineno"> 6522</span> <span class="comment"> */</span></div><div class="line"><a name="l06523"></a><span class="lineno"> 6523</span> </div><div class="line"><a name="l06524"></a><span class="lineno"> 6524</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06525"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a8c02b8f9190decc7b4077cb122d313fa"> 6525</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a8c02b8f9190decc7b4077cb122d313fa">olemethod_set_member</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeInfo *<a class="code" href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">pTypeInfo</a>, ITypeInfo *pOwnerTypeInfo, <span class="keywordtype">int</span> <a class="code" href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be">index</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>)</div><div class="line"><a name="l06526"></a><span class="lineno"> 6526</span> {</div><div class="line"><a name="l06527"></a><span class="lineno"> 6527</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06528"></a><span class="lineno"> 6528</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l06529"></a><span class="lineno"> 6529</span>  pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a> = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>;</div><div class="line"><a name="l06530"></a><span class="lineno"> 6530</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5">OLE_ADDREF</a>(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>);</div><div class="line"><a name="l06531"></a><span class="lineno"> 6531</span>  pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c">pOwnerTypeInfo</a> = <a class="code" href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c">pOwnerTypeInfo</a>;</div><div class="line"><a name="l06532"></a><span class="lineno"> 6532</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c">pOwnerTypeInfo</a>) <a class="code" href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5">OLE_ADDREF</a>(<a class="code" href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c">pOwnerTypeInfo</a>);</div><div class="line"><a name="l06533"></a><span class="lineno"> 6533</span>  pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a> = <a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>;</div><div class="line"><a name="l06534"></a><span class="lineno"> 6534</span>  <a class="code" href="../../db/d2e/intern_8h.html#acee88ad0375c8a9080e2283db494d257">rb_ivar_set</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>), <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>);</div><div class="line"><a name="l06535"></a><span class="lineno"> 6535</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l06536"></a><span class="lineno"> 6536</span> }</div><div class="line"><a name="l06537"></a><span class="lineno"> 6537</span> </div><div class="line"><a name="l06538"></a><span class="lineno"> 6538</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06539"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afb37c29e28b1f960fbf22b605993354d"> 6539</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#afb37c29e28b1f960fbf22b605993354d">folemethod_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass)</div><div class="line"><a name="l06540"></a><span class="lineno"> 6540</span> {</div><div class="line"><a name="l06541"></a><span class="lineno"> 6541</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06542"></a><span class="lineno"> 6542</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj;</div><div class="line"><a name="l06543"></a><span class="lineno"> 6543</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad80ce51081780f829134de0338821b76">Data_Make_Struct</a>(klass,</div><div class="line"><a name="l06544"></a><span class="lineno"> 6544</span>  <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>,</div><div class="line"><a name="l06545"></a><span class="lineno"> 6545</span>  0, <a class="code" href="../../d2/d99/win32ole_8c.html#a1db0ce1c948a3568385af4333d51d21e">olemethod_free</a>, pmethod);</div><div class="line"><a name="l06546"></a><span class="lineno"> 6546</span>  pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l06547"></a><span class="lineno"> 6547</span>  pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c">pOwnerTypeInfo</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l06548"></a><span class="lineno"> 6548</span>  pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a> = 0;</div><div class="line"><a name="l06549"></a><span class="lineno"> 6549</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l06550"></a><span class="lineno"> 6550</span> }</div><div class="line"><a name="l06551"></a><span class="lineno"> 6551</span> </div><div class="line"><a name="l06552"></a><span class="lineno"> 6552</span> <span class="comment">/*</span></div><div class="line"><a name="l06553"></a><span class="lineno"> 6553</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06554"></a><span class="lineno"> 6554</span> <span class="comment"> * WIN32OLE_METHOD.new(ole_type, method) -> WIN32OLE_METHOD object</span></div><div class="line"><a name="l06555"></a><span class="lineno"> 6555</span> <span class="comment"> *</span></div><div class="line"><a name="l06556"></a><span class="lineno"> 6556</span> <span class="comment"> * Returns a new WIN32OLE_METHOD object which represents the information</span></div><div class="line"><a name="l06557"></a><span class="lineno"> 6557</span> <span class="comment"> * about OLE method.</span></div><div class="line"><a name="l06558"></a><span class="lineno"> 6558</span> <span class="comment"> * The first argument <i>ole_type</i> specifies WIN32OLE_TYPE object.</span></div><div class="line"><a name="l06559"></a><span class="lineno"> 6559</span> <span class="comment"> * The second argument <i>method</i> specifies OLE method name defined OLE class</span></div><div class="line"><a name="l06560"></a><span class="lineno"> 6560</span> <span class="comment"> * which represents WIN32OLE_TYPE object.</span></div><div class="line"><a name="l06561"></a><span class="lineno"> 6561</span> <span class="comment"> *</span></div><div class="line"><a name="l06562"></a><span class="lineno"> 6562</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l06563"></a><span class="lineno"> 6563</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SaveAs')</span></div><div class="line"><a name="l06564"></a><span class="lineno"> 6564</span> <span class="comment"> */</span></div><div class="line"><a name="l06565"></a><span class="lineno"> 6565</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06566"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7b85e610d07b34c298cf33157d20744f"> 6566</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7b85e610d07b34c298cf33157d20744f">folemethod_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> oletype, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> method)</div><div class="line"><a name="l06567"></a><span class="lineno"> 6567</span> {</div><div class="line"><a name="l06568"></a><span class="lineno"> 6568</span>  <span class="keyword">struct </span><a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a> *ptype;</div><div class="line"><a name="l06569"></a><span class="lineno"> 6569</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06570"></a><span class="lineno"> 6570</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(oletype, <a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>)) {</div><div class="line"><a name="l06571"></a><span class="lineno"> 6571</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0381640e2905c1b3e104194f91697ca4">SafeStringValue</a>(method);</div><div class="line"><a name="l06572"></a><span class="lineno"> 6572</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(oletype, <span class="keyword">struct</span> <a class="code" href="../../d9/d09/structoletypedata.html">oletypedata</a>, ptype);</div><div class="line"><a name="l06573"></a><span class="lineno"> 6573</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a35aba07c890c79964cd4b15d29589917">olemethod_from_typeinfo</a>(<span class="keyword">self</span>, ptype-><a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, method);</div><div class="line"><a name="l06574"></a><span class="lineno"> 6574</span>  <span class="keywordflow">if</span> (obj == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l06575"></a><span class="lineno"> 6575</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"not found %s"</span>,</div><div class="line"><a name="l06576"></a><span class="lineno"> 6576</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(method));</div><div class="line"><a name="l06577"></a><span class="lineno"> 6577</span>  }</div><div class="line"><a name="l06578"></a><span class="lineno"> 6578</span>  }</div><div class="line"><a name="l06579"></a><span class="lineno"> 6579</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l06580"></a><span class="lineno"> 6580</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"1st argument should be WIN32OLE_TYPE object"</span>);</div><div class="line"><a name="l06581"></a><span class="lineno"> 6581</span>  }</div><div class="line"><a name="l06582"></a><span class="lineno"> 6582</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l06583"></a><span class="lineno"> 6583</span> }</div><div class="line"><a name="l06584"></a><span class="lineno"> 6584</span> </div><div class="line"><a name="l06585"></a><span class="lineno"> 6585</span> <span class="comment">/*</span></div><div class="line"><a name="l06586"></a><span class="lineno"> 6586</span> <span class="comment"> * call-seq</span></div><div class="line"><a name="l06587"></a><span class="lineno"> 6587</span> <span class="comment"> * WIN32OLE_METHOD#name</span></div><div class="line"><a name="l06588"></a><span class="lineno"> 6588</span> <span class="comment"> *</span></div><div class="line"><a name="l06589"></a><span class="lineno"> 6589</span> <span class="comment"> * Returns the name of the method.</span></div><div class="line"><a name="l06590"></a><span class="lineno"> 6590</span> <span class="comment"> *</span></div><div class="line"><a name="l06591"></a><span class="lineno"> 6591</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l06592"></a><span class="lineno"> 6592</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SaveAs')</span></div><div class="line"><a name="l06593"></a><span class="lineno"> 6593</span> <span class="comment"> * puts method.name # => SaveAs</span></div><div class="line"><a name="l06594"></a><span class="lineno"> 6594</span> <span class="comment"> *</span></div><div class="line"><a name="l06595"></a><span class="lineno"> 6595</span> <span class="comment"> */</span></div><div class="line"><a name="l06596"></a><span class="lineno"> 6596</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06597"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6c0faebe3e31e28f7202288a1ec72573"> 6597</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6c0faebe3e31e28f7202288a1ec72573">folemethod_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06598"></a><span class="lineno"> 6598</span> {</div><div class="line"><a name="l06599"></a><span class="lineno"> 6599</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>));</div><div class="line"><a name="l06600"></a><span class="lineno"> 6600</span> }</div><div class="line"><a name="l06601"></a><span class="lineno"> 6601</span> </div><div class="line"><a name="l06602"></a><span class="lineno"> 6602</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06603"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#adf6ebc9719fb08963aa1e8bc253e7f33"> 6603</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#adf6ebc9719fb08963aa1e8bc253e7f33">ole_method_return_type</a>(ITypeInfo *<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l06604"></a><span class="lineno"> 6604</span> {</div><div class="line"><a name="l06605"></a><span class="lineno"> 6605</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l06606"></a><span class="lineno"> 6606</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06607"></a><span class="lineno"> 6607</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l06608"></a><span class="lineno"> 6608</span> </div><div class="line"><a name="l06609"></a><span class="lineno"> 6609</span>  hr = <a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l06610"></a><span class="lineno"> 6610</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06611"></a><span class="lineno"> 6611</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetFuncDesc"</span>);</div><div class="line"><a name="l06612"></a><span class="lineno"> 6612</span> </div><div class="line"><a name="l06613"></a><span class="lineno"> 6613</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a>(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, &(pFuncDesc->elemdescFunc.tdesc), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>);</div><div class="line"><a name="l06614"></a><span class="lineno"> 6614</span>  <a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l06615"></a><span class="lineno"> 6615</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l06616"></a><span class="lineno"> 6616</span> }</div><div class="line"><a name="l06617"></a><span class="lineno"> 6617</span> </div><div class="line"><a name="l06618"></a><span class="lineno"> 6618</span> <span class="comment">/*</span></div><div class="line"><a name="l06619"></a><span class="lineno"> 6619</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06620"></a><span class="lineno"> 6620</span> <span class="comment"> * WIN32OLE_METHOD#return_type</span></div><div class="line"><a name="l06621"></a><span class="lineno"> 6621</span> <span class="comment"> *</span></div><div class="line"><a name="l06622"></a><span class="lineno"> 6622</span> <span class="comment"> * Returns string of return value type of method.</span></div><div class="line"><a name="l06623"></a><span class="lineno"> 6623</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbooks')</span></div><div class="line"><a name="l06624"></a><span class="lineno"> 6624</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Add')</span></div><div class="line"><a name="l06625"></a><span class="lineno"> 6625</span> <span class="comment"> * puts method.return_type # => Workbook</span></div><div class="line"><a name="l06626"></a><span class="lineno"> 6626</span> <span class="comment"> *</span></div><div class="line"><a name="l06627"></a><span class="lineno"> 6627</span> <span class="comment"> */</span></div><div class="line"><a name="l06628"></a><span class="lineno"> 6628</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06629"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a69aa8b97b2991bba847a006ba8a683ff"> 6629</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a69aa8b97b2991bba847a006ba8a683ff">folemethod_return_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06630"></a><span class="lineno"> 6630</span> {</div><div class="line"><a name="l06631"></a><span class="lineno"> 6631</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06632"></a><span class="lineno"> 6632</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l06633"></a><span class="lineno"> 6633</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#adf6ebc9719fb08963aa1e8bc253e7f33">ole_method_return_type</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l06634"></a><span class="lineno"> 6634</span> }</div><div class="line"><a name="l06635"></a><span class="lineno"> 6635</span> </div><div class="line"><a name="l06636"></a><span class="lineno"> 6636</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06637"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#abadfae1ced24da452479079a0b01da5b"> 6637</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#abadfae1ced24da452479079a0b01da5b">ole_method_return_vtype</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l06638"></a><span class="lineno"> 6638</span> {</div><div class="line"><a name="l06639"></a><span class="lineno"> 6639</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l06640"></a><span class="lineno"> 6640</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06641"></a><span class="lineno"> 6641</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vvt;</div><div class="line"><a name="l06642"></a><span class="lineno"> 6642</span> </div><div class="line"><a name="l06643"></a><span class="lineno"> 6643</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l06644"></a><span class="lineno"> 6644</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06645"></a><span class="lineno"> 6645</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetFuncDesc"</span>);</div><div class="line"><a name="l06646"></a><span class="lineno"> 6646</span> </div><div class="line"><a name="l06647"></a><span class="lineno"> 6647</span>  vvt = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(pFuncDesc->elemdescFunc.tdesc.vt);</div><div class="line"><a name="l06648"></a><span class="lineno"> 6648</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l06649"></a><span class="lineno"> 6649</span>  <span class="keywordflow">return</span> vvt;</div><div class="line"><a name="l06650"></a><span class="lineno"> 6650</span> }</div><div class="line"><a name="l06651"></a><span class="lineno"> 6651</span> </div><div class="line"><a name="l06652"></a><span class="lineno"> 6652</span> <span class="comment">/*</span></div><div class="line"><a name="l06653"></a><span class="lineno"> 6653</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06654"></a><span class="lineno"> 6654</span> <span class="comment"> * WIN32OLE_METHOD#return_vtype</span></div><div class="line"><a name="l06655"></a><span class="lineno"> 6655</span> <span class="comment"> *</span></div><div class="line"><a name="l06656"></a><span class="lineno"> 6656</span> <span class="comment"> * Returns number of return value type of method.</span></div><div class="line"><a name="l06657"></a><span class="lineno"> 6657</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbooks')</span></div><div class="line"><a name="l06658"></a><span class="lineno"> 6658</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Add')</span></div><div class="line"><a name="l06659"></a><span class="lineno"> 6659</span> <span class="comment"> * puts method.return_vtype # => 26</span></div><div class="line"><a name="l06660"></a><span class="lineno"> 6660</span> <span class="comment"> *</span></div><div class="line"><a name="l06661"></a><span class="lineno"> 6661</span> <span class="comment"> */</span></div><div class="line"><a name="l06662"></a><span class="lineno"> 6662</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06663"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae4836afb8566d0ed610b9360d6f50990"> 6663</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ae4836afb8566d0ed610b9360d6f50990">folemethod_return_vtype</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06664"></a><span class="lineno"> 6664</span> {</div><div class="line"><a name="l06665"></a><span class="lineno"> 6665</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06666"></a><span class="lineno"> 6666</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l06667"></a><span class="lineno"> 6667</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#abadfae1ced24da452479079a0b01da5b">ole_method_return_vtype</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l06668"></a><span class="lineno"> 6668</span> }</div><div class="line"><a name="l06669"></a><span class="lineno"> 6669</span> </div><div class="line"><a name="l06670"></a><span class="lineno"> 6670</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06671"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2be33b87e96e8ef4c0498e91f76aa3e4"> 6671</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2be33b87e96e8ef4c0498e91f76aa3e4">ole_method_return_type_detail</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l06672"></a><span class="lineno"> 6672</span> {</div><div class="line"><a name="l06673"></a><span class="lineno"> 6673</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l06674"></a><span class="lineno"> 6674</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06675"></a><span class="lineno"> 6675</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l06676"></a><span class="lineno"> 6676</span> </div><div class="line"><a name="l06677"></a><span class="lineno"> 6677</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l06678"></a><span class="lineno"> 6678</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06679"></a><span class="lineno"> 6679</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l06680"></a><span class="lineno"> 6680</span> </div><div class="line"><a name="l06681"></a><span class="lineno"> 6681</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a>(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, &(pFuncDesc->elemdescFunc.tdesc), <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>);</div><div class="line"><a name="l06682"></a><span class="lineno"> 6682</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l06683"></a><span class="lineno"> 6683</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l06684"></a><span class="lineno"> 6684</span> }</div><div class="line"><a name="l06685"></a><span class="lineno"> 6685</span> </div><div class="line"><a name="l06686"></a><span class="lineno"> 6686</span> <span class="comment">/*</span></div><div class="line"><a name="l06687"></a><span class="lineno"> 6687</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06688"></a><span class="lineno"> 6688</span> <span class="comment"> * WIN32OLE_METHOD#return_type_detail</span></div><div class="line"><a name="l06689"></a><span class="lineno"> 6689</span> <span class="comment"> *</span></div><div class="line"><a name="l06690"></a><span class="lineno"> 6690</span> <span class="comment"> * Returns detail information of return value type of method.</span></div><div class="line"><a name="l06691"></a><span class="lineno"> 6691</span> <span class="comment"> * The information is array.</span></div><div class="line"><a name="l06692"></a><span class="lineno"> 6692</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbooks')</span></div><div class="line"><a name="l06693"></a><span class="lineno"> 6693</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Add')</span></div><div class="line"><a name="l06694"></a><span class="lineno"> 6694</span> <span class="comment"> * p method.return_type_detail # => ["PTR", "USERDEFINED", "Workbook"]</span></div><div class="line"><a name="l06695"></a><span class="lineno"> 6695</span> <span class="comment"> */</span></div><div class="line"><a name="l06696"></a><span class="lineno"> 6696</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06697"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a4143de391103e02d12818baedff3f685"> 6697</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4143de391103e02d12818baedff3f685">folemethod_return_type_detail</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06698"></a><span class="lineno"> 6698</span> {</div><div class="line"><a name="l06699"></a><span class="lineno"> 6699</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06700"></a><span class="lineno"> 6700</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l06701"></a><span class="lineno"> 6701</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2be33b87e96e8ef4c0498e91f76aa3e4">ole_method_return_type_detail</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l06702"></a><span class="lineno"> 6702</span> }</div><div class="line"><a name="l06703"></a><span class="lineno"> 6703</span> </div><div class="line"><a name="l06704"></a><span class="lineno"> 6704</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06705"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a7c43bce680b77e3dd2a1df61a36cf2f5"> 6705</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7c43bce680b77e3dd2a1df61a36cf2f5">ole_method_invkind</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l06706"></a><span class="lineno"> 6706</span> {</div><div class="line"><a name="l06707"></a><span class="lineno"> 6707</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l06708"></a><span class="lineno"> 6708</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06709"></a><span class="lineno"> 6709</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> invkind;</div><div class="line"><a name="l06710"></a><span class="lineno"> 6710</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l06711"></a><span class="lineno"> 6711</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l06712"></a><span class="lineno"> 6712</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to GetFuncDesc"</span>);</div><div class="line"><a name="l06713"></a><span class="lineno"> 6713</span>  invkind = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(pFuncDesc->invkind);</div><div class="line"><a name="l06714"></a><span class="lineno"> 6714</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l06715"></a><span class="lineno"> 6715</span>  <span class="keywordflow">return</span> invkind;</div><div class="line"><a name="l06716"></a><span class="lineno"> 6716</span> }</div><div class="line"><a name="l06717"></a><span class="lineno"> 6717</span> </div><div class="line"><a name="l06718"></a><span class="lineno"> 6718</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06719"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a51487ccbc2afad1399d12fcf846949a7"> 6719</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a51487ccbc2afad1399d12fcf846949a7">ole_method_invoke_kind</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l06720"></a><span class="lineno"> 6720</span> {</div><div class="line"><a name="l06721"></a><span class="lineno"> 6721</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"UNKNOWN"</span>);</div><div class="line"><a name="l06722"></a><span class="lineno"> 6722</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> invkind = <a class="code" href="../../d2/d99/win32ole_8c.html#a7c43bce680b77e3dd2a1df61a36cf2f5">ole_method_invkind</a>(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index);</div><div class="line"><a name="l06723"></a><span class="lineno"> 6723</span>  <span class="keywordflow">if</span>((<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(invkind) & INVOKE_PROPERTYGET) &&</div><div class="line"><a name="l06724"></a><span class="lineno"> 6724</span>  (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(invkind) & INVOKE_PROPERTYPUT) ) {</div><div class="line"><a name="l06725"></a><span class="lineno"> 6725</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"PROPERTY"</span>);</div><div class="line"><a name="l06726"></a><span class="lineno"> 6726</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(invkind) & INVOKE_PROPERTYGET) {</div><div class="line"><a name="l06727"></a><span class="lineno"> 6727</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"PROPERTYGET"</span>);</div><div class="line"><a name="l06728"></a><span class="lineno"> 6728</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(invkind) & INVOKE_PROPERTYPUT) {</div><div class="line"><a name="l06729"></a><span class="lineno"> 6729</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"PROPERTYPUT"</span>);</div><div class="line"><a name="l06730"></a><span class="lineno"> 6730</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(invkind) & INVOKE_PROPERTYPUTREF) {</div><div class="line"><a name="l06731"></a><span class="lineno"> 6731</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"PROPERTYPUTREF"</span>);</div><div class="line"><a name="l06732"></a><span class="lineno"> 6732</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(invkind) & INVOKE_FUNC) {</div><div class="line"><a name="l06733"></a><span class="lineno"> 6733</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"FUNC"</span>);</div><div class="line"><a name="l06734"></a><span class="lineno"> 6734</span>  }</div><div class="line"><a name="l06735"></a><span class="lineno"> 6735</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l06736"></a><span class="lineno"> 6736</span> }</div><div class="line"><a name="l06737"></a><span class="lineno"> 6737</span> </div><div class="line"><a name="l06738"></a><span class="lineno"> 6738</span> <span class="comment">/*</span></div><div class="line"><a name="l06739"></a><span class="lineno"> 6739</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06740"></a><span class="lineno"> 6740</span> <span class="comment"> * WIN32OLE_MTHOD#invkind</span></div><div class="line"><a name="l06741"></a><span class="lineno"> 6741</span> <span class="comment"> *</span></div><div class="line"><a name="l06742"></a><span class="lineno"> 6742</span> <span class="comment"> * Returns the method invoke kind.</span></div><div class="line"><a name="l06743"></a><span class="lineno"> 6743</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbooks')</span></div><div class="line"><a name="l06744"></a><span class="lineno"> 6744</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Add')</span></div><div class="line"><a name="l06745"></a><span class="lineno"> 6745</span> <span class="comment"> * puts method.invkind # => 1</span></div><div class="line"><a name="l06746"></a><span class="lineno"> 6746</span> <span class="comment"> *</span></div><div class="line"><a name="l06747"></a><span class="lineno"> 6747</span> <span class="comment"> */</span></div><div class="line"><a name="l06748"></a><span class="lineno"> 6748</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06749"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afda17c1fafb5c5da6cf2467641cb41a7"> 6749</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#afda17c1fafb5c5da6cf2467641cb41a7">folemethod_invkind</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06750"></a><span class="lineno"> 6750</span> {</div><div class="line"><a name="l06751"></a><span class="lineno"> 6751</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06752"></a><span class="lineno"> 6752</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l06753"></a><span class="lineno"> 6753</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a7c43bce680b77e3dd2a1df61a36cf2f5">ole_method_invkind</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l06754"></a><span class="lineno"> 6754</span> }</div><div class="line"><a name="l06755"></a><span class="lineno"> 6755</span> </div><div class="line"><a name="l06756"></a><span class="lineno"> 6756</span> <span class="comment">/*</span></div><div class="line"><a name="l06757"></a><span class="lineno"> 6757</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06758"></a><span class="lineno"> 6758</span> <span class="comment"> * WIN32OLE_METHOD#invoke_kind</span></div><div class="line"><a name="l06759"></a><span class="lineno"> 6759</span> <span class="comment"> *</span></div><div class="line"><a name="l06760"></a><span class="lineno"> 6760</span> <span class="comment"> * Returns the method kind string. The string is "UNKNOWN" or "PROPERTY"</span></div><div class="line"><a name="l06761"></a><span class="lineno"> 6761</span> <span class="comment"> * or "PROPERTY" or "PROPERTYGET" or "PROPERTYPUT" or "PROPERTYPPUTREF"</span></div><div class="line"><a name="l06762"></a><span class="lineno"> 6762</span> <span class="comment"> * or "FUNC".</span></div><div class="line"><a name="l06763"></a><span class="lineno"> 6763</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbooks')</span></div><div class="line"><a name="l06764"></a><span class="lineno"> 6764</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Add')</span></div><div class="line"><a name="l06765"></a><span class="lineno"> 6765</span> <span class="comment"> * puts method.invoke_kind # => "FUNC"</span></div><div class="line"><a name="l06766"></a><span class="lineno"> 6766</span> <span class="comment"> */</span></div><div class="line"><a name="l06767"></a><span class="lineno"> 6767</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06768"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a0faf86c7524111112f60229f8da59d14"> 6768</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a0faf86c7524111112f60229f8da59d14">folemethod_invoke_kind</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06769"></a><span class="lineno"> 6769</span> {</div><div class="line"><a name="l06770"></a><span class="lineno"> 6770</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06771"></a><span class="lineno"> 6771</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l06772"></a><span class="lineno"> 6772</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a51487ccbc2afad1399d12fcf846949a7">ole_method_invoke_kind</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l06773"></a><span class="lineno"> 6773</span> }</div><div class="line"><a name="l06774"></a><span class="lineno"> 6774</span> </div><div class="line"><a name="l06775"></a><span class="lineno"> 6775</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06776"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa6977439cb75f72440c305fd1e49ef28"> 6776</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa6977439cb75f72440c305fd1e49ef28">ole_method_visible</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l06777"></a><span class="lineno"> 6777</span> {</div><div class="line"><a name="l06778"></a><span class="lineno"> 6778</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l06779"></a><span class="lineno"> 6779</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06780"></a><span class="lineno"> 6780</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> visible;</div><div class="line"><a name="l06781"></a><span class="lineno"> 6781</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l06782"></a><span class="lineno"> 6782</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l06783"></a><span class="lineno"> 6783</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l06784"></a><span class="lineno"> 6784</span>  <span class="keywordflow">if</span> (pFuncDesc->wFuncFlags & (FUNCFLAG_FRESTRICTED |</div><div class="line"><a name="l06785"></a><span class="lineno"> 6785</span>  FUNCFLAG_FHIDDEN |</div><div class="line"><a name="l06786"></a><span class="lineno"> 6786</span>  FUNCFLAG_FNONBROWSABLE)) {</div><div class="line"><a name="l06787"></a><span class="lineno"> 6787</span>  visible = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l06788"></a><span class="lineno"> 6788</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l06789"></a><span class="lineno"> 6789</span>  visible = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l06790"></a><span class="lineno"> 6790</span>  }</div><div class="line"><a name="l06791"></a><span class="lineno"> 6791</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l06792"></a><span class="lineno"> 6792</span>  <span class="keywordflow">return</span> visible;</div><div class="line"><a name="l06793"></a><span class="lineno"> 6793</span> }</div><div class="line"><a name="l06794"></a><span class="lineno"> 6794</span> </div><div class="line"><a name="l06795"></a><span class="lineno"> 6795</span> <span class="comment">/*</span></div><div class="line"><a name="l06796"></a><span class="lineno"> 6796</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06797"></a><span class="lineno"> 6797</span> <span class="comment"> * WIN32OLE_METHOD#visible?</span></div><div class="line"><a name="l06798"></a><span class="lineno"> 6798</span> <span class="comment"> *</span></div><div class="line"><a name="l06799"></a><span class="lineno"> 6799</span> <span class="comment"> * Returns true if the method is public.</span></div><div class="line"><a name="l06800"></a><span class="lineno"> 6800</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbooks')</span></div><div class="line"><a name="l06801"></a><span class="lineno"> 6801</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Add')</span></div><div class="line"><a name="l06802"></a><span class="lineno"> 6802</span> <span class="comment"> * puts method.visible? # => true</span></div><div class="line"><a name="l06803"></a><span class="lineno"> 6803</span> <span class="comment"> */</span></div><div class="line"><a name="l06804"></a><span class="lineno"> 6804</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06805"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2f15f8ec2d25451fb0a2d74f0f2a1b7f"> 6805</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2f15f8ec2d25451fb0a2d74f0f2a1b7f">folemethod_visible</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06806"></a><span class="lineno"> 6806</span> {</div><div class="line"><a name="l06807"></a><span class="lineno"> 6807</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06808"></a><span class="lineno"> 6808</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l06809"></a><span class="lineno"> 6809</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa6977439cb75f72440c305fd1e49ef28">ole_method_visible</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l06810"></a><span class="lineno"> 6810</span> }</div><div class="line"><a name="l06811"></a><span class="lineno"> 6811</span> </div><div class="line"><a name="l06812"></a><span class="lineno"> 6812</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06813"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a456f7cf14bf360940a0ab80340a30a5c"> 6813</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a456f7cf14bf360940a0ab80340a30a5c">ole_method_event</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d3/dda/proc_8c.html#abc4c96af7623d1ba9cc053d18639621e">method_name</a>)</div><div class="line"><a name="l06814"></a><span class="lineno"> 6814</span> {</div><div class="line"><a name="l06815"></a><span class="lineno"> 6815</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l06816"></a><span class="lineno"> 6816</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06817"></a><span class="lineno"> 6817</span>  WORD <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l06818"></a><span class="lineno"> 6818</span>  <span class="keywordtype">int</span> flags;</div><div class="line"><a name="l06819"></a><span class="lineno"> 6819</span>  HREFTYPE href;</div><div class="line"><a name="l06820"></a><span class="lineno"> 6820</span>  ITypeInfo *pRefTypeInfo;</div><div class="line"><a name="l06821"></a><span class="lineno"> 6821</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l06822"></a><span class="lineno"> 6822</span>  BSTR bstr;</div><div class="line"><a name="l06823"></a><span class="lineno"> 6823</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>;</div><div class="line"><a name="l06824"></a><span class="lineno"> 6824</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">event</span> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l06825"></a><span class="lineno"> 6825</span> </div><div class="line"><a name="l06826"></a><span class="lineno"> 6826</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, &pTypeAttr);</div><div class="line"><a name="l06827"></a><span class="lineno"> 6827</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06828"></a><span class="lineno"> 6828</span>  <span class="keywordflow">return</span> event;</div><div class="line"><a name="l06829"></a><span class="lineno"> 6829</span>  <span class="keywordflow">if</span>(pTypeAttr->typekind != TKIND_COCLASS) {</div><div class="line"><a name="l06830"></a><span class="lineno"> 6830</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseTypeAttr(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l06831"></a><span class="lineno"> 6831</span>  <span class="keywordflow">return</span> event;</div><div class="line"><a name="l06832"></a><span class="lineno"> 6832</span>  }</div><div class="line"><a name="l06833"></a><span class="lineno"> 6833</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < pTypeAttr->cImplTypes; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l06834"></a><span class="lineno"> 6834</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetImplTypeFlags(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &flags);</div><div class="line"><a name="l06835"></a><span class="lineno"> 6835</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06836"></a><span class="lineno"> 6836</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l06837"></a><span class="lineno"> 6837</span> </div><div class="line"><a name="l06838"></a><span class="lineno"> 6838</span>  <span class="keywordflow">if</span> (flags & IMPLTYPEFLAG_FSOURCE) {</div><div class="line"><a name="l06839"></a><span class="lineno"> 6839</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetRefTypeOfImplType(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>,</div><div class="line"><a name="l06840"></a><span class="lineno"> 6840</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &href);</div><div class="line"><a name="l06841"></a><span class="lineno"> 6841</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06842"></a><span class="lineno"> 6842</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l06843"></a><span class="lineno"> 6843</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetRefTypeInfo(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>,</div><div class="line"><a name="l06844"></a><span class="lineno"> 6844</span>  href, &pRefTypeInfo);</div><div class="line"><a name="l06845"></a><span class="lineno"> 6845</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06846"></a><span class="lineno"> 6846</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l06847"></a><span class="lineno"> 6847</span>  hr = pRefTypeInfo->lpVtbl->GetFuncDesc(pRefTypeInfo, method_index,</div><div class="line"><a name="l06848"></a><span class="lineno"> 6848</span>  &pFuncDesc);</div><div class="line"><a name="l06849"></a><span class="lineno"> 6849</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l06850"></a><span class="lineno"> 6850</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pRefTypeInfo);</div><div class="line"><a name="l06851"></a><span class="lineno"> 6851</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l06852"></a><span class="lineno"> 6852</span>  }</div><div class="line"><a name="l06853"></a><span class="lineno"> 6853</span> </div><div class="line"><a name="l06854"></a><span class="lineno"> 6854</span>  hr = pRefTypeInfo->lpVtbl->GetDocumentation(pRefTypeInfo,</div><div class="line"><a name="l06855"></a><span class="lineno"> 6855</span>  pFuncDesc->memid,</div><div class="line"><a name="l06856"></a><span class="lineno"> 6856</span>  &bstr, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l06857"></a><span class="lineno"> 6857</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l06858"></a><span class="lineno"> 6858</span>  pRefTypeInfo->lpVtbl->ReleaseFuncDesc(pRefTypeInfo, pFuncDesc);</div><div class="line"><a name="l06859"></a><span class="lineno"> 6859</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pRefTypeInfo);</div><div class="line"><a name="l06860"></a><span class="lineno"> 6860</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l06861"></a><span class="lineno"> 6861</span>  }</div><div class="line"><a name="l06862"></a><span class="lineno"> 6862</span> </div><div class="line"><a name="l06863"></a><span class="lineno"> 6863</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr);</div><div class="line"><a name="l06864"></a><span class="lineno"> 6864</span>  pRefTypeInfo->lpVtbl->ReleaseFuncDesc(pRefTypeInfo, pFuncDesc);</div><div class="line"><a name="l06865"></a><span class="lineno"> 6865</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pRefTypeInfo);</div><div class="line"><a name="l06866"></a><span class="lineno"> 6866</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#aabbf48d0162ce9a462b13b71ccf683a5">rb_str_cmp</a>(<a class="code" href="../../d3/dda/proc_8c.html#abc4c96af7623d1ba9cc053d18639621e">method_name</a>, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>) == 0) {</div><div class="line"><a name="l06867"></a><span class="lineno"> 6867</span>  <span class="keyword">event</span> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l06868"></a><span class="lineno"> 6868</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l06869"></a><span class="lineno"> 6869</span>  }</div><div class="line"><a name="l06870"></a><span class="lineno"> 6870</span>  }</div><div class="line"><a name="l06871"></a><span class="lineno"> 6871</span>  }</div><div class="line"><a name="l06872"></a><span class="lineno"> 6872</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pTypeAttr);</div><div class="line"><a name="l06873"></a><span class="lineno"> 6873</span>  <span class="keywordflow">return</span> event;</div><div class="line"><a name="l06874"></a><span class="lineno"> 6874</span> }</div><div class="line"><a name="l06875"></a><span class="lineno"> 6875</span> </div><div class="line"><a name="l06876"></a><span class="lineno"> 6876</span> <span class="comment">/*</span></div><div class="line"><a name="l06877"></a><span class="lineno"> 6877</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06878"></a><span class="lineno"> 6878</span> <span class="comment"> * WIN32OLE_METHOD#event?</span></div><div class="line"><a name="l06879"></a><span class="lineno"> 6879</span> <span class="comment"> *</span></div><div class="line"><a name="l06880"></a><span class="lineno"> 6880</span> <span class="comment"> * Returns true if the method is event.</span></div><div class="line"><a name="l06881"></a><span class="lineno"> 6881</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l06882"></a><span class="lineno"> 6882</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SheetActivate')</span></div><div class="line"><a name="l06883"></a><span class="lineno"> 6883</span> <span class="comment"> * puts method.event? # => true</span></div><div class="line"><a name="l06884"></a><span class="lineno"> 6884</span> <span class="comment"> *</span></div><div class="line"><a name="l06885"></a><span class="lineno"> 6885</span> <span class="comment"> */</span></div><div class="line"><a name="l06886"></a><span class="lineno"> 6886</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06887"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aaa3aba20914a6077714e3aec036c162b"> 6887</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aaa3aba20914a6077714e3aec036c162b">folemethod_event</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06888"></a><span class="lineno"> 6888</span> {</div><div class="line"><a name="l06889"></a><span class="lineno"> 6889</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06890"></a><span class="lineno"> 6890</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l06891"></a><span class="lineno"> 6891</span>  <span class="keywordflow">if</span> (!pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c">pOwnerTypeInfo</a>)</div><div class="line"><a name="l06892"></a><span class="lineno"> 6892</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l06893"></a><span class="lineno"> 6893</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a456f7cf14bf360940a0ab80340a30a5c">ole_method_event</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c">pOwnerTypeInfo</a>,</div><div class="line"><a name="l06894"></a><span class="lineno"> 6894</span>  pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>,</div><div class="line"><a name="l06895"></a><span class="lineno"> 6895</span>  <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>)));</div><div class="line"><a name="l06896"></a><span class="lineno"> 6896</span> }</div><div class="line"><a name="l06897"></a><span class="lineno"> 6897</span> </div><div class="line"><a name="l06898"></a><span class="lineno"> 6898</span> <span class="comment">/*</span></div><div class="line"><a name="l06899"></a><span class="lineno"> 6899</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06900"></a><span class="lineno"> 6900</span> <span class="comment"> * WIN32OLE_METHOD#event_interface</span></div><div class="line"><a name="l06901"></a><span class="lineno"> 6901</span> <span class="comment"> *</span></div><div class="line"><a name="l06902"></a><span class="lineno"> 6902</span> <span class="comment"> * Returns event interface name if the method is event.</span></div><div class="line"><a name="l06903"></a><span class="lineno"> 6903</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l06904"></a><span class="lineno"> 6904</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SheetActivate')</span></div><div class="line"><a name="l06905"></a><span class="lineno"> 6905</span> <span class="comment"> * puts method.event_interface # => WorkbookEvents</span></div><div class="line"><a name="l06906"></a><span class="lineno"> 6906</span> <span class="comment"> */</span></div><div class="line"><a name="l06907"></a><span class="lineno"> 6907</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06908"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae54179477459ef72c2885549ff5e40e6"> 6908</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ae54179477459ef72c2885549ff5e40e6">folemethod_event_interface</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06909"></a><span class="lineno"> 6909</span> {</div><div class="line"><a name="l06910"></a><span class="lineno"> 6910</span>  BSTR <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>;</div><div class="line"><a name="l06911"></a><span class="lineno"> 6911</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06912"></a><span class="lineno"> 6912</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06913"></a><span class="lineno"> 6913</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l06914"></a><span class="lineno"> 6914</span>  <span class="keywordflow">if</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#aaa3aba20914a6077714e3aec036c162b">folemethod_event</a>(<span class="keyword">self</span>) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>) {</div><div class="line"><a name="l06915"></a><span class="lineno"> 6915</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#abb98c7449dc683552d93e0ab76a4d8ee">ole_docinfo_from_type</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, &<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l06916"></a><span class="lineno"> 6916</span>  <span class="keywordflow">if</span>(SUCCEEDED(hr))</div><div class="line"><a name="l06917"></a><span class="lineno"> 6917</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>);</div><div class="line"><a name="l06918"></a><span class="lineno"> 6918</span>  }</div><div class="line"><a name="l06919"></a><span class="lineno"> 6919</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06920"></a><span class="lineno"> 6920</span> }</div><div class="line"><a name="l06921"></a><span class="lineno"> 6921</span> </div><div class="line"><a name="l06922"></a><span class="lineno"> 6922</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06923"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#add636780fc2c908c73df7810de7f2ec3"> 6923</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#add636780fc2c908c73df7810de7f2ec3">ole_method_docinfo_from_type</a>(</div><div class="line"><a name="l06924"></a><span class="lineno"> 6924</span>  ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>,</div><div class="line"><a name="l06925"></a><span class="lineno"> 6925</span>  UINT method_index,</div><div class="line"><a name="l06926"></a><span class="lineno"> 6926</span>  BSTR *<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>,</div><div class="line"><a name="l06927"></a><span class="lineno"> 6927</span>  BSTR *helpstr,</div><div class="line"><a name="l06928"></a><span class="lineno"> 6928</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> *helpcontext,</div><div class="line"><a name="l06929"></a><span class="lineno"> 6929</span>  BSTR *helpfile</div><div class="line"><a name="l06930"></a><span class="lineno"> 6930</span>  )</div><div class="line"><a name="l06931"></a><span class="lineno"> 6931</span> {</div><div class="line"><a name="l06932"></a><span class="lineno"> 6932</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l06933"></a><span class="lineno"> 6933</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06934"></a><span class="lineno"> 6934</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l06935"></a><span class="lineno"> 6935</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06936"></a><span class="lineno"> 6936</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l06937"></a><span class="lineno"> 6937</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetDocumentation(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc->memid,</div><div class="line"><a name="l06938"></a><span class="lineno"> 6938</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a>, helpstr,</div><div class="line"><a name="l06939"></a><span class="lineno"> 6939</span>  helpcontext, helpfile);</div><div class="line"><a name="l06940"></a><span class="lineno"> 6940</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l06941"></a><span class="lineno"> 6941</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l06942"></a><span class="lineno"> 6942</span> }</div><div class="line"><a name="l06943"></a><span class="lineno"> 6943</span> </div><div class="line"><a name="l06944"></a><span class="lineno"> 6944</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06945"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac55a53518c2466ce34726828649d10bc"> 6945</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac55a53518c2466ce34726828649d10bc">ole_method_helpstring</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l06946"></a><span class="lineno"> 6946</span> {</div><div class="line"><a name="l06947"></a><span class="lineno"> 6947</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06948"></a><span class="lineno"> 6948</span>  BSTR bhelpstring;</div><div class="line"><a name="l06949"></a><span class="lineno"> 6949</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#add636780fc2c908c73df7810de7f2ec3">ole_method_docinfo_from_type</a>(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &bhelpstring,</div><div class="line"><a name="l06950"></a><span class="lineno"> 6950</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l06951"></a><span class="lineno"> 6951</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06952"></a><span class="lineno"> 6952</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06953"></a><span class="lineno"> 6953</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bhelpstring);</div><div class="line"><a name="l06954"></a><span class="lineno"> 6954</span> }</div><div class="line"><a name="l06955"></a><span class="lineno"> 6955</span> </div><div class="line"><a name="l06956"></a><span class="lineno"> 6956</span> <span class="comment">/*</span></div><div class="line"><a name="l06957"></a><span class="lineno"> 6957</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06958"></a><span class="lineno"> 6958</span> <span class="comment"> * WIN32OLE_METHOD#helpstring</span></div><div class="line"><a name="l06959"></a><span class="lineno"> 6959</span> <span class="comment"> *</span></div><div class="line"><a name="l06960"></a><span class="lineno"> 6960</span> <span class="comment"> * Returns help string of OLE method. If the help string is not found,</span></div><div class="line"><a name="l06961"></a><span class="lineno"> 6961</span> <span class="comment"> * then the method returns nil.</span></div><div class="line"><a name="l06962"></a><span class="lineno"> 6962</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Internet Controls', 'IWebBrowser')</span></div><div class="line"><a name="l06963"></a><span class="lineno"> 6963</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Navigate')</span></div><div class="line"><a name="l06964"></a><span class="lineno"> 6964</span> <span class="comment"> * puts method.helpstring # => Navigates to a URL or file.</span></div><div class="line"><a name="l06965"></a><span class="lineno"> 6965</span> <span class="comment"> *</span></div><div class="line"><a name="l06966"></a><span class="lineno"> 6966</span> <span class="comment"> */</span></div><div class="line"><a name="l06967"></a><span class="lineno"> 6967</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06968"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af476ba7b3bb2b432ef6e7e772ec7a6f8"> 6968</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#af476ba7b3bb2b432ef6e7e772ec7a6f8">folemethod_helpstring</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06969"></a><span class="lineno"> 6969</span> {</div><div class="line"><a name="l06970"></a><span class="lineno"> 6970</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l06971"></a><span class="lineno"> 6971</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l06972"></a><span class="lineno"> 6972</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac55a53518c2466ce34726828649d10bc">ole_method_helpstring</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l06973"></a><span class="lineno"> 6973</span> }</div><div class="line"><a name="l06974"></a><span class="lineno"> 6974</span> </div><div class="line"><a name="l06975"></a><span class="lineno"> 6975</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06976"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a09549d1a72c129044395c7ae8e97e2fd"> 6976</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a09549d1a72c129044395c7ae8e97e2fd">ole_method_helpfile</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l06977"></a><span class="lineno"> 6977</span> {</div><div class="line"><a name="l06978"></a><span class="lineno"> 6978</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l06979"></a><span class="lineno"> 6979</span>  BSTR bhelpfile;</div><div class="line"><a name="l06980"></a><span class="lineno"> 6980</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#add636780fc2c908c73df7810de7f2ec3">ole_method_docinfo_from_type</a>(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>,</div><div class="line"><a name="l06981"></a><span class="lineno"> 6981</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, &bhelpfile);</div><div class="line"><a name="l06982"></a><span class="lineno"> 6982</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l06983"></a><span class="lineno"> 6983</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l06984"></a><span class="lineno"> 6984</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bhelpfile);</div><div class="line"><a name="l06985"></a><span class="lineno"> 6985</span> }</div><div class="line"><a name="l06986"></a><span class="lineno"> 6986</span> </div><div class="line"><a name="l06987"></a><span class="lineno"> 6987</span> <span class="comment">/*</span></div><div class="line"><a name="l06988"></a><span class="lineno"> 6988</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l06989"></a><span class="lineno"> 6989</span> <span class="comment"> * WIN32OLE_METHOD#helpfile</span></div><div class="line"><a name="l06990"></a><span class="lineno"> 6990</span> <span class="comment"> *</span></div><div class="line"><a name="l06991"></a><span class="lineno"> 6991</span> <span class="comment"> * Returns help file. If help file is not found, then</span></div><div class="line"><a name="l06992"></a><span class="lineno"> 6992</span> <span class="comment"> * the method returns nil.</span></div><div class="line"><a name="l06993"></a><span class="lineno"> 6993</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbooks')</span></div><div class="line"><a name="l06994"></a><span class="lineno"> 6994</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Add')</span></div><div class="line"><a name="l06995"></a><span class="lineno"> 6995</span> <span class="comment"> * puts method.helpfile # => C:\...\VBAXL9.CHM</span></div><div class="line"><a name="l06996"></a><span class="lineno"> 6996</span> <span class="comment"> */</span></div><div class="line"><a name="l06997"></a><span class="lineno"> 6997</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l06998"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6f9ef6641c628823181498337f6d8db5"> 6998</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6f9ef6641c628823181498337f6d8db5">folemethod_helpfile</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l06999"></a><span class="lineno"> 6999</span> {</div><div class="line"><a name="l07000"></a><span class="lineno"> 7000</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l07001"></a><span class="lineno"> 7001</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l07002"></a><span class="lineno"> 7002</span> </div><div class="line"><a name="l07003"></a><span class="lineno"> 7003</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a09549d1a72c129044395c7ae8e97e2fd">ole_method_helpfile</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l07004"></a><span class="lineno"> 7004</span> }</div><div class="line"><a name="l07005"></a><span class="lineno"> 7005</span> </div><div class="line"><a name="l07006"></a><span class="lineno"> 7006</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07007"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a39508fb2e2d971ed2197b2df7e282e29"> 7007</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a39508fb2e2d971ed2197b2df7e282e29">ole_method_helpcontext</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l07008"></a><span class="lineno"> 7008</span> {</div><div class="line"><a name="l07009"></a><span class="lineno"> 7009</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07010"></a><span class="lineno"> 7010</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> helpcontext = 0;</div><div class="line"><a name="l07011"></a><span class="lineno"> 7011</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#add636780fc2c908c73df7810de7f2ec3">ole_method_docinfo_from_type</a>(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>,</div><div class="line"><a name="l07012"></a><span class="lineno"> 7012</span>  &helpcontext, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l07013"></a><span class="lineno"> 7013</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07014"></a><span class="lineno"> 7014</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07015"></a><span class="lineno"> 7015</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(helpcontext);</div><div class="line"><a name="l07016"></a><span class="lineno"> 7016</span> }</div><div class="line"><a name="l07017"></a><span class="lineno"> 7017</span> </div><div class="line"><a name="l07018"></a><span class="lineno"> 7018</span> <span class="comment">/*</span></div><div class="line"><a name="l07019"></a><span class="lineno"> 7019</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07020"></a><span class="lineno"> 7020</span> <span class="comment"> * WIN32OLE_METHOD#helpcontext</span></div><div class="line"><a name="l07021"></a><span class="lineno"> 7021</span> <span class="comment"> *</span></div><div class="line"><a name="l07022"></a><span class="lineno"> 7022</span> <span class="comment"> * Returns help context.</span></div><div class="line"><a name="l07023"></a><span class="lineno"> 7023</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbooks')</span></div><div class="line"><a name="l07024"></a><span class="lineno"> 7024</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Add')</span></div><div class="line"><a name="l07025"></a><span class="lineno"> 7025</span> <span class="comment"> * puts method.helpcontext # => 65717</span></div><div class="line"><a name="l07026"></a><span class="lineno"> 7026</span> <span class="comment"> */</span></div><div class="line"><a name="l07027"></a><span class="lineno"> 7027</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07028"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afacb5c1ecde95354cfd6a6be1415c5b8"> 7028</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#afacb5c1ecde95354cfd6a6be1415c5b8">folemethod_helpcontext</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07029"></a><span class="lineno"> 7029</span> {</div><div class="line"><a name="l07030"></a><span class="lineno"> 7030</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l07031"></a><span class="lineno"> 7031</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l07032"></a><span class="lineno"> 7032</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a39508fb2e2d971ed2197b2df7e282e29">ole_method_helpcontext</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l07033"></a><span class="lineno"> 7033</span> }</div><div class="line"><a name="l07034"></a><span class="lineno"> 7034</span> </div><div class="line"><a name="l07035"></a><span class="lineno"> 7035</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07036"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5e173ea2107da10dde0bf63b92f32ec2"> 7036</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5e173ea2107da10dde0bf63b92f32ec2">ole_method_dispid</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l07037"></a><span class="lineno"> 7037</span> {</div><div class="line"><a name="l07038"></a><span class="lineno"> 7038</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l07039"></a><span class="lineno"> 7039</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07040"></a><span class="lineno"> 7040</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> dispid = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07041"></a><span class="lineno"> 7041</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l07042"></a><span class="lineno"> 7042</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07043"></a><span class="lineno"> 7043</span>  <span class="keywordflow">return</span> dispid;</div><div class="line"><a name="l07044"></a><span class="lineno"> 7044</span>  dispid = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a>(pFuncDesc->memid);</div><div class="line"><a name="l07045"></a><span class="lineno"> 7045</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07046"></a><span class="lineno"> 7046</span>  <span class="keywordflow">return</span> dispid;</div><div class="line"><a name="l07047"></a><span class="lineno"> 7047</span> }</div><div class="line"><a name="l07048"></a><span class="lineno"> 7048</span> </div><div class="line"><a name="l07049"></a><span class="lineno"> 7049</span> <span class="comment">/*</span></div><div class="line"><a name="l07050"></a><span class="lineno"> 7050</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07051"></a><span class="lineno"> 7051</span> <span class="comment"> * WIN32OLE_METHOD#dispid</span></div><div class="line"><a name="l07052"></a><span class="lineno"> 7052</span> <span class="comment"> *</span></div><div class="line"><a name="l07053"></a><span class="lineno"> 7053</span> <span class="comment"> * Returns dispatch ID.</span></div><div class="line"><a name="l07054"></a><span class="lineno"> 7054</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbooks')</span></div><div class="line"><a name="l07055"></a><span class="lineno"> 7055</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Add')</span></div><div class="line"><a name="l07056"></a><span class="lineno"> 7056</span> <span class="comment"> * puts method.dispid # => 181</span></div><div class="line"><a name="l07057"></a><span class="lineno"> 7057</span> <span class="comment"> */</span></div><div class="line"><a name="l07058"></a><span class="lineno"> 7058</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07059"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a48e776cb94d0c16741489a9c9450a398"> 7059</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a48e776cb94d0c16741489a9c9450a398">folemethod_dispid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07060"></a><span class="lineno"> 7060</span> {</div><div class="line"><a name="l07061"></a><span class="lineno"> 7061</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l07062"></a><span class="lineno"> 7062</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l07063"></a><span class="lineno"> 7063</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5e173ea2107da10dde0bf63b92f32ec2">ole_method_dispid</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l07064"></a><span class="lineno"> 7064</span> }</div><div class="line"><a name="l07065"></a><span class="lineno"> 7065</span> </div><div class="line"><a name="l07066"></a><span class="lineno"> 7066</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07067"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af66ca3fc604e4bfb7cfc7c5513826c25"> 7067</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#af66ca3fc604e4bfb7cfc7c5513826c25">ole_method_offset_vtbl</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l07068"></a><span class="lineno"> 7068</span> {</div><div class="line"><a name="l07069"></a><span class="lineno"> 7069</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l07070"></a><span class="lineno"> 7070</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07071"></a><span class="lineno"> 7071</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> offset_vtbl = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07072"></a><span class="lineno"> 7072</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l07073"></a><span class="lineno"> 7073</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07074"></a><span class="lineno"> 7074</span>  <span class="keywordflow">return</span> offset_vtbl;</div><div class="line"><a name="l07075"></a><span class="lineno"> 7075</span>  offset_vtbl = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(pFuncDesc->oVft);</div><div class="line"><a name="l07076"></a><span class="lineno"> 7076</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07077"></a><span class="lineno"> 7077</span>  <span class="keywordflow">return</span> offset_vtbl;</div><div class="line"><a name="l07078"></a><span class="lineno"> 7078</span> }</div><div class="line"><a name="l07079"></a><span class="lineno"> 7079</span> </div><div class="line"><a name="l07080"></a><span class="lineno"> 7080</span> <span class="comment">/*</span></div><div class="line"><a name="l07081"></a><span class="lineno"> 7081</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07082"></a><span class="lineno"> 7082</span> <span class="comment"> * WIN32OLE_METHOD#offset_vtbl</span></div><div class="line"><a name="l07083"></a><span class="lineno"> 7083</span> <span class="comment"> *</span></div><div class="line"><a name="l07084"></a><span class="lineno"> 7084</span> <span class="comment"> * Returns the offset ov VTBL.</span></div><div class="line"><a name="l07085"></a><span class="lineno"> 7085</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbooks')</span></div><div class="line"><a name="l07086"></a><span class="lineno"> 7086</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'Add')</span></div><div class="line"><a name="l07087"></a><span class="lineno"> 7087</span> <span class="comment"> * puts method.offset_vtbl # => 40</span></div><div class="line"><a name="l07088"></a><span class="lineno"> 7088</span> <span class="comment"> */</span></div><div class="line"><a name="l07089"></a><span class="lineno"> 7089</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07090"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab72c16ea0e701d5685275b1a9aed1585"> 7090</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab72c16ea0e701d5685275b1a9aed1585">folemethod_offset_vtbl</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07091"></a><span class="lineno"> 7091</span> {</div><div class="line"><a name="l07092"></a><span class="lineno"> 7092</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l07093"></a><span class="lineno"> 7093</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l07094"></a><span class="lineno"> 7094</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#af66ca3fc604e4bfb7cfc7c5513826c25">ole_method_offset_vtbl</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l07095"></a><span class="lineno"> 7095</span> }</div><div class="line"><a name="l07096"></a><span class="lineno"> 7096</span> </div><div class="line"><a name="l07097"></a><span class="lineno"> 7097</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07098"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab23a842ced22241faa160ec00ae03eea"> 7098</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab23a842ced22241faa160ec00ae03eea">ole_method_size_params</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l07099"></a><span class="lineno"> 7099</span> {</div><div class="line"><a name="l07100"></a><span class="lineno"> 7100</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l07101"></a><span class="lineno"> 7101</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07102"></a><span class="lineno"> 7102</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> size_params = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07103"></a><span class="lineno"> 7103</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l07104"></a><span class="lineno"> 7104</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07105"></a><span class="lineno"> 7105</span>  <span class="keywordflow">return</span> size_params;</div><div class="line"><a name="l07106"></a><span class="lineno"> 7106</span>  size_params = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(pFuncDesc->cParams);</div><div class="line"><a name="l07107"></a><span class="lineno"> 7107</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07108"></a><span class="lineno"> 7108</span>  <span class="keywordflow">return</span> size_params;</div><div class="line"><a name="l07109"></a><span class="lineno"> 7109</span> }</div><div class="line"><a name="l07110"></a><span class="lineno"> 7110</span> </div><div class="line"><a name="l07111"></a><span class="lineno"> 7111</span> <span class="comment">/*</span></div><div class="line"><a name="l07112"></a><span class="lineno"> 7112</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07113"></a><span class="lineno"> 7113</span> <span class="comment"> * WIN32OLE_METHOD#size_params</span></div><div class="line"><a name="l07114"></a><span class="lineno"> 7114</span> <span class="comment"> *</span></div><div class="line"><a name="l07115"></a><span class="lineno"> 7115</span> <span class="comment"> * Returns the size of arguments of the method.</span></div><div class="line"><a name="l07116"></a><span class="lineno"> 7116</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l07117"></a><span class="lineno"> 7117</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SaveAs')</span></div><div class="line"><a name="l07118"></a><span class="lineno"> 7118</span> <span class="comment"> * puts method.size_params # => 11</span></div><div class="line"><a name="l07119"></a><span class="lineno"> 7119</span> <span class="comment"> *</span></div><div class="line"><a name="l07120"></a><span class="lineno"> 7120</span> <span class="comment"> */</span></div><div class="line"><a name="l07121"></a><span class="lineno"> 7121</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07122"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3aca3c33d649f21caec07ab0fac207ae"> 7122</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3aca3c33d649f21caec07ab0fac207ae">folemethod_size_params</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07123"></a><span class="lineno"> 7123</span> {</div><div class="line"><a name="l07124"></a><span class="lineno"> 7124</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l07125"></a><span class="lineno"> 7125</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l07126"></a><span class="lineno"> 7126</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab23a842ced22241faa160ec00ae03eea">ole_method_size_params</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l07127"></a><span class="lineno"> 7127</span> }</div><div class="line"><a name="l07128"></a><span class="lineno"> 7128</span> </div><div class="line"><a name="l07129"></a><span class="lineno"> 7129</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07130"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a17949113bb77a6cf53c1efe7bdc878b6"> 7130</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a17949113bb77a6cf53c1efe7bdc878b6">ole_method_size_opt_params</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l07131"></a><span class="lineno"> 7131</span> {</div><div class="line"><a name="l07132"></a><span class="lineno"> 7132</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l07133"></a><span class="lineno"> 7133</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07134"></a><span class="lineno"> 7134</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> size_opt_params = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07135"></a><span class="lineno"> 7135</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l07136"></a><span class="lineno"> 7136</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07137"></a><span class="lineno"> 7137</span>  <span class="keywordflow">return</span> size_opt_params;</div><div class="line"><a name="l07138"></a><span class="lineno"> 7138</span>  size_opt_params = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(pFuncDesc->cParamsOpt);</div><div class="line"><a name="l07139"></a><span class="lineno"> 7139</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07140"></a><span class="lineno"> 7140</span>  <span class="keywordflow">return</span> size_opt_params;</div><div class="line"><a name="l07141"></a><span class="lineno"> 7141</span> }</div><div class="line"><a name="l07142"></a><span class="lineno"> 7142</span> </div><div class="line"><a name="l07143"></a><span class="lineno"> 7143</span> <span class="comment">/*</span></div><div class="line"><a name="l07144"></a><span class="lineno"> 7144</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07145"></a><span class="lineno"> 7145</span> <span class="comment"> * WIN32OLE_METHOD#size_opt_params</span></div><div class="line"><a name="l07146"></a><span class="lineno"> 7146</span> <span class="comment"> *</span></div><div class="line"><a name="l07147"></a><span class="lineno"> 7147</span> <span class="comment"> * Returns the size of optional parameters.</span></div><div class="line"><a name="l07148"></a><span class="lineno"> 7148</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l07149"></a><span class="lineno"> 7149</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SaveAs')</span></div><div class="line"><a name="l07150"></a><span class="lineno"> 7150</span> <span class="comment"> * puts method.size_opt_params # => 4</span></div><div class="line"><a name="l07151"></a><span class="lineno"> 7151</span> <span class="comment"> */</span></div><div class="line"><a name="l07152"></a><span class="lineno"> 7152</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07153"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af36a9f22dfbb15239480f833541fb2d6"> 7153</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#af36a9f22dfbb15239480f833541fb2d6">folemethod_size_opt_params</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07154"></a><span class="lineno"> 7154</span> {</div><div class="line"><a name="l07155"></a><span class="lineno"> 7155</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l07156"></a><span class="lineno"> 7156</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l07157"></a><span class="lineno"> 7157</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a17949113bb77a6cf53c1efe7bdc878b6">ole_method_size_opt_params</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l07158"></a><span class="lineno"> 7158</span> }</div><div class="line"><a name="l07159"></a><span class="lineno"> 7159</span> </div><div class="line"><a name="l07160"></a><span class="lineno"> 7160</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07161"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1bc1f046c48db0bdb1d581731ddfd2f8"> 7161</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bc1f046c48db0bdb1d581731ddfd2f8">ole_method_params</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index)</div><div class="line"><a name="l07162"></a><span class="lineno"> 7162</span> {</div><div class="line"><a name="l07163"></a><span class="lineno"> 7163</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l07164"></a><span class="lineno"> 7164</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07165"></a><span class="lineno"> 7165</span>  BSTR *bstrs;</div><div class="line"><a name="l07166"></a><span class="lineno"> 7166</span>  UINT len, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l07167"></a><span class="lineno"> 7167</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pparam;</div><div class="line"><a name="l07168"></a><span class="lineno"> 7168</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> param;</div><div class="line"><a name="l07169"></a><span class="lineno"> 7169</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> params = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l07170"></a><span class="lineno"> 7170</span>  hr = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>, &pFuncDesc);</div><div class="line"><a name="l07171"></a><span class="lineno"> 7171</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07172"></a><span class="lineno"> 7172</span>  <span class="keywordflow">return</span> params;</div><div class="line"><a name="l07173"></a><span class="lineno"> 7173</span> </div><div class="line"><a name="l07174"></a><span class="lineno"> 7174</span>  len = 0;</div><div class="line"><a name="l07175"></a><span class="lineno"> 7175</span>  bstrs = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(BSTR, pFuncDesc->cParams + 1);</div><div class="line"><a name="l07176"></a><span class="lineno"> 7176</span>  hr = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->GetNames(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pFuncDesc->memid,</div><div class="line"><a name="l07177"></a><span class="lineno"> 7177</span>  bstrs, pFuncDesc->cParams + 1,</div><div class="line"><a name="l07178"></a><span class="lineno"> 7178</span>  &len);</div><div class="line"><a name="l07179"></a><span class="lineno"> 7179</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l07180"></a><span class="lineno"> 7180</span>  <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07181"></a><span class="lineno"> 7181</span>  <span class="keywordflow">return</span> params;</div><div class="line"><a name="l07182"></a><span class="lineno"> 7182</span>  }</div><div class="line"><a name="l07183"></a><span class="lineno"> 7183</span>  SysFreeString(bstrs[0]);</div><div class="line"><a name="l07184"></a><span class="lineno"> 7184</span>  <span class="keywordflow">if</span> (pFuncDesc->cParams > 0) {</div><div class="line"><a name="l07185"></a><span class="lineno"> 7185</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 1; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < len; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l07186"></a><span class="lineno"> 7186</span>  param = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad80ce51081780f829134de0338821b76">Data_Make_Struct</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a>, 0,</div><div class="line"><a name="l07187"></a><span class="lineno"> 7187</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aa619ede67812e724cc5e198f7790a9dd">oleparam_free</a>, pparam);</div><div class="line"><a name="l07188"></a><span class="lineno"> 7188</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a> = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>;</div><div class="line"><a name="l07189"></a><span class="lineno"> 7189</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5">OLE_ADDREF</a>(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>);</div><div class="line"><a name="l07190"></a><span class="lineno"> 7190</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a> = <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>;</div><div class="line"><a name="l07191"></a><span class="lineno"> 7191</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> - 1;</div><div class="line"><a name="l07192"></a><span class="lineno"> 7192</span>  <a class="code" href="../../db/d2e/intern_8h.html#acee88ad0375c8a9080e2283db494d257">rb_ivar_set</a>(param, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>), <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstrs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]));</div><div class="line"><a name="l07193"></a><span class="lineno"> 7193</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(params, param);</div><div class="line"><a name="l07194"></a><span class="lineno"> 7194</span>  }</div><div class="line"><a name="l07195"></a><span class="lineno"> 7195</span>  }</div><div class="line"><a name="l07196"></a><span class="lineno"> 7196</span>  <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07197"></a><span class="lineno"> 7197</span>  <span class="keywordflow">return</span> params;</div><div class="line"><a name="l07198"></a><span class="lineno"> 7198</span> }</div><div class="line"><a name="l07199"></a><span class="lineno"> 7199</span> </div><div class="line"><a name="l07200"></a><span class="lineno"> 7200</span> </div><div class="line"><a name="l07201"></a><span class="lineno"> 7201</span> <span class="comment">/*</span></div><div class="line"><a name="l07202"></a><span class="lineno"> 7202</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07203"></a><span class="lineno"> 7203</span> <span class="comment"> * WIN32OLE_METHOD#params</span></div><div class="line"><a name="l07204"></a><span class="lineno"> 7204</span> <span class="comment"> *</span></div><div class="line"><a name="l07205"></a><span class="lineno"> 7205</span> <span class="comment"> * returns array of WIN32OLE_PARAM object corresponding with method parameters.</span></div><div class="line"><a name="l07206"></a><span class="lineno"> 7206</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l07207"></a><span class="lineno"> 7207</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SaveAs')</span></div><div class="line"><a name="l07208"></a><span class="lineno"> 7208</span> <span class="comment"> * p method.params # => [Filename, FileFormat, Password, WriteResPassword,</span></div><div class="line"><a name="l07209"></a><span class="lineno"> 7209</span> <span class="comment"> * ReadOnlyRecommended, CreateBackup, AccessMode,</span></div><div class="line"><a name="l07210"></a><span class="lineno"> 7210</span> <span class="comment"> * ConflictResolution, AddToMru, TextCodepage,</span></div><div class="line"><a name="l07211"></a><span class="lineno"> 7211</span> <span class="comment"> * TextVisualLayout]</span></div><div class="line"><a name="l07212"></a><span class="lineno"> 7212</span> <span class="comment"> */</span></div><div class="line"><a name="l07213"></a><span class="lineno"> 7213</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07214"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac95137c8f13aece1fc5c9e6480062b68"> 7214</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac95137c8f13aece1fc5c9e6480062b68">folemethod_params</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07215"></a><span class="lineno"> 7215</span> {</div><div class="line"><a name="l07216"></a><span class="lineno"> 7216</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l07217"></a><span class="lineno"> 7217</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l07218"></a><span class="lineno"> 7218</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bc1f046c48db0bdb1d581731ddfd2f8">ole_method_params</a>(pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>);</div><div class="line"><a name="l07219"></a><span class="lineno"> 7219</span> }</div><div class="line"><a name="l07220"></a><span class="lineno"> 7220</span> </div><div class="line"><a name="l07221"></a><span class="lineno"> 7221</span> <span class="comment">/*</span></div><div class="line"><a name="l07222"></a><span class="lineno"> 7222</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07223"></a><span class="lineno"> 7223</span> <span class="comment"> * WIN32OLE_METHOD#inspect -> String</span></div><div class="line"><a name="l07224"></a><span class="lineno"> 7224</span> <span class="comment"> *</span></div><div class="line"><a name="l07225"></a><span class="lineno"> 7225</span> <span class="comment"> * Returns the method name with class name.</span></div><div class="line"><a name="l07226"></a><span class="lineno"> 7226</span> <span class="comment"> *</span></div><div class="line"><a name="l07227"></a><span class="lineno"> 7227</span> <span class="comment"> */</span></div><div class="line"><a name="l07228"></a><span class="lineno"> 7228</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07229"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6946f44fe8fd3dc52c25b9138ce1329f"> 7229</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6946f44fe8fd3dc52c25b9138ce1329f">folemethod_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07230"></a><span class="lineno"> 7230</span> {</div><div class="line"><a name="l07231"></a><span class="lineno"> 7231</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1da595a8d1f22377435d6bd4fa5150d1">default_inspect</a>(<span class="keyword">self</span>, <span class="stringliteral">"WIN32OLE_METHOD"</span>);</div><div class="line"><a name="l07232"></a><span class="lineno"> 7232</span> }</div><div class="line"><a name="l07233"></a><span class="lineno"> 7233</span> </div><div class="line"><a name="l07234"></a><span class="lineno"> 7234</span> <span class="comment">/*</span></div><div class="line"><a name="l07235"></a><span class="lineno"> 7235</span> <span class="comment"> * Document-class: WIN32OLE_PARAM</span></div><div class="line"><a name="l07236"></a><span class="lineno"> 7236</span> <span class="comment"> *</span></div><div class="line"><a name="l07237"></a><span class="lineno"> 7237</span> <span class="comment"> * <code>WIN32OLE_PARAM</code> objects represent param information of</span></div><div class="line"><a name="l07238"></a><span class="lineno"> 7238</span> <span class="comment"> * the OLE method.</span></div><div class="line"><a name="l07239"></a><span class="lineno"> 7239</span> <span class="comment"> */</span></div><div class="line"><a name="l07240"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ada8d032e43fda83f47fc1dc5d67b7e42"> 7240</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ada8d032e43fda83f47fc1dc5d67b7e42">foleparam_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass)</div><div class="line"><a name="l07241"></a><span class="lineno"> 7241</span> {</div><div class="line"><a name="l07242"></a><span class="lineno"> 7242</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pparam;</div><div class="line"><a name="l07243"></a><span class="lineno"> 7243</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj;</div><div class="line"><a name="l07244"></a><span class="lineno"> 7244</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad80ce51081780f829134de0338821b76">Data_Make_Struct</a>(klass,</div><div class="line"><a name="l07245"></a><span class="lineno"> 7245</span>  <span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a>,</div><div class="line"><a name="l07246"></a><span class="lineno"> 7246</span>  0, <a class="code" href="../../d2/d99/win32ole_8c.html#aa619ede67812e724cc5e198f7790a9dd">oleparam_free</a>, pparam);</div><div class="line"><a name="l07247"></a><span class="lineno"> 7247</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l07248"></a><span class="lineno"> 7248</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a> = 0;</div><div class="line"><a name="l07249"></a><span class="lineno"> 7249</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a> = 0;</div><div class="line"><a name="l07250"></a><span class="lineno"> 7250</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l07251"></a><span class="lineno"> 7251</span> }</div><div class="line"><a name="l07252"></a><span class="lineno"> 7252</span> </div><div class="line"><a name="l07253"></a><span class="lineno"> 7253</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07254"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab9a7923050876f53298475fba0ad03af"> 7254</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab9a7923050876f53298475fba0ad03af">oleparam_ole_param_from_index</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, ITypeInfo *<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, UINT <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>, <span class="keywordtype">int</span> param_index)</div><div class="line"><a name="l07255"></a><span class="lineno"> 7255</span> {</div><div class="line"><a name="l07256"></a><span class="lineno"> 7256</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l07257"></a><span class="lineno"> 7257</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07258"></a><span class="lineno"> 7258</span>  BSTR *bstrs;</div><div class="line"><a name="l07259"></a><span class="lineno"> 7259</span>  UINT len;</div><div class="line"><a name="l07260"></a><span class="lineno"> 7260</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pparam;</div><div class="line"><a name="l07261"></a><span class="lineno"> 7261</span>  hr = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>, &pFuncDesc);</div><div class="line"><a name="l07262"></a><span class="lineno"> 7262</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07263"></a><span class="lineno"> 7263</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"fail to ITypeInfo::GetFuncDesc"</span>);</div><div class="line"><a name="l07264"></a><span class="lineno"> 7264</span> </div><div class="line"><a name="l07265"></a><span class="lineno"> 7265</span>  len = 0;</div><div class="line"><a name="l07266"></a><span class="lineno"> 7266</span>  bstrs = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(BSTR, pFuncDesc->cParams + 1);</div><div class="line"><a name="l07267"></a><span class="lineno"> 7267</span>  hr = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->GetNames(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pFuncDesc->memid,</div><div class="line"><a name="l07268"></a><span class="lineno"> 7268</span>  bstrs, pFuncDesc->cParams + 1,</div><div class="line"><a name="l07269"></a><span class="lineno"> 7269</span>  &len);</div><div class="line"><a name="l07270"></a><span class="lineno"> 7270</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l07271"></a><span class="lineno"> 7271</span>  <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07272"></a><span class="lineno"> 7272</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"fail to ITypeInfo::GetNames"</span>);</div><div class="line"><a name="l07273"></a><span class="lineno"> 7273</span>  }</div><div class="line"><a name="l07274"></a><span class="lineno"> 7274</span>  SysFreeString(bstrs[0]);</div><div class="line"><a name="l07275"></a><span class="lineno"> 7275</span>  <span class="keywordflow">if</span> (param_index < 1 || len <= (UINT)param_index)</div><div class="line"><a name="l07276"></a><span class="lineno"> 7276</span>  {</div><div class="line"><a name="l07277"></a><span class="lineno"> 7277</span>  <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07278"></a><span class="lineno"> 7278</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ac80019ce275be87f28c42761abe460ee">rb_eIndexError</a>, <span class="stringliteral">"index of param must be in 1..%d"</span>, len);</div><div class="line"><a name="l07279"></a><span class="lineno"> 7279</span>  }</div><div class="line"><a name="l07280"></a><span class="lineno"> 7280</span> </div><div class="line"><a name="l07281"></a><span class="lineno"> 7281</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a>, pparam);</div><div class="line"><a name="l07282"></a><span class="lineno"> 7282</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a> = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>;</div><div class="line"><a name="l07283"></a><span class="lineno"> 7283</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5">OLE_ADDREF</a>(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>);</div><div class="line"><a name="l07284"></a><span class="lineno"> 7284</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a> = <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>;</div><div class="line"><a name="l07285"></a><span class="lineno"> 7285</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a> = param_index - 1;</div><div class="line"><a name="l07286"></a><span class="lineno"> 7286</span>  <a class="code" href="../../db/d2e/intern_8h.html#acee88ad0375c8a9080e2283db494d257">rb_ivar_set</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>), <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstrs[param_index]));</div><div class="line"><a name="l07287"></a><span class="lineno"> 7287</span> </div><div class="line"><a name="l07288"></a><span class="lineno"> 7288</span>  <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07289"></a><span class="lineno"> 7289</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l07290"></a><span class="lineno"> 7290</span> }</div><div class="line"><a name="l07291"></a><span class="lineno"> 7291</span> </div><div class="line"><a name="l07292"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6f774f9af58d93389160a187b06f4f38"> 7292</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a6f774f9af58d93389160a187b06f4f38">oleparam_ole_param</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> olemethod, <span class="keywordtype">int</span> n)</div><div class="line"><a name="l07293"></a><span class="lineno"> 7293</span> {</div><div class="line"><a name="l07294"></a><span class="lineno"> 7294</span>  <span class="keyword">struct </span><a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a> *pmethod;</div><div class="line"><a name="l07295"></a><span class="lineno"> 7295</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(olemethod, <span class="keyword">struct</span> <a class="code" href="../../d4/df4/structolemethoddata.html">olemethoddata</a>, pmethod);</div><div class="line"><a name="l07296"></a><span class="lineno"> 7296</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab9a7923050876f53298475fba0ad03af">oleparam_ole_param_from_index</a>(<span class="keyword">self</span>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pmethod-><a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>, n);</div><div class="line"><a name="l07297"></a><span class="lineno"> 7297</span> }</div><div class="line"><a name="l07298"></a><span class="lineno"> 7298</span> </div><div class="line"><a name="l07299"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a28a014fe0e5748d97ce5df5aca42ae00"> 7299</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a28a014fe0e5748d97ce5df5aca42ae00">foleparam_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> olemethod, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> n)</div><div class="line"><a name="l07300"></a><span class="lineno"> 7300</span> {</div><div class="line"><a name="l07301"></a><span class="lineno"> 7301</span>  <span class="keywordtype">int</span> idx;</div><div class="line"><a name="l07302"></a><span class="lineno"> 7302</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(olemethod, <a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>)) {</div><div class="line"><a name="l07303"></a><span class="lineno"> 7303</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"1st parameter must be WIN32OLE_METHOD object"</span>);</div><div class="line"><a name="l07304"></a><span class="lineno"> 7304</span>  }</div><div class="line"><a name="l07305"></a><span class="lineno"> 7305</span>  idx = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(n);</div><div class="line"><a name="l07306"></a><span class="lineno"> 7306</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6f774f9af58d93389160a187b06f4f38">oleparam_ole_param</a>(<span class="keyword">self</span>, olemethod, idx);</div><div class="line"><a name="l07307"></a><span class="lineno"> 7307</span> }</div><div class="line"><a name="l07308"></a><span class="lineno"> 7308</span> </div><div class="line"><a name="l07309"></a><span class="lineno"> 7309</span> <span class="comment">/*</span></div><div class="line"><a name="l07310"></a><span class="lineno"> 7310</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07311"></a><span class="lineno"> 7311</span> <span class="comment"> * WIN32OLE_PARAM#name</span></div><div class="line"><a name="l07312"></a><span class="lineno"> 7312</span> <span class="comment"> *</span></div><div class="line"><a name="l07313"></a><span class="lineno"> 7313</span> <span class="comment"> * Returns name.</span></div><div class="line"><a name="l07314"></a><span class="lineno"> 7314</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l07315"></a><span class="lineno"> 7315</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SaveAs')</span></div><div class="line"><a name="l07316"></a><span class="lineno"> 7316</span> <span class="comment"> * param1 = method.params[0]</span></div><div class="line"><a name="l07317"></a><span class="lineno"> 7317</span> <span class="comment"> * puts param1.name # => Filename</span></div><div class="line"><a name="l07318"></a><span class="lineno"> 7318</span> <span class="comment"> */</span></div><div class="line"><a name="l07319"></a><span class="lineno"> 7319</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07320"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aaf29c43a083c4cb50d8e2e24bdde16b6"> 7320</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aaf29c43a083c4cb50d8e2e24bdde16b6">foleparam_name</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07321"></a><span class="lineno"> 7321</span> {</div><div class="line"><a name="l07322"></a><span class="lineno"> 7322</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"name"</span>));</div><div class="line"><a name="l07323"></a><span class="lineno"> 7323</span> }</div><div class="line"><a name="l07324"></a><span class="lineno"> 7324</span> </div><div class="line"><a name="l07325"></a><span class="lineno"> 7325</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07326"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a71135dca3dcc348b7732333f34ef4bf3"> 7326</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a71135dca3dcc348b7732333f34ef4bf3">ole_param_ole_type</a>(ITypeInfo *<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, UINT method_index, UINT <a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>)</div><div class="line"><a name="l07327"></a><span class="lineno"> 7327</span> {</div><div class="line"><a name="l07328"></a><span class="lineno"> 7328</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l07329"></a><span class="lineno"> 7329</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07330"></a><span class="lineno"> 7330</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"unknown type"</span>);</div><div class="line"><a name="l07331"></a><span class="lineno"> 7331</span>  hr = <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, method_index, &pFuncDesc);</div><div class="line"><a name="l07332"></a><span class="lineno"> 7332</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07333"></a><span class="lineno"> 7333</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l07334"></a><span class="lineno"> 7334</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a>(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>,</div><div class="line"><a name="l07335"></a><span class="lineno"> 7335</span>  &(pFuncDesc->lprgelemdescParam[<a class="code" href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">index</a>].tdesc), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>);</div><div class="line"><a name="l07336"></a><span class="lineno"> 7336</span>  <a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07337"></a><span class="lineno"> 7337</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l07338"></a><span class="lineno"> 7338</span> }</div><div class="line"><a name="l07339"></a><span class="lineno"> 7339</span> </div><div class="line"><a name="l07340"></a><span class="lineno"> 7340</span> <span class="comment">/*</span></div><div class="line"><a name="l07341"></a><span class="lineno"> 7341</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07342"></a><span class="lineno"> 7342</span> <span class="comment"> * WIN32OLE_PARAM#ole_type</span></div><div class="line"><a name="l07343"></a><span class="lineno"> 7343</span> <span class="comment"> *</span></div><div class="line"><a name="l07344"></a><span class="lineno"> 7344</span> <span class="comment"> * Returns OLE type of WIN32OLE_PARAM object(parameter of OLE method).</span></div><div class="line"><a name="l07345"></a><span class="lineno"> 7345</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l07346"></a><span class="lineno"> 7346</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SaveAs')</span></div><div class="line"><a name="l07347"></a><span class="lineno"> 7347</span> <span class="comment"> * param1 = method.params[0]</span></div><div class="line"><a name="l07348"></a><span class="lineno"> 7348</span> <span class="comment"> * puts param1.ole_type # => VARIANT</span></div><div class="line"><a name="l07349"></a><span class="lineno"> 7349</span> <span class="comment"> */</span></div><div class="line"><a name="l07350"></a><span class="lineno"> 7350</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07351"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1d906af605a6180e2e90b662b1932879"> 7351</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1d906af605a6180e2e90b662b1932879">foleparam_ole_type</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07352"></a><span class="lineno"> 7352</span> {</div><div class="line"><a name="l07353"></a><span class="lineno"> 7353</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pparam;</div><div class="line"><a name="l07354"></a><span class="lineno"> 7354</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a>, pparam);</div><div class="line"><a name="l07355"></a><span class="lineno"> 7355</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a71135dca3dcc348b7732333f34ef4bf3">ole_param_ole_type</a>(pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>,</div><div class="line"><a name="l07356"></a><span class="lineno"> 7356</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>);</div><div class="line"><a name="l07357"></a><span class="lineno"> 7357</span> }</div><div class="line"><a name="l07358"></a><span class="lineno"> 7358</span> </div><div class="line"><a name="l07359"></a><span class="lineno"> 7359</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07360"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6df154c28f729fc7a4fd0f817798fac3"> 7360</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6df154c28f729fc7a4fd0f817798fac3">ole_param_ole_type_detail</a>(ITypeInfo *<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, UINT <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>, UINT <a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>)</div><div class="line"><a name="l07361"></a><span class="lineno"> 7361</span> {</div><div class="line"><a name="l07362"></a><span class="lineno"> 7362</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l07363"></a><span class="lineno"> 7363</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07364"></a><span class="lineno"> 7364</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> typedetail = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l07365"></a><span class="lineno"> 7365</span>  hr = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>, &pFuncDesc);</div><div class="line"><a name="l07366"></a><span class="lineno"> 7366</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07367"></a><span class="lineno"> 7367</span>  <span class="keywordflow">return</span> typedetail;</div><div class="line"><a name="l07368"></a><span class="lineno"> 7368</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a>(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>,</div><div class="line"><a name="l07369"></a><span class="lineno"> 7369</span>  &(pFuncDesc->lprgelemdescParam[<a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>].tdesc), typedetail);</div><div class="line"><a name="l07370"></a><span class="lineno"> 7370</span>  <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07371"></a><span class="lineno"> 7371</span>  <span class="keywordflow">return</span> typedetail;</div><div class="line"><a name="l07372"></a><span class="lineno"> 7372</span> }</div><div class="line"><a name="l07373"></a><span class="lineno"> 7373</span> </div><div class="line"><a name="l07374"></a><span class="lineno"> 7374</span> <span class="comment">/*</span></div><div class="line"><a name="l07375"></a><span class="lineno"> 7375</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07376"></a><span class="lineno"> 7376</span> <span class="comment"> * WIN32OLE_PARAM#ole_type_detail</span></div><div class="line"><a name="l07377"></a><span class="lineno"> 7377</span> <span class="comment"> *</span></div><div class="line"><a name="l07378"></a><span class="lineno"> 7378</span> <span class="comment"> * Returns detail information of type of argument.</span></div><div class="line"><a name="l07379"></a><span class="lineno"> 7379</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'IWorksheetFunction')</span></div><div class="line"><a name="l07380"></a><span class="lineno"> 7380</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SumIf')</span></div><div class="line"><a name="l07381"></a><span class="lineno"> 7381</span> <span class="comment"> * param1 = method.params[0]</span></div><div class="line"><a name="l07382"></a><span class="lineno"> 7382</span> <span class="comment"> * p param1.ole_type_detail # => ["PTR", "USERDEFINED", "Range"]</span></div><div class="line"><a name="l07383"></a><span class="lineno"> 7383</span> <span class="comment"> */</span></div><div class="line"><a name="l07384"></a><span class="lineno"> 7384</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07385"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5d3bde90e102b667d712389285c5d200"> 7385</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5d3bde90e102b667d712389285c5d200">foleparam_ole_type_detail</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07386"></a><span class="lineno"> 7386</span> {</div><div class="line"><a name="l07387"></a><span class="lineno"> 7387</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pparam;</div><div class="line"><a name="l07388"></a><span class="lineno"> 7388</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a>, pparam);</div><div class="line"><a name="l07389"></a><span class="lineno"> 7389</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6df154c28f729fc7a4fd0f817798fac3">ole_param_ole_type_detail</a>(pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>,</div><div class="line"><a name="l07390"></a><span class="lineno"> 7390</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>);</div><div class="line"><a name="l07391"></a><span class="lineno"> 7391</span> }</div><div class="line"><a name="l07392"></a><span class="lineno"> 7392</span> </div><div class="line"><a name="l07393"></a><span class="lineno"> 7393</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07394"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a4bf6dbe617bdbaa7cb3af5b84d8b89da"> 7394</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4bf6dbe617bdbaa7cb3af5b84d8b89da">ole_param_flag_mask</a>(ITypeInfo *<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, UINT <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>, UINT <a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>, USHORT mask)</div><div class="line"><a name="l07395"></a><span class="lineno"> 7395</span> {</div><div class="line"><a name="l07396"></a><span class="lineno"> 7396</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l07397"></a><span class="lineno"> 7397</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07398"></a><span class="lineno"> 7398</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ret = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l07399"></a><span class="lineno"> 7399</span>  hr = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>, &pFuncDesc);</div><div class="line"><a name="l07400"></a><span class="lineno"> 7400</span>  <span class="keywordflow">if</span>(FAILED(hr))</div><div class="line"><a name="l07401"></a><span class="lineno"> 7401</span>  <span class="keywordflow">return</span> ret;</div><div class="line"><a name="l07402"></a><span class="lineno"> 7402</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#ac921f4ad75c62ef506c5d282bc39eb26">V_UNION1</a>((&(pFuncDesc->lprgelemdescParam[<a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>])), paramdesc).wParamFlags &mask)</div><div class="line"><a name="l07403"></a><span class="lineno"> 7403</span>  ret = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>;</div><div class="line"><a name="l07404"></a><span class="lineno"> 7404</span>  <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07405"></a><span class="lineno"> 7405</span>  <span class="keywordflow">return</span> ret;</div><div class="line"><a name="l07406"></a><span class="lineno"> 7406</span> }</div><div class="line"><a name="l07407"></a><span class="lineno"> 7407</span> </div><div class="line"><a name="l07408"></a><span class="lineno"> 7408</span> <span class="comment">/*</span></div><div class="line"><a name="l07409"></a><span class="lineno"> 7409</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07410"></a><span class="lineno"> 7410</span> <span class="comment"> * WIN32OLE_PARAM#input?</span></div><div class="line"><a name="l07411"></a><span class="lineno"> 7411</span> <span class="comment"> *</span></div><div class="line"><a name="l07412"></a><span class="lineno"> 7412</span> <span class="comment"> * Returns true if the parameter is input.</span></div><div class="line"><a name="l07413"></a><span class="lineno"> 7413</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l07414"></a><span class="lineno"> 7414</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SaveAs')</span></div><div class="line"><a name="l07415"></a><span class="lineno"> 7415</span> <span class="comment"> * param1 = method.params[0]</span></div><div class="line"><a name="l07416"></a><span class="lineno"> 7416</span> <span class="comment"> * puts param1.input? # => true</span></div><div class="line"><a name="l07417"></a><span class="lineno"> 7417</span> <span class="comment"> */</span></div><div class="line"><a name="l07418"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af7bc1b360651a48a8b08d6baaee78905"> 7418</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af7bc1b360651a48a8b08d6baaee78905">foleparam_input</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07419"></a><span class="lineno"> 7419</span> {</div><div class="line"><a name="l07420"></a><span class="lineno"> 7420</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pparam;</div><div class="line"><a name="l07421"></a><span class="lineno"> 7421</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a>, pparam);</div><div class="line"><a name="l07422"></a><span class="lineno"> 7422</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4bf6dbe617bdbaa7cb3af5b84d8b89da">ole_param_flag_mask</a>(pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>,</div><div class="line"><a name="l07423"></a><span class="lineno"> 7423</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>, PARAMFLAG_FIN);</div><div class="line"><a name="l07424"></a><span class="lineno"> 7424</span> }</div><div class="line"><a name="l07425"></a><span class="lineno"> 7425</span> </div><div class="line"><a name="l07426"></a><span class="lineno"> 7426</span> <span class="comment">/*</span></div><div class="line"><a name="l07427"></a><span class="lineno"> 7427</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07428"></a><span class="lineno"> 7428</span> <span class="comment"> * WIN32OLE#output?</span></div><div class="line"><a name="l07429"></a><span class="lineno"> 7429</span> <span class="comment"> *</span></div><div class="line"><a name="l07430"></a><span class="lineno"> 7430</span> <span class="comment"> * Returns true if argument is output.</span></div><div class="line"><a name="l07431"></a><span class="lineno"> 7431</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Internet Controls', 'DWebBrowserEvents')</span></div><div class="line"><a name="l07432"></a><span class="lineno"> 7432</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'NewWindow')</span></div><div class="line"><a name="l07433"></a><span class="lineno"> 7433</span> <span class="comment"> * method.params.each do |param|</span></div><div class="line"><a name="l07434"></a><span class="lineno"> 7434</span> <span class="comment"> * puts "#{param.name} #{param.output?}"</span></div><div class="line"><a name="l07435"></a><span class="lineno"> 7435</span> <span class="comment"> * end</span></div><div class="line"><a name="l07436"></a><span class="lineno"> 7436</span> <span class="comment"> *</span></div><div class="line"><a name="l07437"></a><span class="lineno"> 7437</span> <span class="comment"> * The result of above script is following:</span></div><div class="line"><a name="l07438"></a><span class="lineno"> 7438</span> <span class="comment"> * URL false</span></div><div class="line"><a name="l07439"></a><span class="lineno"> 7439</span> <span class="comment"> * Flags false</span></div><div class="line"><a name="l07440"></a><span class="lineno"> 7440</span> <span class="comment"> * TargetFrameName false</span></div><div class="line"><a name="l07441"></a><span class="lineno"> 7441</span> <span class="comment"> * PostData false</span></div><div class="line"><a name="l07442"></a><span class="lineno"> 7442</span> <span class="comment"> * Headers false</span></div><div class="line"><a name="l07443"></a><span class="lineno"> 7443</span> <span class="comment"> * Processed true</span></div><div class="line"><a name="l07444"></a><span class="lineno"> 7444</span> <span class="comment"> */</span></div><div class="line"><a name="l07445"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#af263844f08ace69c092c8ab5a0839892"> 7445</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#af263844f08ace69c092c8ab5a0839892">foleparam_output</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07446"></a><span class="lineno"> 7446</span> {</div><div class="line"><a name="l07447"></a><span class="lineno"> 7447</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pparam;</div><div class="line"><a name="l07448"></a><span class="lineno"> 7448</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a>, pparam);</div><div class="line"><a name="l07449"></a><span class="lineno"> 7449</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4bf6dbe617bdbaa7cb3af5b84d8b89da">ole_param_flag_mask</a>(pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>,</div><div class="line"><a name="l07450"></a><span class="lineno"> 7450</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>, PARAMFLAG_FOUT);</div><div class="line"><a name="l07451"></a><span class="lineno"> 7451</span> }</div><div class="line"><a name="l07452"></a><span class="lineno"> 7452</span> </div><div class="line"><a name="l07453"></a><span class="lineno"> 7453</span> <span class="comment">/*</span></div><div class="line"><a name="l07454"></a><span class="lineno"> 7454</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07455"></a><span class="lineno"> 7455</span> <span class="comment"> * WIN32OLE_PARAM#optional?</span></div><div class="line"><a name="l07456"></a><span class="lineno"> 7456</span> <span class="comment"> *</span></div><div class="line"><a name="l07457"></a><span class="lineno"> 7457</span> <span class="comment"> * Returns true if argument is optional.</span></div><div class="line"><a name="l07458"></a><span class="lineno"> 7458</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l07459"></a><span class="lineno"> 7459</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SaveAs')</span></div><div class="line"><a name="l07460"></a><span class="lineno"> 7460</span> <span class="comment"> * param1 = method.params[0]</span></div><div class="line"><a name="l07461"></a><span class="lineno"> 7461</span> <span class="comment"> * puts "#{param1.name} #{param1.optional?}" # => Filename true</span></div><div class="line"><a name="l07462"></a><span class="lineno"> 7462</span> <span class="comment"> */</span></div><div class="line"><a name="l07463"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a4c2d586120bd8d98112b6be60e4f8294"> 7463</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a4c2d586120bd8d98112b6be60e4f8294">foleparam_optional</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07464"></a><span class="lineno"> 7464</span> {</div><div class="line"><a name="l07465"></a><span class="lineno"> 7465</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pparam;</div><div class="line"><a name="l07466"></a><span class="lineno"> 7466</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a>, pparam);</div><div class="line"><a name="l07467"></a><span class="lineno"> 7467</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4bf6dbe617bdbaa7cb3af5b84d8b89da">ole_param_flag_mask</a>(pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>,</div><div class="line"><a name="l07468"></a><span class="lineno"> 7468</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>, PARAMFLAG_FOPT);</div><div class="line"><a name="l07469"></a><span class="lineno"> 7469</span> }</div><div class="line"><a name="l07470"></a><span class="lineno"> 7470</span> </div><div class="line"><a name="l07471"></a><span class="lineno"> 7471</span> <span class="comment">/*</span></div><div class="line"><a name="l07472"></a><span class="lineno"> 7472</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07473"></a><span class="lineno"> 7473</span> <span class="comment"> * WIN32OLE_PARAM#retval?</span></div><div class="line"><a name="l07474"></a><span class="lineno"> 7474</span> <span class="comment"> *</span></div><div class="line"><a name="l07475"></a><span class="lineno"> 7475</span> <span class="comment"> * Returns true if argument is return value.</span></div><div class="line"><a name="l07476"></a><span class="lineno"> 7476</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('DirectX 7 for Visual Basic Type Library',</span></div><div class="line"><a name="l07477"></a><span class="lineno"> 7477</span> <span class="comment"> * 'DirectPlayLobbyConnection')</span></div><div class="line"><a name="l07478"></a><span class="lineno"> 7478</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'GetPlayerShortName')</span></div><div class="line"><a name="l07479"></a><span class="lineno"> 7479</span> <span class="comment"> * param = method.params[0]</span></div><div class="line"><a name="l07480"></a><span class="lineno"> 7480</span> <span class="comment"> * puts "#{param.name} #{param.retval?}" # => name true</span></div><div class="line"><a name="l07481"></a><span class="lineno"> 7481</span> <span class="comment"> */</span></div><div class="line"><a name="l07482"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac6ec24a19ac346216e24b0033d8bd202"> 7482</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac6ec24a19ac346216e24b0033d8bd202">foleparam_retval</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07483"></a><span class="lineno"> 7483</span> {</div><div class="line"><a name="l07484"></a><span class="lineno"> 7484</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pparam;</div><div class="line"><a name="l07485"></a><span class="lineno"> 7485</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a>, pparam);</div><div class="line"><a name="l07486"></a><span class="lineno"> 7486</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4bf6dbe617bdbaa7cb3af5b84d8b89da">ole_param_flag_mask</a>(pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>,</div><div class="line"><a name="l07487"></a><span class="lineno"> 7487</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>, PARAMFLAG_FRETVAL);</div><div class="line"><a name="l07488"></a><span class="lineno"> 7488</span> }</div><div class="line"><a name="l07489"></a><span class="lineno"> 7489</span> </div><div class="line"><a name="l07490"></a><span class="lineno"> 7490</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07491"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a63f5b3e6a1512326da04e41b6b0e5b78"> 7491</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a63f5b3e6a1512326da04e41b6b0e5b78">ole_param_default</a>(ITypeInfo *<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, UINT <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>, UINT <a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>)</div><div class="line"><a name="l07492"></a><span class="lineno"> 7492</span> {</div><div class="line"><a name="l07493"></a><span class="lineno"> 7493</span>  FUNCDESC *pFuncDesc;</div><div class="line"><a name="l07494"></a><span class="lineno"> 7494</span>  ELEMDESC *pElemDesc;</div><div class="line"><a name="l07495"></a><span class="lineno"> 7495</span>  PARAMDESCEX * pParamDescEx;</div><div class="line"><a name="l07496"></a><span class="lineno"> 7496</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07497"></a><span class="lineno"> 7497</span>  USHORT wParamFlags;</div><div class="line"><a name="l07498"></a><span class="lineno"> 7498</span>  USHORT mask = PARAMFLAG_FOPT|PARAMFLAG_FHASDEFAULT;</div><div class="line"><a name="l07499"></a><span class="lineno"> 7499</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> defval = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07500"></a><span class="lineno"> 7500</span>  hr = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->GetFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, <a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>, &pFuncDesc);</div><div class="line"><a name="l07501"></a><span class="lineno"> 7501</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07502"></a><span class="lineno"> 7502</span>  <span class="keywordflow">return</span> defval;</div><div class="line"><a name="l07503"></a><span class="lineno"> 7503</span>  pElemDesc = &pFuncDesc->lprgelemdescParam[<a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>];</div><div class="line"><a name="l07504"></a><span class="lineno"> 7504</span>  wParamFlags = <a class="code" href="../../d2/d99/win32ole_8c.html#ac921f4ad75c62ef506c5d282bc39eb26">V_UNION1</a>(pElemDesc, paramdesc).wParamFlags;</div><div class="line"><a name="l07505"></a><span class="lineno"> 7505</span>  <span class="keywordflow">if</span> ((wParamFlags & mask) == mask) {</div><div class="line"><a name="l07506"></a><span class="lineno"> 7506</span>  pParamDescEx = <a class="code" href="../../d2/d99/win32ole_8c.html#ac921f4ad75c62ef506c5d282bc39eb26">V_UNION1</a>(pElemDesc, paramdesc).pparamdescex;</div><div class="line"><a name="l07507"></a><span class="lineno"> 7507</span>  defval = <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(&pParamDescEx->varDefaultValue);</div><div class="line"><a name="l07508"></a><span class="lineno"> 7508</span>  }</div><div class="line"><a name="l07509"></a><span class="lineno"> 7509</span>  <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->ReleaseFuncDesc(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pFuncDesc);</div><div class="line"><a name="l07510"></a><span class="lineno"> 7510</span>  <span class="keywordflow">return</span> defval;</div><div class="line"><a name="l07511"></a><span class="lineno"> 7511</span> }</div><div class="line"><a name="l07512"></a><span class="lineno"> 7512</span> </div><div class="line"><a name="l07513"></a><span class="lineno"> 7513</span> <span class="comment">/*</span></div><div class="line"><a name="l07514"></a><span class="lineno"> 7514</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07515"></a><span class="lineno"> 7515</span> <span class="comment"> * WIN32OLE_PARAM#default</span></div><div class="line"><a name="l07516"></a><span class="lineno"> 7516</span> <span class="comment"> *</span></div><div class="line"><a name="l07517"></a><span class="lineno"> 7517</span> <span class="comment"> * Returns default value. If the default value does not exist,</span></div><div class="line"><a name="l07518"></a><span class="lineno"> 7518</span> <span class="comment"> * this method returns nil.</span></div><div class="line"><a name="l07519"></a><span class="lineno"> 7519</span> <span class="comment"> * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Workbook')</span></div><div class="line"><a name="l07520"></a><span class="lineno"> 7520</span> <span class="comment"> * method = WIN32OLE_METHOD.new(tobj, 'SaveAs')</span></div><div class="line"><a name="l07521"></a><span class="lineno"> 7521</span> <span class="comment"> * method.params.each do |param|</span></div><div class="line"><a name="l07522"></a><span class="lineno"> 7522</span> <span class="comment"> * if param.default</span></div><div class="line"><a name="l07523"></a><span class="lineno"> 7523</span> <span class="comment"> * puts "#{param.name} (= #{param.default})"</span></div><div class="line"><a name="l07524"></a><span class="lineno"> 7524</span> <span class="comment"> * else</span></div><div class="line"><a name="l07525"></a><span class="lineno"> 7525</span> <span class="comment"> * puts "#{param}"</span></div><div class="line"><a name="l07526"></a><span class="lineno"> 7526</span> <span class="comment"> * end</span></div><div class="line"><a name="l07527"></a><span class="lineno"> 7527</span> <span class="comment"> * end</span></div><div class="line"><a name="l07528"></a><span class="lineno"> 7528</span> <span class="comment"> *</span></div><div class="line"><a name="l07529"></a><span class="lineno"> 7529</span> <span class="comment"> * The above script result is following:</span></div><div class="line"><a name="l07530"></a><span class="lineno"> 7530</span> <span class="comment"> * Filename</span></div><div class="line"><a name="l07531"></a><span class="lineno"> 7531</span> <span class="comment"> * FileFormat</span></div><div class="line"><a name="l07532"></a><span class="lineno"> 7532</span> <span class="comment"> * Password</span></div><div class="line"><a name="l07533"></a><span class="lineno"> 7533</span> <span class="comment"> * WriteResPassword</span></div><div class="line"><a name="l07534"></a><span class="lineno"> 7534</span> <span class="comment"> * ReadOnlyRecommended</span></div><div class="line"><a name="l07535"></a><span class="lineno"> 7535</span> <span class="comment"> * CreateBackup</span></div><div class="line"><a name="l07536"></a><span class="lineno"> 7536</span> <span class="comment"> * AccessMode (= 1)</span></div><div class="line"><a name="l07537"></a><span class="lineno"> 7537</span> <span class="comment"> * ConflictResolution</span></div><div class="line"><a name="l07538"></a><span class="lineno"> 7538</span> <span class="comment"> * AddToMru</span></div><div class="line"><a name="l07539"></a><span class="lineno"> 7539</span> <span class="comment"> * TextCodepage</span></div><div class="line"><a name="l07540"></a><span class="lineno"> 7540</span> <span class="comment"> * TextVisualLayout</span></div><div class="line"><a name="l07541"></a><span class="lineno"> 7541</span> <span class="comment"> */</span></div><div class="line"><a name="l07542"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3fd59f1b292db308f516fe025a5cd446"> 7542</a></span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a3fd59f1b292db308f516fe025a5cd446">foleparam_default</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07543"></a><span class="lineno"> 7543</span> {</div><div class="line"><a name="l07544"></a><span class="lineno"> 7544</span>  <span class="keyword">struct </span><a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a> *pparam;</div><div class="line"><a name="l07545"></a><span class="lineno"> 7545</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d6/dda/structoleparamdata.html">oleparamdata</a>, pparam);</div><div class="line"><a name="l07546"></a><span class="lineno"> 7546</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a63f5b3e6a1512326da04e41b6b0e5b78">ole_param_default</a>(pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">method_index</a>,</div><div class="line"><a name="l07547"></a><span class="lineno"> 7547</span>  pparam-><a class="code" href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">index</a>);</div><div class="line"><a name="l07548"></a><span class="lineno"> 7548</span> }</div><div class="line"><a name="l07549"></a><span class="lineno"> 7549</span> </div><div class="line"><a name="l07550"></a><span class="lineno"> 7550</span> <span class="comment">/*</span></div><div class="line"><a name="l07551"></a><span class="lineno"> 7551</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l07552"></a><span class="lineno"> 7552</span> <span class="comment"> * WIN32OLE_PARAM#inspect -> String</span></div><div class="line"><a name="l07553"></a><span class="lineno"> 7553</span> <span class="comment"> *</span></div><div class="line"><a name="l07554"></a><span class="lineno"> 7554</span> <span class="comment"> * Returns the parameter name with class name. If the parameter has default value,</span></div><div class="line"><a name="l07555"></a><span class="lineno"> 7555</span> <span class="comment"> * then returns name=value string with class name.</span></div><div class="line"><a name="l07556"></a><span class="lineno"> 7556</span> <span class="comment"> *</span></div><div class="line"><a name="l07557"></a><span class="lineno"> 7557</span> <span class="comment"> */</span></div><div class="line"><a name="l07558"></a><span class="lineno"> 7558</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07559"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5079f1cd6dbfb8ce2b112d4f4de56970"> 7559</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5079f1cd6dbfb8ce2b112d4f4de56970">foleparam_inspect</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l07560"></a><span class="lineno"> 7560</span> {</div><div class="line"><a name="l07561"></a><span class="lineno"> 7561</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> detail = <a class="code" href="../../d2/d99/win32ole_8c.html#aaf29c43a083c4cb50d8e2e24bdde16b6">foleparam_name</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l07562"></a><span class="lineno"> 7562</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> defval = <a class="code" href="../../d2/d99/win32ole_8c.html#a3fd59f1b292db308f516fe025a5cd446">foleparam_default</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l07563"></a><span class="lineno"> 7563</span>  <span class="keywordflow">if</span> (defval != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l07564"></a><span class="lineno"> 7564</span>  <a class="code" href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a>(detail, <span class="stringliteral">"="</span>);</div><div class="line"><a name="l07565"></a><span class="lineno"> 7565</span>  <a class="code" href="../../db/d2e/intern_8h.html#a2f12f7ad949fa2e6abb64f2311c6e2c5">rb_str_concat</a>(detail, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(defval, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"inspect"</span>), 0));</div><div class="line"><a name="l07566"></a><span class="lineno"> 7566</span>  }</div><div class="line"><a name="l07567"></a><span class="lineno"> 7567</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#afbdc037edc37f16c9ab3e62d5c25f65f">make_inspect</a>(<span class="stringliteral">"WIN32OLE_PARAM"</span>, detail);</div><div class="line"><a name="l07568"></a><span class="lineno"> 7568</span> }</div><div class="line"><a name="l07569"></a><span class="lineno"> 7569</span> </div><div class="line"><a name="l07570"></a><span class="lineno"> 7570</span> <span class="comment">/*</span></div><div class="line"><a name="l07571"></a><span class="lineno"> 7571</span> <span class="comment"> * Document-class: WIN32OLE_EVENT</span></div><div class="line"><a name="l07572"></a><span class="lineno"> 7572</span> <span class="comment"> *</span></div><div class="line"><a name="l07573"></a><span class="lineno"> 7573</span> <span class="comment"> * <code>WIN32OLE_EVENT</code> objects controls OLE event.</span></div><div class="line"><a name="l07574"></a><span class="lineno"> 7574</span> <span class="comment"> */</span></div><div class="line"><a name="l07575"></a><span class="lineno"> 7575</span> </div><div class="line"><a name="l07576"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643"> 7576</a></span> <span class="keyword">static</span> <a class="code" href="../../de/d78/struct_i_event_sink_vtbl.html">IEventSinkVtbl</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643">vtEventSink</a>;</div><div class="line"><a name="l07577"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#afb4c9ed3631f60150e25239a3a1a54e6"> 7577</a></span> <span class="keyword">static</span> BOOL <a class="code" href="../../d2/d99/win32ole_8c.html#afb4c9ed3631f60150e25239a3a1a54e6">g_IsEventSinkVtblInitialized</a> = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l07578"></a><span class="lineno"> 7578</span> </div><div class="line"><a name="l07579"></a><span class="lineno"> 7579</span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a732ceb5b7f7a3b8bb7200da916011cd0">EVENTSINK_Destructor</a>(<a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">PIEVENTSINKOBJ</a>);</div><div class="line"><a name="l07580"></a><span class="lineno"> 7580</span> </div><div class="line"><a name="l07581"></a><span class="lineno"> 7581</span> STDMETHODIMP</div><div class="line"><a name="l07582"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a06ff7e4ccaaa9768e4f0354616191089"> 7582</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a06ff7e4ccaaa9768e4f0354616191089">EVENTSINK_QueryInterface</a>(</div><div class="line"><a name="l07583"></a><span class="lineno"> 7583</span>  <a class="code" href="../../dc/d91/struct_i_event_sink.html">PEVENTSINK</a> pEV,</div><div class="line"><a name="l07584"></a><span class="lineno"> 7584</span>  REFIID iid,</div><div class="line"><a name="l07585"></a><span class="lineno"> 7585</span>  LPVOID* ppv</div><div class="line"><a name="l07586"></a><span class="lineno"> 7586</span>  ) {</div><div class="line"><a name="l07587"></a><span class="lineno"> 7587</span>  <span class="keywordflow">if</span> (IsEqualIID(iid, &IID_IUnknown) ||</div><div class="line"><a name="l07588"></a><span class="lineno"> 7588</span>  IsEqualIID(iid, &IID_IDispatch) ||</div><div class="line"><a name="l07589"></a><span class="lineno"> 7589</span>  IsEqualIID(iid, &((<a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">PIEVENTSINKOBJ</a>)pEV)->m_iid)) {</div><div class="line"><a name="l07590"></a><span class="lineno"> 7590</span>  *ppv = pEV;</div><div class="line"><a name="l07591"></a><span class="lineno"> 7591</span>  }</div><div class="line"><a name="l07592"></a><span class="lineno"> 7592</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l07593"></a><span class="lineno"> 7593</span>  *ppv = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l07594"></a><span class="lineno"> 7594</span>  <span class="keywordflow">return</span> E_NOINTERFACE;</div><div class="line"><a name="l07595"></a><span class="lineno"> 7595</span>  }</div><div class="line"><a name="l07596"></a><span class="lineno"> 7596</span>  ((LPUNKNOWN)*ppv)->lpVtbl->AddRef((LPUNKNOWN)*ppv);</div><div class="line"><a name="l07597"></a><span class="lineno"> 7597</span>  <span class="keywordflow">return</span> NOERROR;</div><div class="line"><a name="l07598"></a><span class="lineno"> 7598</span> }</div><div class="line"><a name="l07599"></a><span class="lineno"> 7599</span> </div><div class="line"><a name="l07600"></a><span class="lineno"> 7600</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a148e50845bce10ef3e8ab273feb2e302">STDMETHODIMP_</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a>)</div><div class="line"><a name="l07601"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1dd26cbc4aafb084763c87e1585eddad"> 7601</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1dd26cbc4aafb084763c87e1585eddad">EVENTSINK_AddRef</a>(</div><div class="line"><a name="l07602"></a><span class="lineno"> 7602</span>  <a class="code" href="../../dc/d91/struct_i_event_sink.html">PEVENTSINK</a> pEV</div><div class="line"><a name="l07603"></a><span class="lineno"> 7603</span>  ){</div><div class="line"><a name="l07604"></a><span class="lineno"> 7604</span>  <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">PIEVENTSINKOBJ</a> pEVObj = (<a class="code" href="../../d2/d99/win32ole_8c.html#af9b956c8687447bdff77fa11bfdeab6c">PIEVENTSINKOBJ</a>)pEV;</div><div class="line"><a name="l07605"></a><span class="lineno"> 7605</span>  <span class="keywordflow">return</span> ++pEVObj-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a22754fa974e76bbc3feb7598c4b58afe">m_cRef</a>;</div><div class="line"><a name="l07606"></a><span class="lineno"> 7606</span> }</div><div class="line"><a name="l07607"></a><span class="lineno"> 7607</span> </div><div class="line"><a name="l07608"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a148e50845bce10ef3e8ab273feb2e302"> 7608</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a148e50845bce10ef3e8ab273feb2e302">STDMETHODIMP_</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a>) EVENTSINK_Release(</div><div class="line"><a name="l07609"></a><span class="lineno"> 7609</span>  <a class="code" href="../../dc/d91/struct_i_event_sink.html">PEVENTSINK</a> pEV</div><div class="line"><a name="l07610"></a><span class="lineno"> 7610</span>  ) {</div><div class="line"><a name="l07611"></a><span class="lineno"> 7611</span>  <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">PIEVENTSINKOBJ</a> pEVObj = (<a class="code" href="../../d2/d99/win32ole_8c.html#af9b956c8687447bdff77fa11bfdeab6c">PIEVENTSINKOBJ</a>)pEV;</div><div class="line"><a name="l07612"></a><span class="lineno"> 7612</span>  --pEVObj-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a22754fa974e76bbc3feb7598c4b58afe">m_cRef</a>;</div><div class="line"><a name="l07613"></a><span class="lineno"> 7613</span>  <span class="keywordflow">if</span>(pEVObj-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a22754fa974e76bbc3feb7598c4b58afe">m_cRef</a> != 0)</div><div class="line"><a name="l07614"></a><span class="lineno"> 7614</span>  <span class="keywordflow">return</span> pEVObj-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a22754fa974e76bbc3feb7598c4b58afe">m_cRef</a>;</div><div class="line"><a name="l07615"></a><span class="lineno"> 7615</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a732ceb5b7f7a3b8bb7200da916011cd0">EVENTSINK_Destructor</a>(pEVObj);</div><div class="line"><a name="l07616"></a><span class="lineno"> 7616</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l07617"></a><span class="lineno"> 7617</span> }</div><div class="line"><a name="l07618"></a><span class="lineno"> 7618</span> </div><div class="line"><a name="l07619"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a8d0dc6164e89f16d8b1acfb5022e41e8"> 7619</a></span> STDMETHODIMP <a class="code" href="../../d2/d99/win32ole_8c.html#a8d0dc6164e89f16d8b1acfb5022e41e8">EVENTSINK_GetTypeInfoCount</a>(</div><div class="line"><a name="l07620"></a><span class="lineno"> 7620</span>  <a class="code" href="../../dc/d91/struct_i_event_sink.html">PEVENTSINK</a> pEV,</div><div class="line"><a name="l07621"></a><span class="lineno"> 7621</span>  UINT *pct</div><div class="line"><a name="l07622"></a><span class="lineno"> 7622</span>  ) {</div><div class="line"><a name="l07623"></a><span class="lineno"> 7623</span>  *pct = 0;</div><div class="line"><a name="l07624"></a><span class="lineno"> 7624</span>  <span class="keywordflow">return</span> NOERROR;</div><div class="line"><a name="l07625"></a><span class="lineno"> 7625</span> }</div><div class="line"><a name="l07626"></a><span class="lineno"> 7626</span> </div><div class="line"><a name="l07627"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a665b5523cc0e231007032717b03d1c50"> 7627</a></span> STDMETHODIMP <a class="code" href="../../d2/d99/win32ole_8c.html#a665b5523cc0e231007032717b03d1c50">EVENTSINK_GetTypeInfo</a>(</div><div class="line"><a name="l07628"></a><span class="lineno"> 7628</span>  <a class="code" href="../../dc/d91/struct_i_event_sink.html">PEVENTSINK</a> pEV,</div><div class="line"><a name="l07629"></a><span class="lineno"> 7629</span>  UINT info,</div><div class="line"><a name="l07630"></a><span class="lineno"> 7630</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>,</div><div class="line"><a name="l07631"></a><span class="lineno"> 7631</span>  ITypeInfo **pInfo</div><div class="line"><a name="l07632"></a><span class="lineno"> 7632</span>  ) {</div><div class="line"><a name="l07633"></a><span class="lineno"> 7633</span>  *pInfo = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l07634"></a><span class="lineno"> 7634</span>  <span class="keywordflow">return</span> DISP_E_BADINDEX;</div><div class="line"><a name="l07635"></a><span class="lineno"> 7635</span> }</div><div class="line"><a name="l07636"></a><span class="lineno"> 7636</span> </div><div class="line"><a name="l07637"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#abf4b402520e638d50441106e09fc2292"> 7637</a></span> STDMETHODIMP <a class="code" href="../../d2/d99/win32ole_8c.html#abf4b402520e638d50441106e09fc2292">EVENTSINK_GetIDsOfNames</a>(</div><div class="line"><a name="l07638"></a><span class="lineno"> 7638</span>  <a class="code" href="../../dc/d91/struct_i_event_sink.html">PEVENTSINK</a> pEventSink,</div><div class="line"><a name="l07639"></a><span class="lineno"> 7639</span>  REFIID <a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>,</div><div class="line"><a name="l07640"></a><span class="lineno"> 7640</span>  OLECHAR **szNames,</div><div class="line"><a name="l07641"></a><span class="lineno"> 7641</span>  UINT <a class="code" href="../../d2/d99/win32ole_8c.html#ad1b2c6199f208bd8beef590eeb7e85f0">cNames</a>,</div><div class="line"><a name="l07642"></a><span class="lineno"> 7642</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>,</div><div class="line"><a name="l07643"></a><span class="lineno"> 7643</span>  DISPID *pDispID</div><div class="line"><a name="l07644"></a><span class="lineno"> 7644</span>  ) {</div><div class="line"><a name="l07645"></a><span class="lineno"> 7645</span>  ITypeInfo *<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>;</div><div class="line"><a name="l07646"></a><span class="lineno"> 7646</span>  <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">PIEVENTSINKOBJ</a> pEV = (<a class="code" href="../../d2/d99/win32ole_8c.html#af9b956c8687447bdff77fa11bfdeab6c">PIEVENTSINKOBJ</a>)pEventSink;</div><div class="line"><a name="l07647"></a><span class="lineno"> 7647</span>  <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a> = pEV-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a1203bec2c0d25a2e73da1ed2ec8f0d26">pTypeInfo</a>;</div><div class="line"><a name="l07648"></a><span class="lineno"> 7648</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>) {</div><div class="line"><a name="l07649"></a><span class="lineno"> 7649</span>  <span class="keywordflow">return</span> <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->GetIDsOfNames(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, szNames, <a class="code" href="../../d2/d99/win32ole_8c.html#ad1b2c6199f208bd8beef590eeb7e85f0">cNames</a>, pDispID);</div><div class="line"><a name="l07650"></a><span class="lineno"> 7650</span>  }</div><div class="line"><a name="l07651"></a><span class="lineno"> 7651</span>  <span class="keywordflow">return</span> DISP_E_UNKNOWNNAME;</div><div class="line"><a name="l07652"></a><span class="lineno"> 7652</span> }</div><div class="line"><a name="l07653"></a><span class="lineno"> 7653</span> </div><div class="line"><a name="l07654"></a><span class="lineno"> 7654</span> <span class="keyword">static</span> <span class="keywordtype">long</span></div><div class="line"><a name="l07655"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ab70ec6922b3edc7f24e281108abf3a62"> 7655</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ab70ec6922b3edc7f24e281108abf3a62">ole_search_event_at</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>)</div><div class="line"><a name="l07656"></a><span class="lineno"> 7656</span> {</div><div class="line"><a name="l07657"></a><span class="lineno"> 7657</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> event;</div><div class="line"><a name="l07658"></a><span class="lineno"> 7658</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> event_name;</div><div class="line"><a name="l07659"></a><span class="lineno"> 7659</span>  <span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, len;</div><div class="line"><a name="l07660"></a><span class="lineno"> 7660</span>  <span class="keywordtype">long</span> ret = -1;</div><div class="line"><a name="l07661"></a><span class="lineno"> 7661</span>  len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(ary);</div><div class="line"><a name="l07662"></a><span class="lineno"> 7662</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < len; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l07663"></a><span class="lineno"> 7663</span>  <span class="keyword">event</span> = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(ary, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l07664"></a><span class="lineno"> 7664</span>  event_name = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(event, 1);</div><div class="line"><a name="l07665"></a><span class="lineno"> 7665</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(event_name) && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>)) {</div><div class="line"><a name="l07666"></a><span class="lineno"> 7666</span>  ret = <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l07667"></a><span class="lineno"> 7667</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l07668"></a><span class="lineno"> 7668</span>  }</div><div class="line"><a name="l07669"></a><span class="lineno"> 7669</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a> &&</div><div class="line"><a name="l07670"></a><span class="lineno"> 7670</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(event_name) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a> &&</div><div class="line"><a name="l07671"></a><span class="lineno"> 7671</span>  <a class="code" href="../../db/d2e/intern_8h.html#aabbf48d0162ce9a462b13b71ccf683a5">rb_str_cmp</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>, event_name) == 0) {</div><div class="line"><a name="l07672"></a><span class="lineno"> 7672</span>  ret = <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l07673"></a><span class="lineno"> 7673</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l07674"></a><span class="lineno"> 7674</span>  }</div><div class="line"><a name="l07675"></a><span class="lineno"> 7675</span>  }</div><div class="line"><a name="l07676"></a><span class="lineno"> 7676</span>  <span class="keywordflow">return</span> ret;</div><div class="line"><a name="l07677"></a><span class="lineno"> 7677</span> }</div><div class="line"><a name="l07678"></a><span class="lineno"> 7678</span> </div><div class="line"><a name="l07679"></a><span class="lineno"> 7679</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07680"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a8517a117cf55ece0f972c1c4bbe11d55"> 7680</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a8517a117cf55ece0f972c1c4bbe11d55">ole_search_event</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>, BOOL *is_default)</div><div class="line"><a name="l07681"></a><span class="lineno"> 7681</span> {</div><div class="line"><a name="l07682"></a><span class="lineno"> 7682</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> event;</div><div class="line"><a name="l07683"></a><span class="lineno"> 7683</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> def_event;</div><div class="line"><a name="l07684"></a><span class="lineno"> 7684</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> event_name;</div><div class="line"><a name="l07685"></a><span class="lineno"> 7685</span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, len;</div><div class="line"><a name="l07686"></a><span class="lineno"> 7686</span>  *is_default = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l07687"></a><span class="lineno"> 7687</span>  def_event = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07688"></a><span class="lineno"> 7688</span>  len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(ary);</div><div class="line"><a name="l07689"></a><span class="lineno"> 7689</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < len; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l07690"></a><span class="lineno"> 7690</span>  <span class="keyword">event</span> = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(ary, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l07691"></a><span class="lineno"> 7691</span>  event_name = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(event, 1);</div><div class="line"><a name="l07692"></a><span class="lineno"> 7692</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(event_name)) {</div><div class="line"><a name="l07693"></a><span class="lineno"> 7693</span>  *is_default = <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l07694"></a><span class="lineno"> 7694</span>  def_event = event;</div><div class="line"><a name="l07695"></a><span class="lineno"> 7695</span>  }</div><div class="line"><a name="l07696"></a><span class="lineno"> 7696</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#aabbf48d0162ce9a462b13b71ccf683a5">rb_str_cmp</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>, event_name) == 0) {</div><div class="line"><a name="l07697"></a><span class="lineno"> 7697</span>  *is_default = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l07698"></a><span class="lineno"> 7698</span>  <span class="keywordflow">return</span> event;</div><div class="line"><a name="l07699"></a><span class="lineno"> 7699</span>  }</div><div class="line"><a name="l07700"></a><span class="lineno"> 7700</span>  }</div><div class="line"><a name="l07701"></a><span class="lineno"> 7701</span>  <span class="keywordflow">return</span> def_event;</div><div class="line"><a name="l07702"></a><span class="lineno"> 7702</span> }</div><div class="line"><a name="l07703"></a><span class="lineno"> 7703</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07704"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3caf5ac5f0932872736edc5d35bd71e6"> 7704</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3caf5ac5f0932872736edc5d35bd71e6">ole_search_handler_method</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> handler, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>, BOOL *is_default_handler)</div><div class="line"><a name="l07705"></a><span class="lineno"> 7705</span> {</div><div class="line"><a name="l07706"></a><span class="lineno"> 7706</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> mid;</div><div class="line"><a name="l07707"></a><span class="lineno"> 7707</span> </div><div class="line"><a name="l07708"></a><span class="lineno"> 7708</span>  *is_default_handler = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l07709"></a><span class="lineno"> 7709</span>  mid = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#afe85fbdbbfefb46b9c12e725c9a04970">rb_to_id</a>(<a class="code" href="../../d9/d2d/sprintf_8c.html#a05c34a91ab36c6a463c861df47808fae">rb_sprintf</a>(<span class="stringliteral">"on%s"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>)));</div><div class="line"><a name="l07710"></a><span class="lineno"> 7710</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#a5c6c63c2619b8c03df2e173ef1e73846">rb_respond_to</a>(handler, mid)) {</div><div class="line"><a name="l07711"></a><span class="lineno"> 7711</span>  <span class="keywordflow">return</span> mid;</div><div class="line"><a name="l07712"></a><span class="lineno"> 7712</span>  }</div><div class="line"><a name="l07713"></a><span class="lineno"> 7713</span>  mid = <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"method_missing"</span>);</div><div class="line"><a name="l07714"></a><span class="lineno"> 7714</span>  <span class="keywordflow">if</span> (<a class="code" href="../../db/d2e/intern_8h.html#a5c6c63c2619b8c03df2e173ef1e73846">rb_respond_to</a>(handler, mid)) {</div><div class="line"><a name="l07715"></a><span class="lineno"> 7715</span>  *is_default_handler = <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l07716"></a><span class="lineno"> 7716</span>  <span class="keywordflow">return</span> mid;</div><div class="line"><a name="l07717"></a><span class="lineno"> 7717</span>  }</div><div class="line"><a name="l07718"></a><span class="lineno"> 7718</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07719"></a><span class="lineno"> 7719</span> }</div><div class="line"><a name="l07720"></a><span class="lineno"> 7720</span> </div><div class="line"><a name="l07721"></a><span class="lineno"> 7721</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l07722"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a81d5683f19a2b3e891115a7005223ecf"> 7722</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a81d5683f19a2b3e891115a7005223ecf">ole_delete_event</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>)</div><div class="line"><a name="l07723"></a><span class="lineno"> 7723</span> {</div><div class="line"><a name="l07724"></a><span class="lineno"> 7724</span>  <span class="keywordtype">long</span> at = -1;</div><div class="line"><a name="l07725"></a><span class="lineno"> 7725</span>  at = <a class="code" href="../../d2/d99/win32ole_8c.html#ab70ec6922b3edc7f24e281108abf3a62">ole_search_event_at</a>(ary, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>);</div><div class="line"><a name="l07726"></a><span class="lineno"> 7726</span>  <span class="keywordflow">if</span> (at >= 0) {</div><div class="line"><a name="l07727"></a><span class="lineno"> 7727</span>  <a class="code" href="../../dc/dcc/array_8c.html#a6927d315ff356d40af4f430201dcdbf5">rb_ary_delete_at</a>(ary, at);</div><div class="line"><a name="l07728"></a><span class="lineno"> 7728</span>  }</div><div class="line"><a name="l07729"></a><span class="lineno"> 7729</span> }</div><div class="line"><a name="l07730"></a><span class="lineno"> 7730</span> </div><div class="line"><a name="l07731"></a><span class="lineno"> 7731</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l07732"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a0b0eacb7bacb31262f8dfc3c7f283a44"> 7732</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a0b0eacb7bacb31262f8dfc3c7f283a44">hash2ptr_dispparams</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>, ITypeInfo *<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, DISPID dispid, DISPPARAMS *pdispparams)</div><div class="line"><a name="l07733"></a><span class="lineno"> 7733</span> {</div><div class="line"><a name="l07734"></a><span class="lineno"> 7734</span>  BSTR *bstrs;</div><div class="line"><a name="l07735"></a><span class="lineno"> 7735</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07736"></a><span class="lineno"> 7736</span>  UINT len, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l07737"></a><span class="lineno"> 7737</span>  VARIANT *pvar;</div><div class="line"><a name="l07738"></a><span class="lineno"> 7738</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l07739"></a><span class="lineno"> 7739</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>;</div><div class="line"><a name="l07740"></a><span class="lineno"> 7740</span>  len = 0;</div><div class="line"><a name="l07741"></a><span class="lineno"> 7741</span>  bstrs = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a>(BSTR, pdispparams->cArgs + 1);</div><div class="line"><a name="l07742"></a><span class="lineno"> 7742</span>  hr = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->GetNames(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, dispid,</div><div class="line"><a name="l07743"></a><span class="lineno"> 7743</span>  bstrs, pdispparams->cArgs + 1,</div><div class="line"><a name="l07744"></a><span class="lineno"> 7744</span>  &len);</div><div class="line"><a name="l07745"></a><span class="lineno"> 7745</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07746"></a><span class="lineno"> 7746</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l07747"></a><span class="lineno"> 7747</span> </div><div class="line"><a name="l07748"></a><span class="lineno"> 7748</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < len - 1; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l07749"></a><span class="lineno"> 7749</span>  <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstrs[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> + 1]);</div><div class="line"><a name="l07750"></a><span class="lineno"> 7750</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d1/d04/hash_8c.html#ab7063832c7ed02351e87922a78e35c32">rb_hash_aref</a>(<a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>));</div><div class="line"><a name="l07751"></a><span class="lineno"> 7751</span>  <span class="keywordflow">if</span> (<a class="code" href="../../df/d38/vm__exec_8c.html">val</a> == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l07752"></a><span class="lineno"> 7752</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d1/d04/hash_8c.html#ab7063832c7ed02351e87922a78e35c32">rb_hash_aref</a>(<a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>, <a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>);</div><div class="line"><a name="l07753"></a><span class="lineno"> 7753</span>  <span class="keywordflow">if</span> (<a class="code" href="../../df/d38/vm__exec_8c.html">val</a> == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l07754"></a><span class="lineno"> 7754</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d1/d04/hash_8c.html#ab7063832c7ed02351e87922a78e35c32">rb_hash_aref</a>(<a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>, <a class="code" href="../../db/d2e/intern_8h.html#abee4398ccf077c9cab2d51c5d2d25c22">rb_str_intern</a>(<a class="code" href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a>));</div><div class="line"><a name="l07755"></a><span class="lineno"> 7755</span>  pvar = &pdispparams->rgvarg[pdispparams->cArgs-<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>-1];</div><div class="line"><a name="l07756"></a><span class="lineno"> 7756</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#afc1f3a868b87bab628cd530d46f876d7">ole_val2ptr_variant</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, pvar);</div><div class="line"><a name="l07757"></a><span class="lineno"> 7757</span>  }</div><div class="line"><a name="l07758"></a><span class="lineno"> 7758</span> }</div><div class="line"><a name="l07759"></a><span class="lineno"> 7759</span> </div><div class="line"><a name="l07760"></a><span class="lineno"> 7760</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07761"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#adf669ce09db7c38c26c9a1ee0e8e85d8"> 7761</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#adf669ce09db7c38c26c9a1ee0e8e85d8">hash2result</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>)</div><div class="line"><a name="l07762"></a><span class="lineno"> 7762</span> {</div><div class="line"><a name="l07763"></a><span class="lineno"> 7763</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ret = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07764"></a><span class="lineno"> 7764</span>  ret = <a class="code" href="../../d1/d04/hash_8c.html#ab7063832c7ed02351e87922a78e35c32">rb_hash_aref</a>(<a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>, <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"return"</span>));</div><div class="line"><a name="l07765"></a><span class="lineno"> 7765</span>  <span class="keywordflow">if</span> (ret == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>)</div><div class="line"><a name="l07766"></a><span class="lineno"> 7766</span>  ret = <a class="code" href="../../d1/d04/hash_8c.html#ab7063832c7ed02351e87922a78e35c32">rb_hash_aref</a>(<a class="code" href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a>, <a class="code" href="../../db/d2e/intern_8h.html#abee4398ccf077c9cab2d51c5d2d25c22">rb_str_intern</a>(<a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"return"</span>)));</div><div class="line"><a name="l07767"></a><span class="lineno"> 7767</span>  <span class="keywordflow">return</span> ret;</div><div class="line"><a name="l07768"></a><span class="lineno"> 7768</span> }</div><div class="line"><a name="l07769"></a><span class="lineno"> 7769</span> </div><div class="line"><a name="l07770"></a><span class="lineno"> 7770</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l07771"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a43b0f9585d36ca61eb5ecd98fad874d7"> 7771</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a43b0f9585d36ca61eb5ecd98fad874d7">ary2ptr_dispparams</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, DISPPARAMS *pdispparams)</div><div class="line"><a name="l07772"></a><span class="lineno"> 7772</span> {</div><div class="line"><a name="l07773"></a><span class="lineno"> 7773</span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l07774"></a><span class="lineno"> 7774</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>;</div><div class="line"><a name="l07775"></a><span class="lineno"> 7775</span>  VARIANT *pvar;</div><div class="line"><a name="l07776"></a><span class="lineno"> 7776</span>  <span class="keywordflow">for</span>(<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(ary) && (<span class="keywordtype">unsigned</span> int) i < pdispparams->cArgs; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l07777"></a><span class="lineno"> 7777</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a> = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(ary, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l07778"></a><span class="lineno"> 7778</span>  pvar = &pdispparams->rgvarg[pdispparams->cArgs-<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>-1];</div><div class="line"><a name="l07779"></a><span class="lineno"> 7779</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#afc1f3a868b87bab628cd530d46f876d7">ole_val2ptr_variant</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a>, pvar);</div><div class="line"><a name="l07780"></a><span class="lineno"> 7780</span>  }</div><div class="line"><a name="l07781"></a><span class="lineno"> 7781</span> }</div><div class="line"><a name="l07782"></a><span class="lineno"> 7782</span> </div><div class="line"><a name="l07783"></a><span class="lineno"> 7783</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07784"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3c5d3561abdd51b3a85d88c44603876b"> 7784</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3c5d3561abdd51b3a85d88c44603876b">exec_callback</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> arg)</div><div class="line"><a name="l07785"></a><span class="lineno"> 7785</span> {</div><div class="line"><a name="l07786"></a><span class="lineno"> 7786</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../d2/d99/win32ole_8c.html#a109f95c06b2a46aede695fbec7ab46ef">parg</a> = (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *)arg;</div><div class="line"><a name="l07787"></a><span class="lineno"> 7787</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> handler = <a class="code" href="../../d2/d99/win32ole_8c.html#a109f95c06b2a46aede695fbec7ab46ef">parg</a>[0];</div><div class="line"><a name="l07788"></a><span class="lineno"> 7788</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> mid = <a class="code" href="../../d2/d99/win32ole_8c.html#a109f95c06b2a46aede695fbec7ab46ef">parg</a>[1];</div><div class="line"><a name="l07789"></a><span class="lineno"> 7789</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a109f95c06b2a46aede695fbec7ab46ef">parg</a>[2];</div><div class="line"><a name="l07790"></a><span class="lineno"> 7790</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#aa8e250f234a95692386f8cb7e858794d">rb_apply</a>(handler, mid, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l07791"></a><span class="lineno"> 7791</span> }</div><div class="line"><a name="l07792"></a><span class="lineno"> 7792</span> </div><div class="line"><a name="l07793"></a><span class="lineno"> 7793</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l07794"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a4b75e2f9c1ab1d0efeae3781011c699a"> 7794</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4b75e2f9c1ab1d0efeae3781011c699a">rescue_callback</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> arg)</div><div class="line"><a name="l07795"></a><span class="lineno"> 7795</span> {</div><div class="line"><a name="l07796"></a><span class="lineno"> 7796</span> </div><div class="line"><a name="l07797"></a><span class="lineno"> 7797</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> error;</div><div class="line"><a name="l07798"></a><span class="lineno"> 7798</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> e = <a class="code" href="../../d5/d9d/tcltklib_8c.html#a89cd18829599d193ee75073219cc42c4">rb_errinfo</a>();</div><div class="line"><a name="l07799"></a><span class="lineno"> 7799</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> bt = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(e, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"backtrace"</span>), 0);</div><div class="line"><a name="l07800"></a><span class="lineno"> 7800</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(e, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"message"</span>), 0);</div><div class="line"><a name="l07801"></a><span class="lineno"> 7801</span>  bt = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(bt, 0);</div><div class="line"><a name="l07802"></a><span class="lineno"> 7802</span>  error = <a class="code" href="../../d9/d2d/sprintf_8c.html#a05c34a91ab36c6a463c861df47808fae">rb_sprintf</a>(<span class="stringliteral">"%s: %s (%s)\n"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(bt), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(<a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>), <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9b4f42ada717bfbe7a78830639476aed">rb_obj_classname</a>(e));</div><div class="line"><a name="l07803"></a><span class="lineno"> 7803</span>  <a class="code" href="../../db/d2e/intern_8h.html#aa1fbc95b7e9c7e0697f0f5c19e2fb2d2">rb_write_error</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(error));</div><div class="line"><a name="l07804"></a><span class="lineno"> 7804</span>  <a class="code" href="../../db/d2e/intern_8h.html#af22113d5eb78709346350cc93de7f6f3">rb_backtrace</a>();</div><div class="line"><a name="l07805"></a><span class="lineno"> 7805</span>  <a class="code" href="../../de/d43/group__embed.html#ga5efbdb123063db473a9b82d8250c0b96">ruby_finalize</a>();</div><div class="line"><a name="l07806"></a><span class="lineno"> 7806</span>  exit(-1);</div><div class="line"><a name="l07807"></a><span class="lineno"> 7807</span> </div><div class="line"><a name="l07808"></a><span class="lineno"> 7808</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07809"></a><span class="lineno"> 7809</span> }</div><div class="line"><a name="l07810"></a><span class="lineno"> 7810</span> </div><div class="line"><a name="l07811"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a533965aa8ab8ae4d8f1c07f4bd207628"> 7811</a></span> STDMETHODIMP <a class="code" href="../../d2/d99/win32ole_8c.html#a533965aa8ab8ae4d8f1c07f4bd207628">EVENTSINK_Invoke</a>(</div><div class="line"><a name="l07812"></a><span class="lineno"> 7812</span>  <a class="code" href="../../dc/d91/struct_i_event_sink.html">PEVENTSINK</a> pEventSink,</div><div class="line"><a name="l07813"></a><span class="lineno"> 7813</span>  DISPID dispid,</div><div class="line"><a name="l07814"></a><span class="lineno"> 7814</span>  REFIID <a class="code" href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a>,</div><div class="line"><a name="l07815"></a><span class="lineno"> 7815</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>,</div><div class="line"><a name="l07816"></a><span class="lineno"> 7816</span>  WORD <a class="code" href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a>,</div><div class="line"><a name="l07817"></a><span class="lineno"> 7817</span>  DISPPARAMS *pdispparams,</div><div class="line"><a name="l07818"></a><span class="lineno"> 7818</span>  VARIANT *pvarResult,</div><div class="line"><a name="l07819"></a><span class="lineno"> 7819</span>  EXCEPINFO *pexcepinfo,</div><div class="line"><a name="l07820"></a><span class="lineno"> 7820</span>  UINT *<a class="code" href="../../d2/d99/win32ole_8c.html#ae417975d2b4b01e9dc4e53b1da0a0725">puArgErr</a></div><div class="line"><a name="l07821"></a><span class="lineno"> 7821</span>  ) {</div><div class="line"><a name="l07822"></a><span class="lineno"> 7822</span> </div><div class="line"><a name="l07823"></a><span class="lineno"> 7823</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07824"></a><span class="lineno"> 7824</span>  BSTR bstr;</div><div class="line"><a name="l07825"></a><span class="lineno"> 7825</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>;</div><div class="line"><a name="l07826"></a><span class="lineno"> 7826</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l07827"></a><span class="lineno"> 7827</span>  ITypeInfo *<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>;</div><div class="line"><a name="l07828"></a><span class="lineno"> 7828</span>  VARIANT *pvar;</div><div class="line"><a name="l07829"></a><span class="lineno"> 7829</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ary, obj, event, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, outargv, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>, <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>;</div><div class="line"><a name="l07830"></a><span class="lineno"> 7830</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> handler = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07831"></a><span class="lineno"> 7831</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> arg[3];</div><div class="line"><a name="l07832"></a><span class="lineno"> 7832</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> mid;</div><div class="line"><a name="l07833"></a><span class="lineno"> 7833</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> is_outarg = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>;</div><div class="line"><a name="l07834"></a><span class="lineno"> 7834</span>  BOOL is_default_handler = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l07835"></a><span class="lineno"> 7835</span>  <span class="keywordtype">int</span> state;</div><div class="line"><a name="l07836"></a><span class="lineno"> 7836</span> </div><div class="line"><a name="l07837"></a><span class="lineno"> 7837</span>  <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">PIEVENTSINKOBJ</a> pEV = (<a class="code" href="../../d2/d99/win32ole_8c.html#af9b956c8687447bdff77fa11bfdeab6c">PIEVENTSINKOBJ</a>)pEventSink;</div><div class="line"><a name="l07838"></a><span class="lineno"> 7838</span>  <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a> = pEV-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a1203bec2c0d25a2e73da1ed2ec8f0d26">pTypeInfo</a>;</div><div class="line"><a name="l07839"></a><span class="lineno"> 7839</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a038616b5c7a8bb7d26e06c5b16a0a643">evs_entry</a>(pEV-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a860ed444261d864cf62269b6d075748c">m_event_id</a>);</div><div class="line"><a name="l07840"></a><span class="lineno"> 7840</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(obj, <a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>)) {</div><div class="line"><a name="l07841"></a><span class="lineno"> 7841</span>  <span class="keywordflow">return</span> NOERROR;</div><div class="line"><a name="l07842"></a><span class="lineno"> 7842</span>  }</div><div class="line"><a name="l07843"></a><span class="lineno"> 7843</span> </div><div class="line"><a name="l07844"></a><span class="lineno"> 7844</span>  ary = <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(obj, <a class="code" href="../../d2/d99/win32ole_8c.html#a0ce01fae8d4199ffd5f3df63cf0796f8">id_events</a>);</div><div class="line"><a name="l07845"></a><span class="lineno"> 7845</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(ary) || <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(ary) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>) {</div><div class="line"><a name="l07846"></a><span class="lineno"> 7846</span>  <span class="keywordflow">return</span> NOERROR;</div><div class="line"><a name="l07847"></a><span class="lineno"> 7847</span>  }</div><div class="line"><a name="l07848"></a><span class="lineno"> 7848</span>  hr = <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>->lpVtbl->GetNames(<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, dispid,</div><div class="line"><a name="l07849"></a><span class="lineno"> 7849</span>  &bstr, 1, &<a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>);</div><div class="line"><a name="l07850"></a><span class="lineno"> 7850</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l07851"></a><span class="lineno"> 7851</span>  <span class="keywordflow">return</span> NOERROR;</div><div class="line"><a name="l07852"></a><span class="lineno"> 7852</span>  }</div><div class="line"><a name="l07853"></a><span class="lineno"> 7853</span>  <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a>(bstr);</div><div class="line"><a name="l07854"></a><span class="lineno"> 7854</span>  <span class="keyword">event</span> = <a class="code" href="../../d2/d99/win32ole_8c.html#a8517a117cf55ece0f972c1c4bbe11d55">ole_search_event</a>(ary, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>, &is_default_handler);</div><div class="line"><a name="l07855"></a><span class="lineno"> 7855</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(event) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>) {</div><div class="line"><a name="l07856"></a><span class="lineno"> 7856</span>  handler = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(event, 0);</div><div class="line"><a name="l07857"></a><span class="lineno"> 7857</span>  mid = <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"call"</span>);</div><div class="line"><a name="l07858"></a><span class="lineno"> 7858</span>  is_outarg = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(event, 3);</div><div class="line"><a name="l07859"></a><span class="lineno"> 7859</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l07860"></a><span class="lineno"> 7860</span>  handler = <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(obj, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"handler"</span>));</div><div class="line"><a name="l07861"></a><span class="lineno"> 7861</span>  <span class="keywordflow">if</span> (handler == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l07862"></a><span class="lineno"> 7862</span>  <span class="keywordflow">return</span> NOERROR;</div><div class="line"><a name="l07863"></a><span class="lineno"> 7863</span>  }</div><div class="line"><a name="l07864"></a><span class="lineno"> 7864</span>  mid = <a class="code" href="../../d2/d99/win32ole_8c.html#a3caf5ac5f0932872736edc5d35bd71e6">ole_search_handler_method</a>(handler, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>, &is_default_handler);</div><div class="line"><a name="l07865"></a><span class="lineno"> 7865</span>  }</div><div class="line"><a name="l07866"></a><span class="lineno"> 7866</span>  <span class="keywordflow">if</span> (handler == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a> || mid == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>) {</div><div class="line"><a name="l07867"></a><span class="lineno"> 7867</span>  <span class="keywordflow">return</span> NOERROR;</div><div class="line"><a name="l07868"></a><span class="lineno"> 7868</span>  }</div><div class="line"><a name="l07869"></a><span class="lineno"> 7869</span> </div><div class="line"><a name="l07870"></a><span class="lineno"> 7870</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a> = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l07871"></a><span class="lineno"> 7871</span>  <span class="keywordflow">if</span> (is_default_handler) {</div><div class="line"><a name="l07872"></a><span class="lineno"> 7872</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>);</div><div class="line"><a name="l07873"></a><span class="lineno"> 7873</span>  }</div><div class="line"><a name="l07874"></a><span class="lineno"> 7874</span> </div><div class="line"><a name="l07875"></a><span class="lineno"> 7875</span>  <span class="comment">/* make argument of event handler */</span></div><div class="line"><a name="l07876"></a><span class="lineno"> 7876</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < pdispparams->cArgs; ++<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>) {</div><div class="line"><a name="l07877"></a><span class="lineno"> 7877</span>  pvar = &pdispparams->rgvarg[pdispparams->cArgs-<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>-1];</div><div class="line"><a name="l07878"></a><span class="lineno"> 7878</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(pvar));</div><div class="line"><a name="l07879"></a><span class="lineno"> 7879</span>  }</div><div class="line"><a name="l07880"></a><span class="lineno"> 7880</span>  outargv = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l07881"></a><span class="lineno"> 7881</span>  <span class="keywordflow">if</span> (is_outarg == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>) {</div><div class="line"><a name="l07882"></a><span class="lineno"> 7882</span>  outargv = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l07883"></a><span class="lineno"> 7883</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, outargv);</div><div class="line"><a name="l07884"></a><span class="lineno"> 7884</span>  }</div><div class="line"><a name="l07885"></a><span class="lineno"> 7885</span> </div><div class="line"><a name="l07886"></a><span class="lineno"> 7886</span>  <span class="comment">/*</span></div><div class="line"><a name="l07887"></a><span class="lineno"> 7887</span> <span class="comment"> * if exception raised in event callback,</span></div><div class="line"><a name="l07888"></a><span class="lineno"> 7888</span> <span class="comment"> * then you receive cfp consistency error.</span></div><div class="line"><a name="l07889"></a><span class="lineno"> 7889</span> <span class="comment"> * to avoid this error we use begin rescue end.</span></div><div class="line"><a name="l07890"></a><span class="lineno"> 7890</span> <span class="comment"> * and the exception raised then error message print</span></div><div class="line"><a name="l07891"></a><span class="lineno"> 7891</span> <span class="comment"> * and exit ruby process by Win32OLE itself.</span></div><div class="line"><a name="l07892"></a><span class="lineno"> 7892</span> <span class="comment"> */</span></div><div class="line"><a name="l07893"></a><span class="lineno"> 7893</span>  arg[0] = handler;</div><div class="line"><a name="l07894"></a><span class="lineno"> 7894</span>  arg[1] = mid;</div><div class="line"><a name="l07895"></a><span class="lineno"> 7895</span>  arg[2] = <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>;</div><div class="line"><a name="l07896"></a><span class="lineno"> 7896</span>  <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = <a class="code" href="../../d3/d57/eval_8c.html#a6aa7fb1169ed41978a16375b6f921b0e">rb_protect</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3c5d3561abdd51b3a85d88c44603876b">exec_callback</a>, (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>)arg, &state);</div><div class="line"><a name="l07897"></a><span class="lineno"> 7897</span>  <span class="keywordflow">if</span> (state != 0) {</div><div class="line"><a name="l07898"></a><span class="lineno"> 7898</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4b75e2f9c1ab1d0efeae3781011c699a">rescue_callback</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>);</div><div class="line"><a name="l07899"></a><span class="lineno"> 7899</span>  }</div><div class="line"><a name="l07900"></a><span class="lineno"> 7900</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a8357e81bbb60cb41b0a292a90653a5e5">T_HASH</a>) {</div><div class="line"><a name="l07901"></a><span class="lineno"> 7901</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a0b0eacb7bacb31262f8dfc3c7f283a44">hash2ptr_dispparams</a>(<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>, <a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>, dispid, pdispparams);</div><div class="line"><a name="l07902"></a><span class="lineno"> 7902</span>  <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#adf669ce09db7c38c26c9a1ee0e8e85d8">hash2result</a>(<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>);</div><div class="line"><a name="l07903"></a><span class="lineno"> 7903</span>  }<span class="keywordflow">else</span> <span class="keywordflow">if</span> (is_outarg == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a> && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(outargv) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>) {</div><div class="line"><a name="l07904"></a><span class="lineno"> 7904</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a43b0f9585d36ca61eb5ecd98fad874d7">ary2ptr_dispparams</a>(outargv, pdispparams);</div><div class="line"><a name="l07905"></a><span class="lineno"> 7905</span>  }</div><div class="line"><a name="l07906"></a><span class="lineno"> 7906</span> </div><div class="line"><a name="l07907"></a><span class="lineno"> 7907</span>  <span class="keywordflow">if</span> (pvarResult) {</div><div class="line"><a name="l07908"></a><span class="lineno"> 7908</span>  VariantInit(pvarResult);</div><div class="line"><a name="l07909"></a><span class="lineno"> 7909</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>, pvarResult);</div><div class="line"><a name="l07910"></a><span class="lineno"> 7910</span>  }</div><div class="line"><a name="l07911"></a><span class="lineno"> 7911</span> </div><div class="line"><a name="l07912"></a><span class="lineno"> 7912</span>  <span class="keywordflow">return</span> NOERROR;</div><div class="line"><a name="l07913"></a><span class="lineno"> 7913</span> }</div><div class="line"><a name="l07914"></a><span class="lineno"> 7914</span> </div><div class="line"><a name="l07915"></a><span class="lineno"> 7915</span> <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">PIEVENTSINKOBJ</a></div><div class="line"><a name="l07916"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#abd8eee90347509b486bdfcb4c7724f2c"> 7916</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#abd8eee90347509b486bdfcb4c7724f2c">EVENTSINK_Constructor</a>() {</div><div class="line"><a name="l07917"></a><span class="lineno"> 7917</span>  <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">PIEVENTSINKOBJ</a> pEv;</div><div class="line"><a name="l07918"></a><span class="lineno"> 7918</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../d2/d99/win32ole_8c.html#afb4c9ed3631f60150e25239a3a1a54e6">g_IsEventSinkVtblInitialized</a>) {</div><div class="line"><a name="l07919"></a><span class="lineno"> 7919</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643">vtEventSink</a>.<a class="code" href="../../de/d78/struct_i_event_sink_vtbl.html#ab0ef28eaafa7e679bfb0b80e98da0135">QueryInterface</a>=<a class="code" href="../../d2/d99/win32ole_8c.html#a06ff7e4ccaaa9768e4f0354616191089">EVENTSINK_QueryInterface</a>;</div><div class="line"><a name="l07920"></a><span class="lineno"> 7920</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643">vtEventSink</a>.AddRef = <a class="code" href="../../d2/d99/win32ole_8c.html#a1dd26cbc4aafb084763c87e1585eddad">EVENTSINK_AddRef</a>;</div><div class="line"><a name="l07921"></a><span class="lineno"> 7921</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643">vtEventSink</a>.Release = EVENTSINK_Release;</div><div class="line"><a name="l07922"></a><span class="lineno"> 7922</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643">vtEventSink</a>.Invoke = <a class="code" href="../../d2/d99/win32ole_8c.html#a533965aa8ab8ae4d8f1c07f4bd207628">EVENTSINK_Invoke</a>;</div><div class="line"><a name="l07923"></a><span class="lineno"> 7923</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643">vtEventSink</a>.GetIDsOfNames = <a class="code" href="../../d2/d99/win32ole_8c.html#abf4b402520e638d50441106e09fc2292">EVENTSINK_GetIDsOfNames</a>;</div><div class="line"><a name="l07924"></a><span class="lineno"> 7924</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643">vtEventSink</a>.GetTypeInfoCount = <a class="code" href="../../d2/d99/win32ole_8c.html#a8d0dc6164e89f16d8b1acfb5022e41e8">EVENTSINK_GetTypeInfoCount</a>;</div><div class="line"><a name="l07925"></a><span class="lineno"> 7925</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643">vtEventSink</a>.GetTypeInfo = <a class="code" href="../../d2/d99/win32ole_8c.html#a665b5523cc0e231007032717b03d1c50">EVENTSINK_GetTypeInfo</a>;</div><div class="line"><a name="l07926"></a><span class="lineno"> 7926</span> </div><div class="line"><a name="l07927"></a><span class="lineno"> 7927</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#afb4c9ed3631f60150e25239a3a1a54e6">g_IsEventSinkVtblInitialized</a> = <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l07928"></a><span class="lineno"> 7928</span>  }</div><div class="line"><a name="l07929"></a><span class="lineno"> 7929</span>  pEv = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">IEVENTSINKOBJ</a>, 1);</div><div class="line"><a name="l07930"></a><span class="lineno"> 7930</span>  <span class="keywordflow">if</span>(pEv == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) <span class="keywordflow">return</span> <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l07931"></a><span class="lineno"> 7931</span>  pEv-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a43db5d87802de4430819746d16b67d0a">lpVtbl</a> = &<a class="code" href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643">vtEventSink</a>;</div><div class="line"><a name="l07932"></a><span class="lineno"> 7932</span>  pEv-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a22754fa974e76bbc3feb7598c4b58afe">m_cRef</a> = 0;</div><div class="line"><a name="l07933"></a><span class="lineno"> 7933</span>  pEv-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a860ed444261d864cf62269b6d075748c">m_event_id</a> = 0;</div><div class="line"><a name="l07934"></a><span class="lineno"> 7934</span>  pEv-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a1203bec2c0d25a2e73da1ed2ec8f0d26">pTypeInfo</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l07935"></a><span class="lineno"> 7935</span>  <span class="keywordflow">return</span> pEv;</div><div class="line"><a name="l07936"></a><span class="lineno"> 7936</span> }</div><div class="line"><a name="l07937"></a><span class="lineno"> 7937</span> </div><div class="line"><a name="l07938"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a732ceb5b7f7a3b8bb7200da916011cd0"> 7938</a></span> <span class="keywordtype">void</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a732ceb5b7f7a3b8bb7200da916011cd0">EVENTSINK_Destructor</a>(</div><div class="line"><a name="l07939"></a><span class="lineno"> 7939</span>  <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">PIEVENTSINKOBJ</a> pEVObj</div><div class="line"><a name="l07940"></a><span class="lineno"> 7940</span>  ) {</div><div class="line"><a name="l07941"></a><span class="lineno"> 7941</span>  <span class="keywordflow">if</span>(pEVObj != <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l07942"></a><span class="lineno"> 7942</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pEVObj-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a1203bec2c0d25a2e73da1ed2ec8f0d26">pTypeInfo</a>);</div><div class="line"><a name="l07943"></a><span class="lineno"> 7943</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pEVObj);</div><div class="line"><a name="l07944"></a><span class="lineno"> 7944</span>  pEVObj = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l07945"></a><span class="lineno"> 7945</span>  }</div><div class="line"><a name="l07946"></a><span class="lineno"> 7946</span> }</div><div class="line"><a name="l07947"></a><span class="lineno"> 7947</span> </div><div class="line"><a name="l07948"></a><span class="lineno"> 7948</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a></div><div class="line"><a name="l07949"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a31a904a59156f31da8443d0d06ad1154"> 7949</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a31a904a59156f31da8443d0d06ad1154">find_iid</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole, <span class="keywordtype">char</span> *pitf, IID *piid, ITypeInfo **ppTypeInfo)</div><div class="line"><a name="l07950"></a><span class="lineno"> 7950</span> {</div><div class="line"><a name="l07951"></a><span class="lineno"> 7951</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l07952"></a><span class="lineno"> 7952</span>  IDispatch *pDispatch;</div><div class="line"><a name="l07953"></a><span class="lineno"> 7953</span>  ITypeInfo *<a class="code" href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">pTypeInfo</a>;</div><div class="line"><a name="l07954"></a><span class="lineno"> 7954</span>  ITypeLib *pTypeLib;</div><div class="line"><a name="l07955"></a><span class="lineno"> 7955</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l07956"></a><span class="lineno"> 7956</span>  HREFTYPE RefType;</div><div class="line"><a name="l07957"></a><span class="lineno"> 7957</span>  ITypeInfo *pImplTypeInfo;</div><div class="line"><a name="l07958"></a><span class="lineno"> 7958</span>  TYPEATTR *pImplTypeAttr;</div><div class="line"><a name="l07959"></a><span class="lineno"> 7959</span> </div><div class="line"><a name="l07960"></a><span class="lineno"> 7960</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l07961"></a><span class="lineno"> 7961</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> index;</div><div class="line"><a name="l07962"></a><span class="lineno"> 7962</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>;</div><div class="line"><a name="l07963"></a><span class="lineno"> 7963</span>  <span class="keywordtype">int</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>;</div><div class="line"><a name="l07964"></a><span class="lineno"> 7964</span>  BSTR bstr;</div><div class="line"><a name="l07965"></a><span class="lineno"> 7965</span>  <span class="keywordtype">char</span> *pstr;</div><div class="line"><a name="l07966"></a><span class="lineno"> 7966</span> </div><div class="line"><a name="l07967"></a><span class="lineno"> 7967</span>  BOOL is_found = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l07968"></a><span class="lineno"> 7968</span>  LCID <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>;</div><div class="line"><a name="l07969"></a><span class="lineno"> 7969</span> </div><div class="line"><a name="l07970"></a><span class="lineno"> 7970</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(ole, pole);</div><div class="line"><a name="l07971"></a><span class="lineno"> 7971</span> </div><div class="line"><a name="l07972"></a><span class="lineno"> 7972</span>  <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l07973"></a><span class="lineno"> 7973</span> </div><div class="line"><a name="l07974"></a><span class="lineno"> 7974</span>  hr = <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->GetTypeInfo(<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, 0, <a class="code" href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a>, &pTypeInfo);</div><div class="line"><a name="l07975"></a><span class="lineno"> 7975</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07976"></a><span class="lineno"> 7976</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l07977"></a><span class="lineno"> 7977</span> </div><div class="line"><a name="l07978"></a><span class="lineno"> 7978</span>  hr = pTypeInfo->lpVtbl->GetContainingTypeLib(pTypeInfo,</div><div class="line"><a name="l07979"></a><span class="lineno"> 7979</span>  &pTypeLib,</div><div class="line"><a name="l07980"></a><span class="lineno"> 7980</span>  &index);</div><div class="line"><a name="l07981"></a><span class="lineno"> 7981</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l07982"></a><span class="lineno"> 7982</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07983"></a><span class="lineno"> 7983</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l07984"></a><span class="lineno"> 7984</span> </div><div class="line"><a name="l07985"></a><span class="lineno"> 7985</span>  <span class="keywordflow">if</span> (!pitf) {</div><div class="line"><a name="l07986"></a><span class="lineno"> 7986</span>  hr = pTypeLib->lpVtbl->GetTypeInfoOfGuid(pTypeLib,</div><div class="line"><a name="l07987"></a><span class="lineno"> 7987</span>  piid,</div><div class="line"><a name="l07988"></a><span class="lineno"> 7988</span>  ppTypeInfo);</div><div class="line"><a name="l07989"></a><span class="lineno"> 7989</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeLib);</div><div class="line"><a name="l07990"></a><span class="lineno"> 7990</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l07991"></a><span class="lineno"> 7991</span>  }</div><div class="line"><a name="l07992"></a><span class="lineno"> 7992</span>  <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a> = pTypeLib->lpVtbl->GetTypeInfoCount(pTypeLib);</div><div class="line"><a name="l07993"></a><span class="lineno"> 7993</span>  <span class="keywordflow">for</span> (index = 0; index < <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>; index++) {</div><div class="line"><a name="l07994"></a><span class="lineno"> 7994</span>  hr = pTypeLib->lpVtbl->GetTypeInfo(pTypeLib,</div><div class="line"><a name="l07995"></a><span class="lineno"> 7995</span>  index,</div><div class="line"><a name="l07996"></a><span class="lineno"> 7996</span>  &pTypeInfo);</div><div class="line"><a name="l07997"></a><span class="lineno"> 7997</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l07998"></a><span class="lineno"> 7998</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l07999"></a><span class="lineno"> 7999</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(pTypeInfo, &pTypeAttr);</div><div class="line"><a name="l08000"></a><span class="lineno"> 8000</span> </div><div class="line"><a name="l08001"></a><span class="lineno"> 8001</span>  <span class="keywordflow">if</span>(FAILED(hr)) {</div><div class="line"><a name="l08002"></a><span class="lineno"> 8002</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l08003"></a><span class="lineno"> 8003</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l08004"></a><span class="lineno"> 8004</span>  }</div><div class="line"><a name="l08005"></a><span class="lineno"> 8005</span>  <span class="keywordflow">if</span>(pTypeAttr->typekind == TKIND_COCLASS) {</div><div class="line"><a name="l08006"></a><span class="lineno"> 8006</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> = 0; <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a> < pTypeAttr->cImplTypes; <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>++) {</div><div class="line"><a name="l08007"></a><span class="lineno"> 8007</span>  hr = pTypeInfo->lpVtbl->GetRefTypeOfImplType(pTypeInfo,</div><div class="line"><a name="l08008"></a><span class="lineno"> 8008</span>  <a class="code" href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a>,</div><div class="line"><a name="l08009"></a><span class="lineno"> 8009</span>  &RefType);</div><div class="line"><a name="l08010"></a><span class="lineno"> 8010</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l08011"></a><span class="lineno"> 8011</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l08012"></a><span class="lineno"> 8012</span>  hr = pTypeInfo->lpVtbl->GetRefTypeInfo(pTypeInfo,</div><div class="line"><a name="l08013"></a><span class="lineno"> 8013</span>  RefType,</div><div class="line"><a name="l08014"></a><span class="lineno"> 8014</span>  &pImplTypeInfo);</div><div class="line"><a name="l08015"></a><span class="lineno"> 8015</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l08016"></a><span class="lineno"> 8016</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l08017"></a><span class="lineno"> 8017</span> </div><div class="line"><a name="l08018"></a><span class="lineno"> 8018</span>  hr = pImplTypeInfo->lpVtbl->GetDocumentation(pImplTypeInfo,</div><div class="line"><a name="l08019"></a><span class="lineno"> 8019</span>  -1,</div><div class="line"><a name="l08020"></a><span class="lineno"> 8020</span>  &bstr,</div><div class="line"><a name="l08021"></a><span class="lineno"> 8021</span>  <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l08022"></a><span class="lineno"> 8022</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08023"></a><span class="lineno"> 8023</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pImplTypeInfo);</div><div class="line"><a name="l08024"></a><span class="lineno"> 8024</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l08025"></a><span class="lineno"> 8025</span>  }</div><div class="line"><a name="l08026"></a><span class="lineno"> 8026</span>  pstr = <a class="code" href="../../d2/d99/win32ole_8c.html#a148da008cc189df71d5b47bf1bbb6d06">ole_wc2mb</a>(bstr);</div><div class="line"><a name="l08027"></a><span class="lineno"> 8027</span>  <span class="keywordflow">if</span> (strcmp(pitf, pstr) == 0) {</div><div class="line"><a name="l08028"></a><span class="lineno"> 8028</span>  hr = pImplTypeInfo->lpVtbl->GetTypeAttr(pImplTypeInfo,</div><div class="line"><a name="l08029"></a><span class="lineno"> 8029</span>  &pImplTypeAttr);</div><div class="line"><a name="l08030"></a><span class="lineno"> 8030</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l08031"></a><span class="lineno"> 8031</span>  is_found = <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l08032"></a><span class="lineno"> 8032</span>  *piid = pImplTypeAttr->guid;</div><div class="line"><a name="l08033"></a><span class="lineno"> 8033</span>  <span class="keywordflow">if</span> (ppTypeInfo) {</div><div class="line"><a name="l08034"></a><span class="lineno"> 8034</span>  *ppTypeInfo = pImplTypeInfo;</div><div class="line"><a name="l08035"></a><span class="lineno"> 8035</span>  (*ppTypeInfo)->lpVtbl->AddRef((*ppTypeInfo));</div><div class="line"><a name="l08036"></a><span class="lineno"> 8036</span>  }</div><div class="line"><a name="l08037"></a><span class="lineno"> 8037</span>  pImplTypeInfo->lpVtbl->ReleaseTypeAttr(pImplTypeInfo,</div><div class="line"><a name="l08038"></a><span class="lineno"> 8038</span>  pImplTypeAttr);</div><div class="line"><a name="l08039"></a><span class="lineno"> 8039</span>  }</div><div class="line"><a name="l08040"></a><span class="lineno"> 8040</span>  }</div><div class="line"><a name="l08041"></a><span class="lineno"> 8041</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pstr);</div><div class="line"><a name="l08042"></a><span class="lineno"> 8042</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pImplTypeInfo);</div><div class="line"><a name="l08043"></a><span class="lineno"> 8043</span>  <span class="keywordflow">if</span> (is_found || FAILED(hr))</div><div class="line"><a name="l08044"></a><span class="lineno"> 8044</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l08045"></a><span class="lineno"> 8045</span>  }</div><div class="line"><a name="l08046"></a><span class="lineno"> 8046</span>  }</div><div class="line"><a name="l08047"></a><span class="lineno"> 8047</span> </div><div class="line"><a name="l08048"></a><span class="lineno"> 8048</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(pTypeInfo, pTypeAttr);</div><div class="line"><a name="l08049"></a><span class="lineno"> 8049</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l08050"></a><span class="lineno"> 8050</span>  <span class="keywordflow">if</span> (is_found || FAILED(hr))</div><div class="line"><a name="l08051"></a><span class="lineno"> 8051</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l08052"></a><span class="lineno"> 8052</span>  }</div><div class="line"><a name="l08053"></a><span class="lineno"> 8053</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeLib);</div><div class="line"><a name="l08054"></a><span class="lineno"> 8054</span>  <span class="keywordflow">if</span>(!is_found)</div><div class="line"><a name="l08055"></a><span class="lineno"> 8055</span>  <span class="keywordflow">return</span> E_NOINTERFACE;</div><div class="line"><a name="l08056"></a><span class="lineno"> 8056</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l08057"></a><span class="lineno"> 8057</span> }</div><div class="line"><a name="l08058"></a><span class="lineno"> 8058</span> </div><div class="line"><a name="l08059"></a><span class="lineno"> 8059</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a></div><div class="line"><a name="l08060"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aefa742f168b66b0f6f438656c8704e0a"> 8060</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aefa742f168b66b0f6f438656c8704e0a">find_coclass</a>(</div><div class="line"><a name="l08061"></a><span class="lineno"> 8061</span>  ITypeInfo *pTypeInfo,</div><div class="line"><a name="l08062"></a><span class="lineno"> 8062</span>  TYPEATTR *pTypeAttr,</div><div class="line"><a name="l08063"></a><span class="lineno"> 8063</span>  ITypeInfo **pCOTypeInfo,</div><div class="line"><a name="l08064"></a><span class="lineno"> 8064</span>  TYPEATTR **pCOTypeAttr)</div><div class="line"><a name="l08065"></a><span class="lineno"> 8065</span> {</div><div class="line"><a name="l08066"></a><span class="lineno"> 8066</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = E_NOINTERFACE;</div><div class="line"><a name="l08067"></a><span class="lineno"> 8067</span>  ITypeLib *pTypeLib;</div><div class="line"><a name="l08068"></a><span class="lineno"> 8068</span>  <span class="keywordtype">int</span> <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a>;</div><div class="line"><a name="l08069"></a><span class="lineno"> 8069</span>  BOOL found = <a class="code" href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a>;</div><div class="line"><a name="l08070"></a><span class="lineno"> 8070</span>  ITypeInfo *pTypeInfo2;</div><div class="line"><a name="l08071"></a><span class="lineno"> 8071</span>  TYPEATTR *pTypeAttr2;</div><div class="line"><a name="l08072"></a><span class="lineno"> 8072</span>  <span class="keywordtype">int</span> flags;</div><div class="line"><a name="l08073"></a><span class="lineno"> 8073</span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>,j;</div><div class="line"><a name="l08074"></a><span class="lineno"> 8074</span>  HREFTYPE href;</div><div class="line"><a name="l08075"></a><span class="lineno"> 8075</span>  ITypeInfo *pRefTypeInfo;</div><div class="line"><a name="l08076"></a><span class="lineno"> 8076</span>  TYPEATTR *pRefTypeAttr;</div><div class="line"><a name="l08077"></a><span class="lineno"> 8077</span> </div><div class="line"><a name="l08078"></a><span class="lineno"> 8078</span>  hr = pTypeInfo->lpVtbl->GetContainingTypeLib(pTypeInfo, &pTypeLib, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l08079"></a><span class="lineno"> 8079</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08080"></a><span class="lineno"> 8080</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l08081"></a><span class="lineno"> 8081</span>  }</div><div class="line"><a name="l08082"></a><span class="lineno"> 8082</span>  <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a> = pTypeLib->lpVtbl->GetTypeInfoCount(pTypeLib);</div><div class="line"><a name="l08083"></a><span class="lineno"> 8083</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < <a class="code" href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a> && !found; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l08084"></a><span class="lineno"> 8084</span>  hr = pTypeLib->lpVtbl->GetTypeInfo(pTypeLib, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &pTypeInfo2);</div><div class="line"><a name="l08085"></a><span class="lineno"> 8085</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l08086"></a><span class="lineno"> 8086</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l08087"></a><span class="lineno"> 8087</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(pTypeInfo2, &pTypeAttr2);</div><div class="line"><a name="l08088"></a><span class="lineno"> 8088</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08089"></a><span class="lineno"> 8089</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo2);</div><div class="line"><a name="l08090"></a><span class="lineno"> 8090</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l08091"></a><span class="lineno"> 8091</span>  }</div><div class="line"><a name="l08092"></a><span class="lineno"> 8092</span>  <span class="keywordflow">if</span> (pTypeAttr2->typekind != TKIND_COCLASS) {</div><div class="line"><a name="l08093"></a><span class="lineno"> 8093</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(pTypeInfo2, pTypeAttr2);</div><div class="line"><a name="l08094"></a><span class="lineno"> 8094</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo2);</div><div class="line"><a name="l08095"></a><span class="lineno"> 8095</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l08096"></a><span class="lineno"> 8096</span>  }</div><div class="line"><a name="l08097"></a><span class="lineno"> 8097</span>  <span class="keywordflow">for</span> (j = 0; j < pTypeAttr2->cImplTypes && !found; j++) {</div><div class="line"><a name="l08098"></a><span class="lineno"> 8098</span>  hr = pTypeInfo2->lpVtbl->GetImplTypeFlags(pTypeInfo2, j, &flags);</div><div class="line"><a name="l08099"></a><span class="lineno"> 8099</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l08100"></a><span class="lineno"> 8100</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l08101"></a><span class="lineno"> 8101</span>  <span class="keywordflow">if</span> (!(flags & IMPLTYPEFLAG_FDEFAULT))</div><div class="line"><a name="l08102"></a><span class="lineno"> 8102</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l08103"></a><span class="lineno"> 8103</span>  hr = pTypeInfo2->lpVtbl->GetRefTypeOfImplType(pTypeInfo2, j, &href);</div><div class="line"><a name="l08104"></a><span class="lineno"> 8104</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l08105"></a><span class="lineno"> 8105</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l08106"></a><span class="lineno"> 8106</span>  hr = pTypeInfo2->lpVtbl->GetRefTypeInfo(pTypeInfo2, href, &pRefTypeInfo);</div><div class="line"><a name="l08107"></a><span class="lineno"> 8107</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l08108"></a><span class="lineno"> 8108</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l08109"></a><span class="lineno"> 8109</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(pRefTypeInfo, &pRefTypeAttr);</div><div class="line"><a name="l08110"></a><span class="lineno"> 8110</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08111"></a><span class="lineno"> 8111</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pRefTypeInfo);</div><div class="line"><a name="l08112"></a><span class="lineno"> 8112</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l08113"></a><span class="lineno"> 8113</span>  }</div><div class="line"><a name="l08114"></a><span class="lineno"> 8114</span>  <span class="keywordflow">if</span> (IsEqualGUID(&(pTypeAttr->guid), &(pRefTypeAttr->guid))) {</div><div class="line"><a name="l08115"></a><span class="lineno"> 8115</span>  found = <a class="code" href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a>;</div><div class="line"><a name="l08116"></a><span class="lineno"> 8116</span>  }</div><div class="line"><a name="l08117"></a><span class="lineno"> 8117</span>  }</div><div class="line"><a name="l08118"></a><span class="lineno"> 8118</span>  <span class="keywordflow">if</span> (!found) {</div><div class="line"><a name="l08119"></a><span class="lineno"> 8119</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(pTypeInfo2, pTypeAttr2);</div><div class="line"><a name="l08120"></a><span class="lineno"> 8120</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo2);</div><div class="line"><a name="l08121"></a><span class="lineno"> 8121</span>  }</div><div class="line"><a name="l08122"></a><span class="lineno"> 8122</span>  }</div><div class="line"><a name="l08123"></a><span class="lineno"> 8123</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeLib);</div><div class="line"><a name="l08124"></a><span class="lineno"> 8124</span>  <span class="keywordflow">if</span> (found) {</div><div class="line"><a name="l08125"></a><span class="lineno"> 8125</span>  *pCOTypeInfo = pTypeInfo2;</div><div class="line"><a name="l08126"></a><span class="lineno"> 8126</span>  *pCOTypeAttr = pTypeAttr2;</div><div class="line"><a name="l08127"></a><span class="lineno"> 8127</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l08128"></a><span class="lineno"> 8128</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l08129"></a><span class="lineno"> 8129</span>  hr = E_NOINTERFACE;</div><div class="line"><a name="l08130"></a><span class="lineno"> 8130</span>  }</div><div class="line"><a name="l08131"></a><span class="lineno"> 8131</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l08132"></a><span class="lineno"> 8132</span> }</div><div class="line"><a name="l08133"></a><span class="lineno"> 8133</span> </div><div class="line"><a name="l08134"></a><span class="lineno"> 8134</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a></div><div class="line"><a name="l08135"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad04a677a5615054a1486ccbcf5312d90"> 8135</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad04a677a5615054a1486ccbcf5312d90">find_default_source_from_typeinfo</a>(</div><div class="line"><a name="l08136"></a><span class="lineno"> 8136</span>  ITypeInfo *pTypeInfo,</div><div class="line"><a name="l08137"></a><span class="lineno"> 8137</span>  TYPEATTR *pTypeAttr,</div><div class="line"><a name="l08138"></a><span class="lineno"> 8138</span>  ITypeInfo **ppTypeInfo)</div><div class="line"><a name="l08139"></a><span class="lineno"> 8139</span> {</div><div class="line"><a name="l08140"></a><span class="lineno"> 8140</span>  <span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0;</div><div class="line"><a name="l08141"></a><span class="lineno"> 8141</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = E_NOINTERFACE;</div><div class="line"><a name="l08142"></a><span class="lineno"> 8142</span>  <span class="keywordtype">int</span> flags;</div><div class="line"><a name="l08143"></a><span class="lineno"> 8143</span>  HREFTYPE hRefType;</div><div class="line"><a name="l08144"></a><span class="lineno"> 8144</span>  <span class="comment">/* Enumerate all implemented types of the COCLASS */</span></div><div class="line"><a name="l08145"></a><span class="lineno"> 8145</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < pTypeAttr->cImplTypes; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l08146"></a><span class="lineno"> 8146</span>  hr = pTypeInfo->lpVtbl->GetImplTypeFlags(pTypeInfo, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &flags);</div><div class="line"><a name="l08147"></a><span class="lineno"> 8147</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l08148"></a><span class="lineno"> 8148</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l08149"></a><span class="lineno"> 8149</span> </div><div class="line"><a name="l08150"></a><span class="lineno"> 8150</span>  <span class="comment">/*</span></div><div class="line"><a name="l08151"></a><span class="lineno"> 8151</span> <span class="comment"> looking for the [default] [source]</span></div><div class="line"><a name="l08152"></a><span class="lineno"> 8152</span> <span class="comment"> we just hope that it is a dispinterface :-)</span></div><div class="line"><a name="l08153"></a><span class="lineno"> 8153</span> <span class="comment"> */</span></div><div class="line"><a name="l08154"></a><span class="lineno"> 8154</span>  <span class="keywordflow">if</span> ((flags & IMPLTYPEFLAG_FDEFAULT) &&</div><div class="line"><a name="l08155"></a><span class="lineno"> 8155</span>  (flags & IMPLTYPEFLAG_FSOURCE)) {</div><div class="line"><a name="l08156"></a><span class="lineno"> 8156</span> </div><div class="line"><a name="l08157"></a><span class="lineno"> 8157</span>  hr = pTypeInfo->lpVtbl->GetRefTypeOfImplType(pTypeInfo,</div><div class="line"><a name="l08158"></a><span class="lineno"> 8158</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, &hRefType);</div><div class="line"><a name="l08159"></a><span class="lineno"> 8159</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l08160"></a><span class="lineno"> 8160</span>  <span class="keywordflow">continue</span>;</div><div class="line"><a name="l08161"></a><span class="lineno"> 8161</span>  hr = pTypeInfo->lpVtbl->GetRefTypeInfo(pTypeInfo,</div><div class="line"><a name="l08162"></a><span class="lineno"> 8162</span>  hRefType, ppTypeInfo);</div><div class="line"><a name="l08163"></a><span class="lineno"> 8163</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr))</div><div class="line"><a name="l08164"></a><span class="lineno"> 8164</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l08165"></a><span class="lineno"> 8165</span>  }</div><div class="line"><a name="l08166"></a><span class="lineno"> 8166</span>  }</div><div class="line"><a name="l08167"></a><span class="lineno"> 8167</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l08168"></a><span class="lineno"> 8168</span> }</div><div class="line"><a name="l08169"></a><span class="lineno"> 8169</span> </div><div class="line"><a name="l08170"></a><span class="lineno"> 8170</span> <span class="keyword">static</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a></div><div class="line"><a name="l08171"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aa667691c99d3a2eca3c54e53df289a9a"> 8171</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aa667691c99d3a2eca3c54e53df289a9a">find_default_source</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole, IID *piid, ITypeInfo **ppTypeInfo)</div><div class="line"><a name="l08172"></a><span class="lineno"> 8172</span> {</div><div class="line"><a name="l08173"></a><span class="lineno"> 8173</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l08174"></a><span class="lineno"> 8174</span>  IProvideClassInfo2 *pProvideClassInfo2;</div><div class="line"><a name="l08175"></a><span class="lineno"> 8175</span>  IProvideClassInfo *pProvideClassInfo;</div><div class="line"><a name="l08176"></a><span class="lineno"> 8176</span>  <span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l08177"></a><span class="lineno"> 8177</span> </div><div class="line"><a name="l08178"></a><span class="lineno"> 8178</span>  IDispatch *<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l08179"></a><span class="lineno"> 8179</span>  ITypeInfo *pTypeInfo;</div><div class="line"><a name="l08180"></a><span class="lineno"> 8180</span>  ITypeInfo *pTypeInfo2 = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l08181"></a><span class="lineno"> 8181</span>  TYPEATTR *pTypeAttr;</div><div class="line"><a name="l08182"></a><span class="lineno"> 8182</span>  TYPEATTR *pTypeAttr2 = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l08183"></a><span class="lineno"> 8183</span> </div><div class="line"><a name="l08184"></a><span class="lineno"> 8184</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l08185"></a><span class="lineno"> 8185</span> </div><div class="line"><a name="l08186"></a><span class="lineno"> 8186</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(ole, pole);</div><div class="line"><a name="l08187"></a><span class="lineno"> 8187</span>  <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a> = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l08188"></a><span class="lineno"> 8188</span>  hr = <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->QueryInterface(<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>,</div><div class="line"><a name="l08189"></a><span class="lineno"> 8189</span>  &IID_IProvideClassInfo2,</div><div class="line"><a name="l08190"></a><span class="lineno"> 8190</span>  &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l08191"></a><span class="lineno"> 8191</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l08192"></a><span class="lineno"> 8192</span>  pProvideClassInfo2 = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l08193"></a><span class="lineno"> 8193</span>  hr = pProvideClassInfo2->lpVtbl->GetGUID(pProvideClassInfo2,</div><div class="line"><a name="l08194"></a><span class="lineno"> 8194</span>  GUIDKIND_DEFAULT_SOURCE_DISP_IID,</div><div class="line"><a name="l08195"></a><span class="lineno"> 8195</span>  piid);</div><div class="line"><a name="l08196"></a><span class="lineno"> 8196</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pProvideClassInfo2);</div><div class="line"><a name="l08197"></a><span class="lineno"> 8197</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l08198"></a><span class="lineno"> 8198</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a31a904a59156f31da8443d0d06ad1154">find_iid</a>(ole, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>, piid, ppTypeInfo);</div><div class="line"><a name="l08199"></a><span class="lineno"> 8199</span>  }</div><div class="line"><a name="l08200"></a><span class="lineno"> 8200</span>  }</div><div class="line"><a name="l08201"></a><span class="lineno"> 8201</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l08202"></a><span class="lineno"> 8202</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l08203"></a><span class="lineno"> 8203</span>  }</div><div class="line"><a name="l08204"></a><span class="lineno"> 8204</span>  hr = <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->QueryInterface(<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>,</div><div class="line"><a name="l08205"></a><span class="lineno"> 8205</span>  &IID_IProvideClassInfo,</div><div class="line"><a name="l08206"></a><span class="lineno"> 8206</span>  &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l08207"></a><span class="lineno"> 8207</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l08208"></a><span class="lineno"> 8208</span>  pProvideClassInfo = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l08209"></a><span class="lineno"> 8209</span>  hr = pProvideClassInfo->lpVtbl->GetClassInfo(pProvideClassInfo,</div><div class="line"><a name="l08210"></a><span class="lineno"> 8210</span>  &pTypeInfo);</div><div class="line"><a name="l08211"></a><span class="lineno"> 8211</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pProvideClassInfo);</div><div class="line"><a name="l08212"></a><span class="lineno"> 8212</span>  }</div><div class="line"><a name="l08213"></a><span class="lineno"> 8213</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08214"></a><span class="lineno"> 8214</span>  hr = <a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>->lpVtbl->GetTypeInfo(<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>, 0, <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>, &pTypeInfo );</div><div class="line"><a name="l08215"></a><span class="lineno"> 8215</span>  }</div><div class="line"><a name="l08216"></a><span class="lineno"> 8216</span>  <span class="keywordflow">if</span> (FAILED(hr))</div><div class="line"><a name="l08217"></a><span class="lineno"> 8217</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l08218"></a><span class="lineno"> 8218</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a>(pTypeInfo, &pTypeAttr);</div><div class="line"><a name="l08219"></a><span class="lineno"> 8219</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08220"></a><span class="lineno"> 8220</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l08221"></a><span class="lineno"> 8221</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l08222"></a><span class="lineno"> 8222</span>  }</div><div class="line"><a name="l08223"></a><span class="lineno"> 8223</span> </div><div class="line"><a name="l08224"></a><span class="lineno"> 8224</span>  *ppTypeInfo = 0;</div><div class="line"><a name="l08225"></a><span class="lineno"> 8225</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#ad04a677a5615054a1486ccbcf5312d90">find_default_source_from_typeinfo</a>(pTypeInfo, pTypeAttr, ppTypeInfo);</div><div class="line"><a name="l08226"></a><span class="lineno"> 8226</span>  <span class="keywordflow">if</span> (!*ppTypeInfo) {</div><div class="line"><a name="l08227"></a><span class="lineno"> 8227</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aefa742f168b66b0f6f438656c8704e0a">find_coclass</a>(pTypeInfo, pTypeAttr, &pTypeInfo2, &pTypeAttr2);</div><div class="line"><a name="l08228"></a><span class="lineno"> 8228</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l08229"></a><span class="lineno"> 8229</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#ad04a677a5615054a1486ccbcf5312d90">find_default_source_from_typeinfo</a>(pTypeInfo2, pTypeAttr2, ppTypeInfo);</div><div class="line"><a name="l08230"></a><span class="lineno"> 8230</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(pTypeInfo2, pTypeAttr2);</div><div class="line"><a name="l08231"></a><span class="lineno"> 8231</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo2);</div><div class="line"><a name="l08232"></a><span class="lineno"> 8232</span>  }</div><div class="line"><a name="l08233"></a><span class="lineno"> 8233</span>  }</div><div class="line"><a name="l08234"></a><span class="lineno"> 8234</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a>(pTypeInfo, pTypeAttr);</div><div class="line"><a name="l08235"></a><span class="lineno"> 8235</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l08236"></a><span class="lineno"> 8236</span>  <span class="comment">/* Now that would be a bad surprise, if we didn't find it, wouldn't it? */</span></div><div class="line"><a name="l08237"></a><span class="lineno"> 8237</span>  <span class="keywordflow">if</span> (!*ppTypeInfo) {</div><div class="line"><a name="l08238"></a><span class="lineno"> 8238</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr))</div><div class="line"><a name="l08239"></a><span class="lineno"> 8239</span>  hr = E_UNEXPECTED;</div><div class="line"><a name="l08240"></a><span class="lineno"> 8240</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l08241"></a><span class="lineno"> 8241</span>  }</div><div class="line"><a name="l08242"></a><span class="lineno"> 8242</span> </div><div class="line"><a name="l08243"></a><span class="lineno"> 8243</span>  <span class="comment">/* Determine IID of default source interface */</span></div><div class="line"><a name="l08244"></a><span class="lineno"> 8244</span>  hr = (*ppTypeInfo)->lpVtbl->GetTypeAttr(*ppTypeInfo, &pTypeAttr);</div><div class="line"><a name="l08245"></a><span class="lineno"> 8245</span>  <span class="keywordflow">if</span> (SUCCEEDED(hr)) {</div><div class="line"><a name="l08246"></a><span class="lineno"> 8246</span>  *piid = pTypeAttr->guid;</div><div class="line"><a name="l08247"></a><span class="lineno"> 8247</span>  (*ppTypeInfo)->lpVtbl->ReleaseTypeAttr(*ppTypeInfo, pTypeAttr);</div><div class="line"><a name="l08248"></a><span class="lineno"> 8248</span>  }</div><div class="line"><a name="l08249"></a><span class="lineno"> 8249</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l08250"></a><span class="lineno"> 8250</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(*ppTypeInfo);</div><div class="line"><a name="l08251"></a><span class="lineno"> 8251</span> </div><div class="line"><a name="l08252"></a><span class="lineno"> 8252</span>  <span class="keywordflow">return</span> hr;</div><div class="line"><a name="l08253"></a><span class="lineno"> 8253</span> </div><div class="line"><a name="l08254"></a><span class="lineno"> 8254</span> }</div><div class="line"><a name="l08255"></a><span class="lineno"> 8255</span> </div><div class="line"><a name="l08256"></a><span class="lineno"> 8256</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l08257"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a93abd4f6b8ab587be4f474c40cc630f1"> 8257</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a93abd4f6b8ab587be4f474c40cc630f1">ole_event_free</a>(<span class="keyword">struct</span> <a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a> *poleev)</div><div class="line"><a name="l08258"></a><span class="lineno"> 8258</span> {</div><div class="line"><a name="l08259"></a><span class="lineno"> 8259</span>  <span class="keywordflow">if</span> (poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>) {</div><div class="line"><a name="l08260"></a><span class="lineno"> 8260</span>  poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>->lpVtbl->Unadvise(poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>, poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ae70fbdd278d71d8deb0ab81de2b82d82">dwCookie</a>);</div><div class="line"><a name="l08261"></a><span class="lineno"> 8261</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>);</div><div class="line"><a name="l08262"></a><span class="lineno"> 8262</span>  poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l08263"></a><span class="lineno"> 8263</span>  }</div><div class="line"><a name="l08264"></a><span class="lineno"> 8264</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(poleev);</div><div class="line"><a name="l08265"></a><span class="lineno"> 8265</span> }</div><div class="line"><a name="l08266"></a><span class="lineno"> 8266</span> </div><div class="line"><a name="l08267"></a><span class="lineno"> 8267</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08268"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad2e1b59fa7e18c47b5de24b1a58b6ff7"> 8268</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad2e1b59fa7e18c47b5de24b1a58b6ff7">fev_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass)</div><div class="line"><a name="l08269"></a><span class="lineno"> 8269</span> {</div><div class="line"><a name="l08270"></a><span class="lineno"> 8270</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj;</div><div class="line"><a name="l08271"></a><span class="lineno"> 8271</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a> *poleev;</div><div class="line"><a name="l08272"></a><span class="lineno"> 8272</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad80ce51081780f829134de0338821b76">Data_Make_Struct</a>(klass,<span class="keyword">struct</span> <a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a>,0,<a class="code" href="../../d2/d99/win32ole_8c.html#a93abd4f6b8ab587be4f474c40cc630f1">ole_event_free</a>,poleev);</div><div class="line"><a name="l08273"></a><span class="lineno"> 8273</span>  poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ae70fbdd278d71d8deb0ab81de2b82d82">dwCookie</a> = 0;</div><div class="line"><a name="l08274"></a><span class="lineno"> 8274</span>  poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l08275"></a><span class="lineno"> 8275</span>  poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#a6a6acfb04132992781ab9d405530e9f8">event_id</a> = 0;</div><div class="line"><a name="l08276"></a><span class="lineno"> 8276</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l08277"></a><span class="lineno"> 8277</span> }</div><div class="line"><a name="l08278"></a><span class="lineno"> 8278</span> </div><div class="line"><a name="l08279"></a><span class="lineno"> 8279</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08280"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5f4caca75a1ca7971310c4f7909bda33"> 8280</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5f4caca75a1ca7971310c4f7909bda33">ev_advise</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l08281"></a><span class="lineno"> 8281</span> {</div><div class="line"><a name="l08282"></a><span class="lineno"> 8282</span> </div><div class="line"><a name="l08283"></a><span class="lineno"> 8283</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> ole, itf;</div><div class="line"><a name="l08284"></a><span class="lineno"> 8284</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d03/structoledata.html">oledata</a> *pole;</div><div class="line"><a name="l08285"></a><span class="lineno"> 8285</span>  <span class="keywordtype">char</span> *pitf;</div><div class="line"><a name="l08286"></a><span class="lineno"> 8286</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l08287"></a><span class="lineno"> 8287</span>  IID iid;</div><div class="line"><a name="l08288"></a><span class="lineno"> 8288</span>  ITypeInfo *pTypeInfo = 0;</div><div class="line"><a name="l08289"></a><span class="lineno"> 8289</span>  IDispatch *<a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l08290"></a><span class="lineno"> 8290</span>  IConnectionPointContainer *pContainer;</div><div class="line"><a name="l08291"></a><span class="lineno"> 8291</span>  IConnectionPoint *pConnectionPoint;</div><div class="line"><a name="l08292"></a><span class="lineno"> 8292</span>  <a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">IEVENTSINKOBJ</a> *pIEV;</div><div class="line"><a name="l08293"></a><span class="lineno"> 8293</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a> dwCookie;</div><div class="line"><a name="l08294"></a><span class="lineno"> 8294</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a> *poleev;</div><div class="line"><a name="l08295"></a><span class="lineno"> 8295</span>  <span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l08296"></a><span class="lineno"> 8296</span> </div><div class="line"><a name="l08297"></a><span class="lineno"> 8297</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a98b91af598acb64fe8497413ce498766">rb_secure</a>(4);</div><div class="line"><a name="l08298"></a><span class="lineno"> 8298</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="stringliteral">"11"</span>, &ole, &itf);</div><div class="line"><a name="l08299"></a><span class="lineno"> 8299</span> </div><div class="line"><a name="l08300"></a><span class="lineno"> 8300</span>  <span class="keywordflow">if</span> (!<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(ole, <a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>)) {</div><div class="line"><a name="l08301"></a><span class="lineno"> 8301</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"1st parameter must be WIN32OLE object"</span>);</div><div class="line"><a name="l08302"></a><span class="lineno"> 8302</span>  }</div><div class="line"><a name="l08303"></a><span class="lineno"> 8303</span> </div><div class="line"><a name="l08304"></a><span class="lineno"> 8304</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(itf) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3a7d10c48d5dff0a5d4aa94acb74811a">T_NIL</a>) {</div><div class="line"><a name="l08305"></a><span class="lineno"> 8305</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d9d/tcltklib_8c.html#a6f520624fabb8332dc98fd223491bf8d">rb_safe_level</a>() > 0 && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a621bc62b1fd82640c1078daf90e1c061">OBJ_TAINTED</a>(itf)) {</div><div class="line"><a name="l08306"></a><span class="lineno"> 8306</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ae53f1d228c34c2a7715d7d39ab1a2991">rb_eSecurityError</a>, <span class="stringliteral">"Insecure Event Creation - %s"</span>,</div><div class="line"><a name="l08307"></a><span class="lineno"> 8307</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(itf));</div><div class="line"><a name="l08308"></a><span class="lineno"> 8308</span>  }</div><div class="line"><a name="l08309"></a><span class="lineno"> 8309</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0381640e2905c1b3e104194f91697ca4">SafeStringValue</a>(itf);</div><div class="line"><a name="l08310"></a><span class="lineno"> 8310</span>  pitf = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a>(itf);</div><div class="line"><a name="l08311"></a><span class="lineno"> 8311</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a31a904a59156f31da8443d0d06ad1154">find_iid</a>(ole, pitf, &iid, &pTypeInfo);</div><div class="line"><a name="l08312"></a><span class="lineno"> 8312</span>  }</div><div class="line"><a name="l08313"></a><span class="lineno"> 8313</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l08314"></a><span class="lineno"> 8314</span>  hr = <a class="code" href="../../d2/d99/win32ole_8c.html#aa667691c99d3a2eca3c54e53df289a9a">find_default_source</a>(ole, &iid, &pTypeInfo);</div><div class="line"><a name="l08315"></a><span class="lineno"> 8315</span>  }</div><div class="line"><a name="l08316"></a><span class="lineno"> 8316</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08317"></a><span class="lineno"> 8317</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"interface not found"</span>);</div><div class="line"><a name="l08318"></a><span class="lineno"> 8318</span>  }</div><div class="line"><a name="l08319"></a><span class="lineno"> 8319</span> </div><div class="line"><a name="l08320"></a><span class="lineno"> 8320</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a>(ole, pole);</div><div class="line"><a name="l08321"></a><span class="lineno"> 8321</span>  pDispatch = pole-><a class="code" href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">pDispatch</a>;</div><div class="line"><a name="l08322"></a><span class="lineno"> 8322</span>  hr = pDispatch->lpVtbl->QueryInterface(pDispatch,</div><div class="line"><a name="l08323"></a><span class="lineno"> 8323</span>  &IID_IConnectionPointContainer,</div><div class="line"><a name="l08324"></a><span class="lineno"> 8324</span>  &<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l08325"></a><span class="lineno"> 8325</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08326"></a><span class="lineno"> 8326</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l08327"></a><span class="lineno"> 8327</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>,</div><div class="line"><a name="l08328"></a><span class="lineno"> 8328</span>  <span class="stringliteral">"failed to query IConnectionPointContainer"</span>);</div><div class="line"><a name="l08329"></a><span class="lineno"> 8329</span>  }</div><div class="line"><a name="l08330"></a><span class="lineno"> 8330</span>  pContainer = <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l08331"></a><span class="lineno"> 8331</span> </div><div class="line"><a name="l08332"></a><span class="lineno"> 8332</span>  hr = pContainer->lpVtbl->FindConnectionPoint(pContainer,</div><div class="line"><a name="l08333"></a><span class="lineno"> 8333</span>  &iid,</div><div class="line"><a name="l08334"></a><span class="lineno"> 8334</span>  &<a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>);</div><div class="line"><a name="l08335"></a><span class="lineno"> 8335</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pContainer);</div><div class="line"><a name="l08336"></a><span class="lineno"> 8336</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08337"></a><span class="lineno"> 8337</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(pTypeInfo);</div><div class="line"><a name="l08338"></a><span class="lineno"> 8338</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to query IConnectionPoint"</span>);</div><div class="line"><a name="l08339"></a><span class="lineno"> 8339</span>  }</div><div class="line"><a name="l08340"></a><span class="lineno"> 8340</span>  pIEV = <a class="code" href="../../d2/d99/win32ole_8c.html#abd8eee90347509b486bdfcb4c7724f2c">EVENTSINK_Constructor</a>();</div><div class="line"><a name="l08341"></a><span class="lineno"> 8341</span>  pIEV-><a class="code" href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a43748b00fee8549ca149ced8bc12d0b9">m_iid</a> = iid;</div><div class="line"><a name="l08342"></a><span class="lineno"> 8342</span>  hr = <a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>->lpVtbl->Advise(<a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>,</div><div class="line"><a name="l08343"></a><span class="lineno"> 8343</span>  (IUnknown*)pIEV,</div><div class="line"><a name="l08344"></a><span class="lineno"> 8344</span>  &<a class="code" href="../../d1/d5d/structoleeventdata.html#ae70fbdd278d71d8deb0ab81de2b82d82">dwCookie</a>);</div><div class="line"><a name="l08345"></a><span class="lineno"> 8345</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08346"></a><span class="lineno"> 8346</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"Advise Error"</span>);</div><div class="line"><a name="l08347"></a><span class="lineno"> 8347</span>  }</div><div class="line"><a name="l08348"></a><span class="lineno"> 8348</span> </div><div class="line"><a name="l08349"></a><span class="lineno"> 8349</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a>, poleev);</div><div class="line"><a name="l08350"></a><span class="lineno"> 8350</span>  pIEV->m_event_id</div><div class="line"><a name="l08351"></a><span class="lineno"> 8351</span>  = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad369fee2d0d724ef2fe3535240b981c7">evs_length</a>());</div><div class="line"><a name="l08352"></a><span class="lineno"> 8352</span>  pIEV->pTypeInfo = pTypeInfo;</div><div class="line"><a name="l08353"></a><span class="lineno"> 8353</span>  poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ae70fbdd278d71d8deb0ab81de2b82d82">dwCookie</a> = <a class="code" href="../../d1/d5d/structoleeventdata.html#ae70fbdd278d71d8deb0ab81de2b82d82">dwCookie</a>;</div><div class="line"><a name="l08354"></a><span class="lineno"> 8354</span>  poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a> = <a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>;</div><div class="line"><a name="l08355"></a><span class="lineno"> 8355</span>  poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#a6a6acfb04132992781ab9d405530e9f8">event_id</a> = pIEV->m_event_id;</div><div class="line"><a name="l08356"></a><span class="lineno"> 8356</span> </div><div class="line"><a name="l08357"></a><span class="lineno"> 8357</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l08358"></a><span class="lineno"> 8358</span> }</div><div class="line"><a name="l08359"></a><span class="lineno"> 8359</span> </div><div class="line"><a name="l08360"></a><span class="lineno"> 8360</span> <span class="comment">/*</span></div><div class="line"><a name="l08361"></a><span class="lineno"> 8361</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08362"></a><span class="lineno"> 8362</span> <span class="comment"> * WIN32OLE_EVENT.new(ole, event) #=> WIN32OLE_EVENT object.</span></div><div class="line"><a name="l08363"></a><span class="lineno"> 8363</span> <span class="comment"> *</span></div><div class="line"><a name="l08364"></a><span class="lineno"> 8364</span> <span class="comment"> * Returns OLE event object.</span></div><div class="line"><a name="l08365"></a><span class="lineno"> 8365</span> <span class="comment"> * The first argument specifies WIN32OLE object.</span></div><div class="line"><a name="l08366"></a><span class="lineno"> 8366</span> <span class="comment"> * The second argument specifies OLE event name.</span></div><div class="line"><a name="l08367"></a><span class="lineno"> 8367</span> <span class="comment"> * ie = WIN32OLE.new('InternetExplorer.Application')</span></div><div class="line"><a name="l08368"></a><span class="lineno"> 8368</span> <span class="comment"> * ev = WIN32OLE_EVENT.new(ie, 'DWebBrowserEvents')</span></div><div class="line"><a name="l08369"></a><span class="lineno"> 8369</span> <span class="comment"> */</span></div><div class="line"><a name="l08370"></a><span class="lineno"> 8370</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08371"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6bcacff9ce50a9417b8b262dba751248"> 8371</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6bcacff9ce50a9417b8b262dba751248">fev_initialize</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l08372"></a><span class="lineno"> 8372</span> {</div><div class="line"><a name="l08373"></a><span class="lineno"> 8373</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5f4caca75a1ca7971310c4f7909bda33">ev_advise</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="keyword">self</span>);</div><div class="line"><a name="l08374"></a><span class="lineno"> 8374</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aaac85a21f4e352281fef326427354f95">evs_push</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l08375"></a><span class="lineno"> 8375</span>  <a class="code" href="../../db/d2e/intern_8h.html#acee88ad0375c8a9080e2283db494d257">rb_ivar_set</a>(<span class="keyword">self</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a0ce01fae8d4199ffd5f3df63cf0796f8">id_events</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>());</div><div class="line"><a name="l08376"></a><span class="lineno"> 8376</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae384ff6b7496bc19a6cc419461cf61f5">fev_set_handler</a>(<span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>);</div><div class="line"><a name="l08377"></a><span class="lineno"> 8377</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l08378"></a><span class="lineno"> 8378</span> }</div><div class="line"><a name="l08379"></a><span class="lineno"> 8379</span> </div><div class="line"><a name="l08380"></a><span class="lineno"> 8380</span> <span class="comment">/*</span></div><div class="line"><a name="l08381"></a><span class="lineno"> 8381</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08382"></a><span class="lineno"> 8382</span> <span class="comment"> * WIN32OLE_EVENT.message_loop</span></div><div class="line"><a name="l08383"></a><span class="lineno"> 8383</span> <span class="comment"> *</span></div><div class="line"><a name="l08384"></a><span class="lineno"> 8384</span> <span class="comment"> * Translates and dispatches Windows message.</span></div><div class="line"><a name="l08385"></a><span class="lineno"> 8385</span> <span class="comment"> */</span></div><div class="line"><a name="l08386"></a><span class="lineno"> 8386</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08387"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a593b161d7b4621b0e6b31434cec8d8cc"> 8387</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a593b161d7b4621b0e6b31434cec8d8cc">fev_s_msg_loop</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass)</div><div class="line"><a name="l08388"></a><span class="lineno"> 8388</span> {</div><div class="line"><a name="l08389"></a><span class="lineno"> 8389</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aa3eea8970bbdd932344cbf86e9bbe95c">ole_msg_loop</a>();</div><div class="line"><a name="l08390"></a><span class="lineno"> 8390</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l08391"></a><span class="lineno"> 8391</span> }</div><div class="line"><a name="l08392"></a><span class="lineno"> 8392</span> </div><div class="line"><a name="l08393"></a><span class="lineno"> 8393</span> </div><div class="line"><a name="l08394"></a><span class="lineno"> 8394</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l08395"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6f226d1adae4b7b9897502c69e03520a"> 8395</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6f226d1adae4b7b9897502c69e03520a">add_event_call_back</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> event, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> data)</div><div class="line"><a name="l08396"></a><span class="lineno"> 8396</span> {</div><div class="line"><a name="l08397"></a><span class="lineno"> 8397</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> events = <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(obj, <a class="code" href="../../d2/d99/win32ole_8c.html#a0ce01fae8d4199ffd5f3df63cf0796f8">id_events</a>);</div><div class="line"><a name="l08398"></a><span class="lineno"> 8398</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(events) || <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(events) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>) {</div><div class="line"><a name="l08399"></a><span class="lineno"> 8399</span>  events = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l08400"></a><span class="lineno"> 8400</span>  <a class="code" href="../../db/d2e/intern_8h.html#acee88ad0375c8a9080e2283db494d257">rb_ivar_set</a>(obj, <a class="code" href="../../d2/d99/win32ole_8c.html#a0ce01fae8d4199ffd5f3df63cf0796f8">id_events</a>, events);</div><div class="line"><a name="l08401"></a><span class="lineno"> 8401</span>  }</div><div class="line"><a name="l08402"></a><span class="lineno"> 8402</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a81d5683f19a2b3e891115a7005223ecf">ole_delete_event</a>(events, event);</div><div class="line"><a name="l08403"></a><span class="lineno"> 8403</span>  <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(events, data);</div><div class="line"><a name="l08404"></a><span class="lineno"> 8404</span> }</div><div class="line"><a name="l08405"></a><span class="lineno"> 8405</span> </div><div class="line"><a name="l08406"></a><span class="lineno"> 8406</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08407"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac7520bee4cf7fecac67c8ad2fa6659b8"> 8407</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac7520bee4cf7fecac67c8ad2fa6659b8">ev_on_event</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> is_ary_arg)</div><div class="line"><a name="l08408"></a><span class="lineno"> 8408</span> {</div><div class="line"><a name="l08409"></a><span class="lineno"> 8409</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a> *poleev;</div><div class="line"><a name="l08410"></a><span class="lineno"> 8410</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> event, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, data;</div><div class="line"><a name="l08411"></a><span class="lineno"> 8411</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a>, poleev);</div><div class="line"><a name="l08412"></a><span class="lineno"> 8412</span>  <span class="keywordflow">if</span> (poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a> == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l08413"></a><span class="lineno"> 8413</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"IConnectionPoint not found. You must call advise at first."</span>);</div><div class="line"><a name="l08414"></a><span class="lineno"> 8414</span>  }</div><div class="line"><a name="l08415"></a><span class="lineno"> 8415</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="stringliteral">"01*"</span>, &event, &<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l08416"></a><span class="lineno"> 8416</span>  <span class="keywordflow">if</span>(!<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(event)) {</div><div class="line"><a name="l08417"></a><span class="lineno"> 8417</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(event) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a> && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(event) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a>) {</div><div class="line"><a name="l08418"></a><span class="lineno"> 8418</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"wrong argument type (expected String or Symbol)"</span>);</div><div class="line"><a name="l08419"></a><span class="lineno"> 8419</span>  }</div><div class="line"><a name="l08420"></a><span class="lineno"> 8420</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(event) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a>) {</div><div class="line"><a name="l08421"></a><span class="lineno"> 8421</span>  <span class="keyword">event</span> = <a class="code" href="../../db/d2e/intern_8h.html#a6b530fce35a344ec394c08c6643cdd8a">rb_sym_to_s</a>(event);</div><div class="line"><a name="l08422"></a><span class="lineno"> 8422</span>  }</div><div class="line"><a name="l08423"></a><span class="lineno"> 8423</span>  }</div><div class="line"><a name="l08424"></a><span class="lineno"> 8424</span>  data = <a class="code" href="../../dc/dcc/array_8c.html#a8317ecd6a0abb5ad08c50c732f30059b">rb_ary_new3</a>(4, <a class="code" href="../../db/d2e/intern_8h.html#a7b330d2905c5f0c9a68cef4ebba5c00f">rb_block_proc</a>(), event, <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, is_ary_arg);</div><div class="line"><a name="l08425"></a><span class="lineno"> 8425</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a6f226d1adae4b7b9897502c69e03520a">add_event_call_back</a>(<span class="keyword">self</span>, event, data);</div><div class="line"><a name="l08426"></a><span class="lineno"> 8426</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l08427"></a><span class="lineno"> 8427</span> }</div><div class="line"><a name="l08428"></a><span class="lineno"> 8428</span> </div><div class="line"><a name="l08429"></a><span class="lineno"> 8429</span> <span class="comment">/*</span></div><div class="line"><a name="l08430"></a><span class="lineno"> 8430</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08431"></a><span class="lineno"> 8431</span> <span class="comment"> * WIN32OLE_EVENT#on_event([event]){...}</span></div><div class="line"><a name="l08432"></a><span class="lineno"> 8432</span> <span class="comment"> *</span></div><div class="line"><a name="l08433"></a><span class="lineno"> 8433</span> <span class="comment"> * Defines the callback event.</span></div><div class="line"><a name="l08434"></a><span class="lineno"> 8434</span> <span class="comment"> * If argument is omitted, this method defines the callback of all events.</span></div><div class="line"><a name="l08435"></a><span class="lineno"> 8435</span> <span class="comment"> * If you want to modify reference argument in callback, return hash in</span></div><div class="line"><a name="l08436"></a><span class="lineno"> 8436</span> <span class="comment"> * callback. If you want to return value to OLE server as result of callback</span></div><div class="line"><a name="l08437"></a><span class="lineno"> 8437</span> <span class="comment"> * use `return' or :return.</span></div><div class="line"><a name="l08438"></a><span class="lineno"> 8438</span> <span class="comment"> *</span></div><div class="line"><a name="l08439"></a><span class="lineno"> 8439</span> <span class="comment"> * ie = WIN32OLE.new('InternetExplorer.Application')</span></div><div class="line"><a name="l08440"></a><span class="lineno"> 8440</span> <span class="comment"> * ev = WIN32OLE_EVENT.new(ie)</span></div><div class="line"><a name="l08441"></a><span class="lineno"> 8441</span> <span class="comment"> * ev.on_event("NavigateComplete") {|url| puts url}</span></div><div class="line"><a name="l08442"></a><span class="lineno"> 8442</span> <span class="comment"> * ev.on_event() {|ev, *args| puts "#{ev} fired"}</span></div><div class="line"><a name="l08443"></a><span class="lineno"> 8443</span> <span class="comment"> *</span></div><div class="line"><a name="l08444"></a><span class="lineno"> 8444</span> <span class="comment"> * ev.on_event("BeforeNavigate2") {|*args|</span></div><div class="line"><a name="l08445"></a><span class="lineno"> 8445</span> <span class="comment"> * ...</span></div><div class="line"><a name="l08446"></a><span class="lineno"> 8446</span> <span class="comment"> * # set true to BeforeNavigate reference argument `Cancel'.</span></div><div class="line"><a name="l08447"></a><span class="lineno"> 8447</span> <span class="comment"> * # Cancel is 7-th argument of BeforeNavigate,</span></div><div class="line"><a name="l08448"></a><span class="lineno"> 8448</span> <span class="comment"> * # so you can use 6 as key of hash instead of 'Cancel'.</span></div><div class="line"><a name="l08449"></a><span class="lineno"> 8449</span> <span class="comment"> * # The argument is counted from 0.</span></div><div class="line"><a name="l08450"></a><span class="lineno"> 8450</span> <span class="comment"> * # The hash key of 0 means first argument.)</span></div><div class="line"><a name="l08451"></a><span class="lineno"> 8451</span> <span class="comment"> * {:Cancel => true} # or {'Cancel' => true} or {6 => true}</span></div><div class="line"><a name="l08452"></a><span class="lineno"> 8452</span> <span class="comment"> * }</span></div><div class="line"><a name="l08453"></a><span class="lineno"> 8453</span> <span class="comment"> *</span></div><div class="line"><a name="l08454"></a><span class="lineno"> 8454</span> <span class="comment"> * ev.on_event(...) {|*args|</span></div><div class="line"><a name="l08455"></a><span class="lineno"> 8455</span> <span class="comment"> * {:return => 1, :xxx => yyy}</span></div><div class="line"><a name="l08456"></a><span class="lineno"> 8456</span> <span class="comment"> * }</span></div><div class="line"><a name="l08457"></a><span class="lineno"> 8457</span> <span class="comment"> */</span></div><div class="line"><a name="l08458"></a><span class="lineno"> 8458</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08459"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aab8c56df7fcad310b56c1785e2beae95"> 8459</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aab8c56df7fcad310b56c1785e2beae95">fev_on_event</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l08460"></a><span class="lineno"> 8460</span> {</div><div class="line"><a name="l08461"></a><span class="lineno"> 8461</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac7520bee4cf7fecac67c8ad2fa6659b8">ev_on_event</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a>);</div><div class="line"><a name="l08462"></a><span class="lineno"> 8462</span> }</div><div class="line"><a name="l08463"></a><span class="lineno"> 8463</span> </div><div class="line"><a name="l08464"></a><span class="lineno"> 8464</span> <span class="comment">/*</span></div><div class="line"><a name="l08465"></a><span class="lineno"> 8465</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08466"></a><span class="lineno"> 8466</span> <span class="comment"> * WIN32OLE_EVENT#on_event_with_outargs([event]){...}</span></div><div class="line"><a name="l08467"></a><span class="lineno"> 8467</span> <span class="comment"> *</span></div><div class="line"><a name="l08468"></a><span class="lineno"> 8468</span> <span class="comment"> * Defines the callback of event.</span></div><div class="line"><a name="l08469"></a><span class="lineno"> 8469</span> <span class="comment"> * If you want modify argument in callback,</span></div><div class="line"><a name="l08470"></a><span class="lineno"> 8470</span> <span class="comment"> * you could use this method instead of WIN32OLE_EVENT#on_event.</span></div><div class="line"><a name="l08471"></a><span class="lineno"> 8471</span> <span class="comment"> *</span></div><div class="line"><a name="l08472"></a><span class="lineno"> 8472</span> <span class="comment"> * ie = WIN32OLE.new('InternetExplorer.Application')</span></div><div class="line"><a name="l08473"></a><span class="lineno"> 8473</span> <span class="comment"> * ev = WIN32OLE_EVENT.new(ie)</span></div><div class="line"><a name="l08474"></a><span class="lineno"> 8474</span> <span class="comment"> * ev.on_event_with_outargs('BeforeNavigate2') {|*args|</span></div><div class="line"><a name="l08475"></a><span class="lineno"> 8475</span> <span class="comment"> * args.last[6] = true</span></div><div class="line"><a name="l08476"></a><span class="lineno"> 8476</span> <span class="comment"> * }</span></div><div class="line"><a name="l08477"></a><span class="lineno"> 8477</span> <span class="comment"> */</span></div><div class="line"><a name="l08478"></a><span class="lineno"> 8478</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08479"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a1f53a6e31877dd97034b00483513dd88"> 8479</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a1f53a6e31877dd97034b00483513dd88">fev_on_event_with_outargs</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l08480"></a><span class="lineno"> 8480</span> {</div><div class="line"><a name="l08481"></a><span class="lineno"> 8481</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac7520bee4cf7fecac67c8ad2fa6659b8">ev_on_event</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a>);</div><div class="line"><a name="l08482"></a><span class="lineno"> 8482</span> }</div><div class="line"><a name="l08483"></a><span class="lineno"> 8483</span> </div><div class="line"><a name="l08484"></a><span class="lineno"> 8484</span> <span class="comment">/*</span></div><div class="line"><a name="l08485"></a><span class="lineno"> 8485</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08486"></a><span class="lineno"> 8486</span> <span class="comment"> * WIN32OLE_EVENT#off_event([event])</span></div><div class="line"><a name="l08487"></a><span class="lineno"> 8487</span> <span class="comment"> *</span></div><div class="line"><a name="l08488"></a><span class="lineno"> 8488</span> <span class="comment"> * removes the callback of event.</span></div><div class="line"><a name="l08489"></a><span class="lineno"> 8489</span> <span class="comment"> *</span></div><div class="line"><a name="l08490"></a><span class="lineno"> 8490</span> <span class="comment"> * ie = WIN32OLE.new('InternetExplorer.Application')</span></div><div class="line"><a name="l08491"></a><span class="lineno"> 8491</span> <span class="comment"> * ev = WIN32OLE_EVENT.new(ie)</span></div><div class="line"><a name="l08492"></a><span class="lineno"> 8492</span> <span class="comment"> * ev.on_event('BeforeNavigate2') {|*args|</span></div><div class="line"><a name="l08493"></a><span class="lineno"> 8493</span> <span class="comment"> * args.last[6] = true</span></div><div class="line"><a name="l08494"></a><span class="lineno"> 8494</span> <span class="comment"> * }</span></div><div class="line"><a name="l08495"></a><span class="lineno"> 8495</span> <span class="comment"> * ...</span></div><div class="line"><a name="l08496"></a><span class="lineno"> 8496</span> <span class="comment"> * ev.off_event('BeforeNavigate2')</span></div><div class="line"><a name="l08497"></a><span class="lineno"> 8497</span> <span class="comment"> * ...</span></div><div class="line"><a name="l08498"></a><span class="lineno"> 8498</span> <span class="comment"> */</span></div><div class="line"><a name="l08499"></a><span class="lineno"> 8499</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08500"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2fe63f55350b20cc7532caf5ad0e7ccc"> 8500</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2fe63f55350b20cc7532caf5ad0e7ccc">fev_off_event</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l08501"></a><span class="lineno"> 8501</span> {</div><div class="line"><a name="l08502"></a><span class="lineno"> 8502</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">event</span> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l08503"></a><span class="lineno"> 8503</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> events;</div><div class="line"><a name="l08504"></a><span class="lineno"> 8504</span> </div><div class="line"><a name="l08505"></a><span class="lineno"> 8505</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a98b91af598acb64fe8497413ce498766">rb_secure</a>(4);</div><div class="line"><a name="l08506"></a><span class="lineno"> 8506</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <span class="stringliteral">"01"</span>, &event);</div><div class="line"><a name="l08507"></a><span class="lineno"> 8507</span>  <span class="keywordflow">if</span>(!<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(event)) {</div><div class="line"><a name="l08508"></a><span class="lineno"> 8508</span>  <span class="keywordflow">if</span>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(event) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a> && <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(event) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a>) {</div><div class="line"><a name="l08509"></a><span class="lineno"> 8509</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"wrong argument type (expected String or Symbol)"</span>);</div><div class="line"><a name="l08510"></a><span class="lineno"> 8510</span>  }</div><div class="line"><a name="l08511"></a><span class="lineno"> 8511</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(event) == <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a>) {</div><div class="line"><a name="l08512"></a><span class="lineno"> 8512</span>  <span class="keyword">event</span> = <a class="code" href="../../db/d2e/intern_8h.html#a6b530fce35a344ec394c08c6643cdd8a">rb_sym_to_s</a>(event);</div><div class="line"><a name="l08513"></a><span class="lineno"> 8513</span>  }</div><div class="line"><a name="l08514"></a><span class="lineno"> 8514</span>  }</div><div class="line"><a name="l08515"></a><span class="lineno"> 8515</span>  events = <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(<span class="keyword">self</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a0ce01fae8d4199ffd5f3df63cf0796f8">id_events</a>);</div><div class="line"><a name="l08516"></a><span class="lineno"> 8516</span>  <span class="keywordflow">if</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a>(events)) {</div><div class="line"><a name="l08517"></a><span class="lineno"> 8517</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l08518"></a><span class="lineno"> 8518</span>  }</div><div class="line"><a name="l08519"></a><span class="lineno"> 8519</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a81d5683f19a2b3e891115a7005223ecf">ole_delete_event</a>(events, event);</div><div class="line"><a name="l08520"></a><span class="lineno"> 8520</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l08521"></a><span class="lineno"> 8521</span> }</div><div class="line"><a name="l08522"></a><span class="lineno"> 8522</span> </div><div class="line"><a name="l08523"></a><span class="lineno"> 8523</span> <span class="comment">/*</span></div><div class="line"><a name="l08524"></a><span class="lineno"> 8524</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08525"></a><span class="lineno"> 8525</span> <span class="comment"> * WIN32OLE_EVENT#unadvise -> nil</span></div><div class="line"><a name="l08526"></a><span class="lineno"> 8526</span> <span class="comment"> *</span></div><div class="line"><a name="l08527"></a><span class="lineno"> 8527</span> <span class="comment"> * disconnects OLE server. If this method called, then the WIN32OLE_EVENT object</span></div><div class="line"><a name="l08528"></a><span class="lineno"> 8528</span> <span class="comment"> * does not receive the OLE server event any more.</span></div><div class="line"><a name="l08529"></a><span class="lineno"> 8529</span> <span class="comment"> * This method is trial implementation.</span></div><div class="line"><a name="l08530"></a><span class="lineno"> 8530</span> <span class="comment"> *</span></div><div class="line"><a name="l08531"></a><span class="lineno"> 8531</span> <span class="comment"> * ie = WIN32OLE.new('InternetExplorer.Application')</span></div><div class="line"><a name="l08532"></a><span class="lineno"> 8532</span> <span class="comment"> * ev = WIN32OLE_EVENT.new(ie)</span></div><div class="line"><a name="l08533"></a><span class="lineno"> 8533</span> <span class="comment"> * ev.on_event() {...}</span></div><div class="line"><a name="l08534"></a><span class="lineno"> 8534</span> <span class="comment"> * ...</span></div><div class="line"><a name="l08535"></a><span class="lineno"> 8535</span> <span class="comment"> * ev.unadvise</span></div><div class="line"><a name="l08536"></a><span class="lineno"> 8536</span> <span class="comment"> *</span></div><div class="line"><a name="l08537"></a><span class="lineno"> 8537</span> <span class="comment"> */</span></div><div class="line"><a name="l08538"></a><span class="lineno"> 8538</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08539"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a03d0ad12a5dfd5fe6dfb820a2fcf4ca7"> 8539</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a03d0ad12a5dfd5fe6dfb820a2fcf4ca7">fev_unadvise</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l08540"></a><span class="lineno"> 8540</span> {</div><div class="line"><a name="l08541"></a><span class="lineno"> 8541</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a> *poleev;</div><div class="line"><a name="l08542"></a><span class="lineno"> 8542</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../d1/d5d/structoleeventdata.html">oleeventdata</a>, poleev);</div><div class="line"><a name="l08543"></a><span class="lineno"> 8543</span>  <span class="keywordflow">if</span> (poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>) {</div><div class="line"><a name="l08544"></a><span class="lineno"> 8544</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aa3eea8970bbdd932344cbf86e9bbe95c">ole_msg_loop</a>();</div><div class="line"><a name="l08545"></a><span class="lineno"> 8545</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a5e253cdeb9cfec5844f163f53f08e3d2">evs_delete</a>(poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#a6a6acfb04132992781ab9d405530e9f8">event_id</a>);</div><div class="line"><a name="l08546"></a><span class="lineno"> 8546</span>  poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>->lpVtbl->Unadvise(poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>, poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ae70fbdd278d71d8deb0ab81de2b82d82">dwCookie</a>);</div><div class="line"><a name="l08547"></a><span class="lineno"> 8547</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a>(poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a>);</div><div class="line"><a name="l08548"></a><span class="lineno"> 8548</span>  poleev-><a class="code" href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">pConnectionPoint</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l08549"></a><span class="lineno"> 8549</span>  }</div><div class="line"><a name="l08550"></a><span class="lineno"> 8550</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l08551"></a><span class="lineno"> 8551</span> }</div><div class="line"><a name="l08552"></a><span class="lineno"> 8552</span> </div><div class="line"><a name="l08553"></a><span class="lineno"> 8553</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08554"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aaac85a21f4e352281fef326427354f95"> 8554</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aaac85a21f4e352281fef326427354f95">evs_push</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>)</div><div class="line"><a name="l08555"></a><span class="lineno"> 8555</span> {</div><div class="line"><a name="l08556"></a><span class="lineno"> 8556</span>  <span class="keywordflow">return</span> <a class="code" href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a2af0935d4ce085aa2320acd37d10cec5">ary_ole_event</a>, <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a>);</div><div class="line"><a name="l08557"></a><span class="lineno"> 8557</span> }</div><div class="line"><a name="l08558"></a><span class="lineno"> 8558</span> </div><div class="line"><a name="l08559"></a><span class="lineno"> 8559</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08560"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5e253cdeb9cfec5844f163f53f08e3d2"> 8560</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5e253cdeb9cfec5844f163f53f08e3d2">evs_delete</a>(<span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>)</div><div class="line"><a name="l08561"></a><span class="lineno"> 8561</span> {</div><div class="line"><a name="l08562"></a><span class="lineno"> 8562</span>  <a class="code" href="../../dc/dcc/array_8c.html#a1d7683de2cd34217808092d90ffd0869">rb_ary_store</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a2af0935d4ce085aa2320acd37d10cec5">ary_ole_event</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>);</div><div class="line"><a name="l08563"></a><span class="lineno"> 8563</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l08564"></a><span class="lineno"> 8564</span> }</div><div class="line"><a name="l08565"></a><span class="lineno"> 8565</span> </div><div class="line"><a name="l08566"></a><span class="lineno"> 8566</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08567"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a038616b5c7a8bb7d26e06c5b16a0a643"> 8567</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a038616b5c7a8bb7d26e06c5b16a0a643">evs_entry</a>(<span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>)</div><div class="line"><a name="l08568"></a><span class="lineno"> 8568</span> {</div><div class="line"><a name="l08569"></a><span class="lineno"> 8569</span>  <span class="keywordflow">return</span> <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a2af0935d4ce085aa2320acd37d10cec5">ary_ole_event</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>);</div><div class="line"><a name="l08570"></a><span class="lineno"> 8570</span> }</div><div class="line"><a name="l08571"></a><span class="lineno"> 8571</span> </div><div class="line"><a name="l08572"></a><span class="lineno"> 8572</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08573"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad369fee2d0d724ef2fe3535240b981c7"> 8573</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad369fee2d0d724ef2fe3535240b981c7">evs_length</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l08574"></a><span class="lineno"> 8574</span> {</div><div class="line"><a name="l08575"></a><span class="lineno"> 8575</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a2af0935d4ce085aa2320acd37d10cec5">ary_ole_event</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"length"</span>), 0);</div><div class="line"><a name="l08576"></a><span class="lineno"> 8576</span> }</div><div class="line"><a name="l08577"></a><span class="lineno"> 8577</span> </div><div class="line"><a name="l08578"></a><span class="lineno"> 8578</span> <span class="comment">/*</span></div><div class="line"><a name="l08579"></a><span class="lineno"> 8579</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08580"></a><span class="lineno"> 8580</span> <span class="comment"> * WIN32OLE_EVENT#handler=</span></div><div class="line"><a name="l08581"></a><span class="lineno"> 8581</span> <span class="comment"> *</span></div><div class="line"><a name="l08582"></a><span class="lineno"> 8582</span> <span class="comment"> * sets event handler object. If handler object has onXXX</span></div><div class="line"><a name="l08583"></a><span class="lineno"> 8583</span> <span class="comment"> * method according to XXX event, then onXXX method is called</span></div><div class="line"><a name="l08584"></a><span class="lineno"> 8584</span> <span class="comment"> * when XXX event occurs.</span></div><div class="line"><a name="l08585"></a><span class="lineno"> 8585</span> <span class="comment"> *</span></div><div class="line"><a name="l08586"></a><span class="lineno"> 8586</span> <span class="comment"> * If handler object has method_missing and there is no</span></div><div class="line"><a name="l08587"></a><span class="lineno"> 8587</span> <span class="comment"> * method according to the event, then method_missing</span></div><div class="line"><a name="l08588"></a><span class="lineno"> 8588</span> <span class="comment"> * called and 1-st argument is event name.</span></div><div class="line"><a name="l08589"></a><span class="lineno"> 8589</span> <span class="comment"> *</span></div><div class="line"><a name="l08590"></a><span class="lineno"> 8590</span> <span class="comment"> * If handler object has onXXX method and there is block</span></div><div class="line"><a name="l08591"></a><span class="lineno"> 8591</span> <span class="comment"> * defined by WIN32OLE_EVENT#on_event('XXX'){},</span></div><div class="line"><a name="l08592"></a><span class="lineno"> 8592</span> <span class="comment"> * then block is executed but handler object method is not called</span></div><div class="line"><a name="l08593"></a><span class="lineno"> 8593</span> <span class="comment"> * when XXX event occurs.</span></div><div class="line"><a name="l08594"></a><span class="lineno"> 8594</span> <span class="comment"> *</span></div><div class="line"><a name="l08595"></a><span class="lineno"> 8595</span> <span class="comment"> * class Handler</span></div><div class="line"><a name="l08596"></a><span class="lineno"> 8596</span> <span class="comment"> * def onStatusTextChange(text)</span></div><div class="line"><a name="l08597"></a><span class="lineno"> 8597</span> <span class="comment"> * puts "StatusTextChanged"</span></div><div class="line"><a name="l08598"></a><span class="lineno"> 8598</span> <span class="comment"> * end</span></div><div class="line"><a name="l08599"></a><span class="lineno"> 8599</span> <span class="comment"> * def onPropertyChange(prop)</span></div><div class="line"><a name="l08600"></a><span class="lineno"> 8600</span> <span class="comment"> * puts "PropertyChanged"</span></div><div class="line"><a name="l08601"></a><span class="lineno"> 8601</span> <span class="comment"> * end</span></div><div class="line"><a name="l08602"></a><span class="lineno"> 8602</span> <span class="comment"> * def method_missing(ev, *arg)</span></div><div class="line"><a name="l08603"></a><span class="lineno"> 8603</span> <span class="comment"> * puts "other event #{ev}"</span></div><div class="line"><a name="l08604"></a><span class="lineno"> 8604</span> <span class="comment"> * end</span></div><div class="line"><a name="l08605"></a><span class="lineno"> 8605</span> <span class="comment"> * end</span></div><div class="line"><a name="l08606"></a><span class="lineno"> 8606</span> <span class="comment"> *</span></div><div class="line"><a name="l08607"></a><span class="lineno"> 8607</span> <span class="comment"> * handler = Handler.new</span></div><div class="line"><a name="l08608"></a><span class="lineno"> 8608</span> <span class="comment"> * ie = WIN32OLE.new('InternetExplorer.Application')</span></div><div class="line"><a name="l08609"></a><span class="lineno"> 8609</span> <span class="comment"> * ev = WIN32OLE_EVENT.new(ie)</span></div><div class="line"><a name="l08610"></a><span class="lineno"> 8610</span> <span class="comment"> * ev.on_event("StatusTextChange") {|*args|</span></div><div class="line"><a name="l08611"></a><span class="lineno"> 8611</span> <span class="comment"> * puts "this block executed."</span></div><div class="line"><a name="l08612"></a><span class="lineno"> 8612</span> <span class="comment"> * puts "handler.onStatusTextChange method is not called."</span></div><div class="line"><a name="l08613"></a><span class="lineno"> 8613</span> <span class="comment"> * }</span></div><div class="line"><a name="l08614"></a><span class="lineno"> 8614</span> <span class="comment"> * ev.handler = handler</span></div><div class="line"><a name="l08615"></a><span class="lineno"> 8615</span> <span class="comment"> *</span></div><div class="line"><a name="l08616"></a><span class="lineno"> 8616</span> <span class="comment"> */</span></div><div class="line"><a name="l08617"></a><span class="lineno"> 8617</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08618"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ae384ff6b7496bc19a6cc419461cf61f5"> 8618</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ae384ff6b7496bc19a6cc419461cf61f5">fev_set_handler</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)</div><div class="line"><a name="l08619"></a><span class="lineno"> 8619</span> {</div><div class="line"><a name="l08620"></a><span class="lineno"> 8620</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#acee88ad0375c8a9080e2283db494d257">rb_ivar_set</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"handler"</span>), <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>);</div><div class="line"><a name="l08621"></a><span class="lineno"> 8621</span> }</div><div class="line"><a name="l08622"></a><span class="lineno"> 8622</span> </div><div class="line"><a name="l08623"></a><span class="lineno"> 8623</span> <span class="comment">/*</span></div><div class="line"><a name="l08624"></a><span class="lineno"> 8624</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08625"></a><span class="lineno"> 8625</span> <span class="comment"> * WIN32OLE_EVENT#handler</span></div><div class="line"><a name="l08626"></a><span class="lineno"> 8626</span> <span class="comment"> *</span></div><div class="line"><a name="l08627"></a><span class="lineno"> 8627</span> <span class="comment"> * returns handler object.</span></div><div class="line"><a name="l08628"></a><span class="lineno"> 8628</span> <span class="comment"> *</span></div><div class="line"><a name="l08629"></a><span class="lineno"> 8629</span> <span class="comment"> */</span></div><div class="line"><a name="l08630"></a><span class="lineno"> 8630</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08631"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aee60a56e4ca92f2f597dbc14483ccfeb"> 8631</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aee60a56e4ca92f2f597dbc14483ccfeb">fev_get_handler</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l08632"></a><span class="lineno"> 8632</span> {</div><div class="line"><a name="l08633"></a><span class="lineno"> 8633</span>  <span class="keywordflow">return</span> <a class="code" href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a>(<span class="keyword">self</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"handler"</span>));</div><div class="line"><a name="l08634"></a><span class="lineno"> 8634</span> }</div><div class="line"><a name="l08635"></a><span class="lineno"> 8635</span> </div><div class="line"><a name="l08636"></a><span class="lineno"> 8636</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l08637"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a6830759afb9b256096ce2cfd625762a9"> 8637</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a6830759afb9b256096ce2cfd625762a9">olevariant_free</a>(<span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar)</div><div class="line"><a name="l08638"></a><span class="lineno"> 8638</span> {</div><div class="line"><a name="l08639"></a><span class="lineno"> 8639</span>  VariantClear(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>));</div><div class="line"><a name="l08640"></a><span class="lineno"> 8640</span>  VariantClear(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l08641"></a><span class="lineno"> 8641</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pvar);</div><div class="line"><a name="l08642"></a><span class="lineno"> 8642</span> }</div><div class="line"><a name="l08643"></a><span class="lineno"> 8643</span> </div><div class="line"><a name="l08644"></a><span class="lineno"> 8644</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08645"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a3e39523be2bde7adc51ab796000cdec9"> 8645</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a3e39523be2bde7adc51ab796000cdec9">folevariant_s_allocate</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass)</div><div class="line"><a name="l08646"></a><span class="lineno"> 8646</span> {</div><div class="line"><a name="l08647"></a><span class="lineno"> 8647</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l08648"></a><span class="lineno"> 8648</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj;</div><div class="line"><a name="l08649"></a><span class="lineno"> 8649</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a>();</div><div class="line"><a name="l08650"></a><span class="lineno"> 8650</span>  obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad80ce51081780f829134de0338821b76">Data_Make_Struct</a>(klass,<span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>,0,<a class="code" href="../../d2/d99/win32ole_8c.html#a6830759afb9b256096ce2cfd625762a9">olevariant_free</a>,pvar);</div><div class="line"><a name="l08651"></a><span class="lineno"> 8651</span>  VariantInit(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l08652"></a><span class="lineno"> 8652</span>  VariantInit(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>));</div><div class="line"><a name="l08653"></a><span class="lineno"> 8653</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l08654"></a><span class="lineno"> 8654</span> }</div><div class="line"><a name="l08655"></a><span class="lineno"> 8655</span> </div><div class="line"><a name="l08656"></a><span class="lineno"> 8656</span> <span class="comment">/*</span></div><div class="line"><a name="l08657"></a><span class="lineno"> 8657</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08658"></a><span class="lineno"> 8658</span> <span class="comment"> * WIN32OLE_VARIANT.array(ary, vt)</span></div><div class="line"><a name="l08659"></a><span class="lineno"> 8659</span> <span class="comment"> *</span></div><div class="line"><a name="l08660"></a><span class="lineno"> 8660</span> <span class="comment"> * Returns Ruby object wrapping OLE variant whose variant type is VT_ARRAY.</span></div><div class="line"><a name="l08661"></a><span class="lineno"> 8661</span> <span class="comment"> * The first argument should be Array object which specifies dimensions</span></div><div class="line"><a name="l08662"></a><span class="lineno"> 8662</span> <span class="comment"> * and each size of dimensions of OLE array.</span></div><div class="line"><a name="l08663"></a><span class="lineno"> 8663</span> <span class="comment"> * The second argument specifies variant type of the element of OLE array.</span></div><div class="line"><a name="l08664"></a><span class="lineno"> 8664</span> <span class="comment"> *</span></div><div class="line"><a name="l08665"></a><span class="lineno"> 8665</span> <span class="comment"> * The following create 2 dimensions OLE array. The first dimensions size</span></div><div class="line"><a name="l08666"></a><span class="lineno"> 8666</span> <span class="comment"> * is 3, and the second is 4.</span></div><div class="line"><a name="l08667"></a><span class="lineno"> 8667</span> <span class="comment"> *</span></div><div class="line"><a name="l08668"></a><span class="lineno"> 8668</span> <span class="comment"> * ole_ary = WIN32OLE_VARIANT.array([3,4], VT_I4)</span></div><div class="line"><a name="l08669"></a><span class="lineno"> 8669</span> <span class="comment"> * ruby_ary = ole_ary.value # => [[0, 0, 0, 0], [0, 0, 0, 0], [0, 0, 0, 0]]</span></div><div class="line"><a name="l08670"></a><span class="lineno"> 8670</span> <span class="comment"> *</span></div><div class="line"><a name="l08671"></a><span class="lineno"> 8671</span> <span class="comment"> */</span></div><div class="line"><a name="l08672"></a><span class="lineno"> 8672</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08673"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a5c16d87bf1711b15fc92a2a26773a3ea"> 8673</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a5c16d87bf1711b15fc92a2a26773a3ea">folevariant_s_array</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> klass, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> elems, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vvt)</div><div class="line"><a name="l08674"></a><span class="lineno"> 8674</span> {</div><div class="line"><a name="l08675"></a><span class="lineno"> 8675</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> obj = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l08676"></a><span class="lineno"> 8676</span>  VARTYPE vt;</div><div class="line"><a name="l08677"></a><span class="lineno"> 8677</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l08678"></a><span class="lineno"> 8678</span>  SAFEARRAYBOUND *psab = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l08679"></a><span class="lineno"> 8679</span>  SAFEARRAY *psa = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l08680"></a><span class="lineno"> 8680</span>  UINT dim = 0;</div><div class="line"><a name="l08681"></a><span class="lineno"> 8681</span>  UINT <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0;</div><div class="line"><a name="l08682"></a><span class="lineno"> 8682</span> </div><div class="line"><a name="l08683"></a><span class="lineno"> 8683</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a>();</div><div class="line"><a name="l08684"></a><span class="lineno"> 8684</span> </div><div class="line"><a name="l08685"></a><span class="lineno"> 8685</span>  vt = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a72d845303f20fad5c5ef29c339d3c7f6">NUM2UINT</a>(vvt);</div><div class="line"><a name="l08686"></a><span class="lineno"> 8686</span>  vt = (vt | VT_ARRAY);</div><div class="line"><a name="l08687"></a><span class="lineno"> 8687</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad5a1e03b0a66824f95f6aaf07b4a4052">Check_Type</a>(elems, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>);</div><div class="line"><a name="l08688"></a><span class="lineno"> 8688</span>  obj = <a class="code" href="../../d2/d99/win32ole_8c.html#a3e39523be2bde7adc51ab796000cdec9">folevariant_s_allocate</a>(klass);</div><div class="line"><a name="l08689"></a><span class="lineno"> 8689</span> </div><div class="line"><a name="l08690"></a><span class="lineno"> 8690</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(obj, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>, pvar);</div><div class="line"><a name="l08691"></a><span class="lineno"> 8691</span>  dim = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(elems);</div><div class="line"><a name="l08692"></a><span class="lineno"> 8692</span> </div><div class="line"><a name="l08693"></a><span class="lineno"> 8693</span>  psab = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(SAFEARRAYBOUND, dim);</div><div class="line"><a name="l08694"></a><span class="lineno"> 8694</span> </div><div class="line"><a name="l08695"></a><span class="lineno"> 8695</span>  <span class="keywordflow">if</span>(!psab) {</div><div class="line"><a name="l08696"></a><span class="lineno"> 8696</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"memory allocation error"</span>);</div><div class="line"><a name="l08697"></a><span class="lineno"> 8697</span>  }</div><div class="line"><a name="l08698"></a><span class="lineno"> 8698</span> </div><div class="line"><a name="l08699"></a><span class="lineno"> 8699</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < dim; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l08700"></a><span class="lineno"> 8700</span>  psab[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>].cElements = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a>(<a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(elems, <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>));</div><div class="line"><a name="l08701"></a><span class="lineno"> 8701</span>  psab[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>].lLbound = 0;</div><div class="line"><a name="l08702"></a><span class="lineno"> 8702</span>  }</div><div class="line"><a name="l08703"></a><span class="lineno"> 8703</span> </div><div class="line"><a name="l08704"></a><span class="lineno"> 8704</span>  psa = SafeArrayCreate((VARTYPE)(vt & VT_TYPEMASK), dim, psab);</div><div class="line"><a name="l08705"></a><span class="lineno"> 8705</span>  <span class="keywordflow">if</span> (psa == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l08706"></a><span class="lineno"> 8706</span>  <span class="keywordflow">if</span> (psab) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(psab);</div><div class="line"><a name="l08707"></a><span class="lineno"> 8707</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"memory allocation error(SafeArrayCreate)"</span>);</div><div class="line"><a name="l08708"></a><span class="lineno"> 8708</span>  }</div><div class="line"><a name="l08709"></a><span class="lineno"> 8709</span> </div><div class="line"><a name="l08710"></a><span class="lineno"> 8710</span>  V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = vt;</div><div class="line"><a name="l08711"></a><span class="lineno"> 8711</span>  <span class="keywordflow">if</span> (vt & VT_BYREF) {</div><div class="line"><a name="l08712"></a><span class="lineno"> 8712</span>  V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>)) = (vt & ~VT_BYREF);</div><div class="line"><a name="l08713"></a><span class="lineno"> 8713</span>  V_ARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>)) = psa;</div><div class="line"><a name="l08714"></a><span class="lineno"> 8714</span>  V_ARRAYREF(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = &(V_ARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">realvar</a>)));</div><div class="line"><a name="l08715"></a><span class="lineno"> 8715</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l08716"></a><span class="lineno"> 8716</span>  V_ARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) = psa;</div><div class="line"><a name="l08717"></a><span class="lineno"> 8717</span>  }</div><div class="line"><a name="l08718"></a><span class="lineno"> 8718</span>  <span class="keywordflow">if</span> (psab) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(psab);</div><div class="line"><a name="l08719"></a><span class="lineno"> 8719</span>  <span class="keywordflow">return</span> obj;</div><div class="line"><a name="l08720"></a><span class="lineno"> 8720</span> }</div><div class="line"><a name="l08721"></a><span class="lineno"> 8721</span> </div><div class="line"><a name="l08722"></a><span class="lineno"> 8722</span> <span class="comment">/*</span></div><div class="line"><a name="l08723"></a><span class="lineno"> 8723</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08724"></a><span class="lineno"> 8724</span> <span class="comment"> * WIN32OLE_VARIANT.new(val, vartype) #=> WIN32OLE_VARIANT object.</span></div><div class="line"><a name="l08725"></a><span class="lineno"> 8725</span> <span class="comment"> *</span></div><div class="line"><a name="l08726"></a><span class="lineno"> 8726</span> <span class="comment"> * Returns Ruby object wrapping OLE variant.</span></div><div class="line"><a name="l08727"></a><span class="lineno"> 8727</span> <span class="comment"> * The first argument specifies Ruby object to convert OLE variant variable.</span></div><div class="line"><a name="l08728"></a><span class="lineno"> 8728</span> <span class="comment"> * The second argument specifies VARIANT type.</span></div><div class="line"><a name="l08729"></a><span class="lineno"> 8729</span> <span class="comment"> * In some situation, you need the WIN32OLE_VARIANT object to pass OLE method</span></div><div class="line"><a name="l08730"></a><span class="lineno"> 8730</span> <span class="comment"> *</span></div><div class="line"><a name="l08731"></a><span class="lineno"> 8731</span> <span class="comment"> * shell = WIN32OLE.new("Shell.Application")</span></div><div class="line"><a name="l08732"></a><span class="lineno"> 8732</span> <span class="comment"> * folder = shell.NameSpace("C:\\Windows")</span></div><div class="line"><a name="l08733"></a><span class="lineno"> 8733</span> <span class="comment"> * item = folder.ParseName("tmp.txt")</span></div><div class="line"><a name="l08734"></a><span class="lineno"> 8734</span> <span class="comment"> * # You can't use Ruby String object to call FolderItem.InvokeVerb.</span></div><div class="line"><a name="l08735"></a><span class="lineno"> 8735</span> <span class="comment"> * # Instead, you have to use WIN32OLE_VARIANT object to call the method.</span></div><div class="line"><a name="l08736"></a><span class="lineno"> 8736</span> <span class="comment"> * shortcut = WIN32OLE_VARIANT.new("Create Shortcut(\&S)")</span></div><div class="line"><a name="l08737"></a><span class="lineno"> 8737</span> <span class="comment"> * item.invokeVerb(shortcut)</span></div><div class="line"><a name="l08738"></a><span class="lineno"> 8738</span> <span class="comment"> *</span></div><div class="line"><a name="l08739"></a><span class="lineno"> 8739</span> <span class="comment"> */</span></div><div class="line"><a name="l08740"></a><span class="lineno"> 8740</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08741"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a58954f48574ac2b42e8e9d2b96f930aa"> 8741</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a58954f48574ac2b42e8e9d2b96f930aa">folevariant_initialize</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>)</div><div class="line"><a name="l08742"></a><span class="lineno"> 8742</span> {</div><div class="line"><a name="l08743"></a><span class="lineno"> 8743</span>  <span class="keywordtype">int</span> len = 0;</div><div class="line"><a name="l08744"></a><span class="lineno"> 8744</span>  VARIANT <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>;</div><div class="line"><a name="l08745"></a><span class="lineno"> 8745</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l08746"></a><span class="lineno"> 8746</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> vvt;</div><div class="line"><a name="l08747"></a><span class="lineno"> 8747</span>  VARTYPE vt;</div><div class="line"><a name="l08748"></a><span class="lineno"> 8748</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l08749"></a><span class="lineno"> 8749</span> </div><div class="line"><a name="l08750"></a><span class="lineno"> 8750</span>  len = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>);</div><div class="line"><a name="l08751"></a><span class="lineno"> 8751</span>  <span class="keywordflow">if</span> (len < 1 || len > 3) {</div><div class="line"><a name="l08752"></a><span class="lineno"> 8752</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"wrong number of arguments (%d for 1..3)"</span>, len);</div><div class="line"><a name="l08753"></a><span class="lineno"> 8753</span>  }</div><div class="line"><a name="l08754"></a><span class="lineno"> 8754</span>  VariantInit(&<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>);</div><div class="line"><a name="l08755"></a><span class="lineno"> 8755</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, 0);</div><div class="line"><a name="l08756"></a><span class="lineno"> 8756</span> </div><div class="line"><a name="l08757"></a><span class="lineno"> 8757</span>  <span class="keywordflow">if</span>(!<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>) &&</div><div class="line"><a name="l08758"></a><span class="lineno"> 8758</span>  !<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>) &&</div><div class="line"><a name="l08759"></a><span class="lineno"> 8759</span>  !<a class="code" href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a66f2d68e8b195fed5d03f60cb42ba31b">rb_cTime</a>)) {</div><div class="line"><a name="l08760"></a><span class="lineno"> 8760</span>  <span class="keywordflow">switch</span> (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)) {</div><div class="line"><a name="l08761"></a><span class="lineno"> 8761</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a>:</div><div class="line"><a name="l08762"></a><span class="lineno"> 8762</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a>:</div><div class="line"><a name="l08763"></a><span class="lineno"> 8763</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a523855de5546c34061e030f4606db3e9">T_FIXNUM</a>:</div><div class="line"><a name="l08764"></a><span class="lineno"> 8764</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a41ac74a27dd1eadc2ca86d10590f2163">T_BIGNUM</a>:</div><div class="line"><a name="l08765"></a><span class="lineno"> 8765</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3d072e0c25cf678e9b8601b957b92eae">T_FLOAT</a>:</div><div class="line"><a name="l08766"></a><span class="lineno"> 8766</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a7fc7e09f45d0ef129ea29f3a5b0c32b8">T_TRUE</a>:</div><div class="line"><a name="l08767"></a><span class="lineno"> 8767</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9ab816c37c9173898ff256b7be9e5ea9">T_FALSE</a>:</div><div class="line"><a name="l08768"></a><span class="lineno"> 8768</span>  <span class="keywordflow">case</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3a7d10c48d5dff0a5d4aa94acb74811a">T_NIL</a>:</div><div class="line"><a name="l08769"></a><span class="lineno"> 8769</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l08770"></a><span class="lineno"> 8770</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l08771"></a><span class="lineno"> 8771</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"can not convert WIN32OLE_VARIANT from type %s"</span>,</div><div class="line"><a name="l08772"></a><span class="lineno"> 8772</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a9b4f42ada717bfbe7a78830639476aed">rb_obj_classname</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>));</div><div class="line"><a name="l08773"></a><span class="lineno"> 8773</span>  }</div><div class="line"><a name="l08774"></a><span class="lineno"> 8774</span>  }</div><div class="line"><a name="l08775"></a><span class="lineno"> 8775</span> </div><div class="line"><a name="l08776"></a><span class="lineno"> 8776</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>, pvar);</div><div class="line"><a name="l08777"></a><span class="lineno"> 8777</span>  <span class="keywordflow">if</span> (len == 1) {</div><div class="line"><a name="l08778"></a><span class="lineno"> 8778</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, &(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l08779"></a><span class="lineno"> 8779</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l08780"></a><span class="lineno"> 8780</span>  vvt = <a class="code" href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a>, 1);</div><div class="line"><a name="l08781"></a><span class="lineno"> 8781</span>  vt = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(vvt);</div><div class="line"><a name="l08782"></a><span class="lineno"> 8782</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3cd351272efa990ad547562acc560dbb">ole_val2olevariantdata</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, vt, pvar);</div><div class="line"><a name="l08783"></a><span class="lineno"> 8783</span>  }</div><div class="line"><a name="l08784"></a><span class="lineno"> 8784</span>  vt = V_VT(&pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>);</div><div class="line"><a name="l08785"></a><span class="lineno"> 8785</span>  <span class="keywordflow">return</span> <span class="keyword">self</span>;</div><div class="line"><a name="l08786"></a><span class="lineno"> 8786</span> }</div><div class="line"><a name="l08787"></a><span class="lineno"> 8787</span> </div><div class="line"><a name="l08788"></a><span class="lineno"> 8788</span> <span class="keyword">static</span> SAFEARRAY *</div><div class="line"><a name="l08789"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a17a347d953c452aabf9e16be24f4a582"> 8789</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a17a347d953c452aabf9e16be24f4a582">get_locked_safe_array</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)</div><div class="line"><a name="l08790"></a><span class="lineno"> 8790</span> {</div><div class="line"><a name="l08791"></a><span class="lineno"> 8791</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l08792"></a><span class="lineno"> 8792</span>  SAFEARRAY *psa = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l08793"></a><span class="lineno"> 8793</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l08794"></a><span class="lineno"> 8794</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>, pvar);</div><div class="line"><a name="l08795"></a><span class="lineno"> 8795</span>  <span class="keywordflow">if</span> (!(V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) & VT_ARRAY)) {</div><div class="line"><a name="l08796"></a><span class="lineno"> 8796</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a>, <span class="stringliteral">"variant type is not VT_ARRAY."</span>);</div><div class="line"><a name="l08797"></a><span class="lineno"> 8797</span>  }</div><div class="line"><a name="l08798"></a><span class="lineno"> 8798</span>  psa = V_ISBYREF(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) ? *V_ARRAYREF(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) : V_ARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l08799"></a><span class="lineno"> 8799</span>  <span class="keywordflow">if</span> (psa == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l08800"></a><span class="lineno"> 8800</span>  <span class="keywordflow">return</span> psa;</div><div class="line"><a name="l08801"></a><span class="lineno"> 8801</span>  }</div><div class="line"><a name="l08802"></a><span class="lineno"> 8802</span>  hr = SafeArrayLock(psa);</div><div class="line"><a name="l08803"></a><span class="lineno"> 8803</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08804"></a><span class="lineno"> 8804</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to SafeArrayLock"</span>);</div><div class="line"><a name="l08805"></a><span class="lineno"> 8805</span>  }</div><div class="line"><a name="l08806"></a><span class="lineno"> 8806</span>  <span class="keywordflow">return</span> psa;</div><div class="line"><a name="l08807"></a><span class="lineno"> 8807</span> }</div><div class="line"><a name="l08808"></a><span class="lineno"> 8808</span> </div><div class="line"><a name="l08809"></a><span class="lineno"> 8809</span> <span class="keyword">static</span> <span class="keywordtype">long</span> *</div><div class="line"><a name="l08810"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a251af5930d14dc9c03f0ec689aaae38f"> 8810</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a251af5930d14dc9c03f0ec689aaae38f">ary2safe_array_index</a>(<span class="keywordtype">int</span> ary_size, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *ary, SAFEARRAY *psa)</div><div class="line"><a name="l08811"></a><span class="lineno"> 8811</span> {</div><div class="line"><a name="l08812"></a><span class="lineno"> 8812</span>  <span class="keywordtype">long</span> dim;</div><div class="line"><a name="l08813"></a><span class="lineno"> 8813</span>  <span class="keywordtype">long</span> *pid;</div><div class="line"><a name="l08814"></a><span class="lineno"> 8814</span>  <span class="keywordtype">long</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>;</div><div class="line"><a name="l08815"></a><span class="lineno"> 8815</span>  dim = SafeArrayGetDim(psa);</div><div class="line"><a name="l08816"></a><span class="lineno"> 8816</span>  <span class="keywordflow">if</span> (dim != ary_size) {</div><div class="line"><a name="l08817"></a><span class="lineno"> 8817</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a>, <span class="stringliteral">"unmatch number of indices"</span>);</div><div class="line"><a name="l08818"></a><span class="lineno"> 8818</span>  }</div><div class="line"><a name="l08819"></a><span class="lineno"> 8819</span>  pid = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">long</span>, dim);</div><div class="line"><a name="l08820"></a><span class="lineno"> 8820</span>  <span class="keywordflow">if</span> (pid == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l08821"></a><span class="lineno"> 8821</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to allocate memory for indices"</span>);</div><div class="line"><a name="l08822"></a><span class="lineno"> 8822</span>  }</div><div class="line"><a name="l08823"></a><span class="lineno"> 8823</span>  <span class="keywordflow">for</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> = 0; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a> < dim; <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>++) {</div><div class="line"><a name="l08824"></a><span class="lineno"> 8824</span>  pid[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>] = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a>(ary[<a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>]);</div><div class="line"><a name="l08825"></a><span class="lineno"> 8825</span>  }</div><div class="line"><a name="l08826"></a><span class="lineno"> 8826</span>  <span class="keywordflow">return</span> pid;</div><div class="line"><a name="l08827"></a><span class="lineno"> 8827</span> }</div><div class="line"><a name="l08828"></a><span class="lineno"> 8828</span> </div><div class="line"><a name="l08829"></a><span class="lineno"> 8829</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l08830"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ad85fa2cce60ae4f1915b162471096a66"> 8830</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ad85fa2cce60ae4f1915b162471096a66">unlock_safe_array</a>(SAFEARRAY *psa)</div><div class="line"><a name="l08831"></a><span class="lineno"> 8831</span> {</div><div class="line"><a name="l08832"></a><span class="lineno"> 8832</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l08833"></a><span class="lineno"> 8833</span>  hr = SafeArrayUnlock(psa);</div><div class="line"><a name="l08834"></a><span class="lineno"> 8834</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08835"></a><span class="lineno"> 8835</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to SafeArrayUnlock"</span>);</div><div class="line"><a name="l08836"></a><span class="lineno"> 8836</span>  }</div><div class="line"><a name="l08837"></a><span class="lineno"> 8837</span> }</div><div class="line"><a name="l08838"></a><span class="lineno"> 8838</span> </div><div class="line"><a name="l08839"></a><span class="lineno"> 8839</span> <span class="comment">/*</span></div><div class="line"><a name="l08840"></a><span class="lineno"> 8840</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08841"></a><span class="lineno"> 8841</span> <span class="comment"> * WIN32OLE_VARIANT[i,j,...] #=> element of OLE array.</span></div><div class="line"><a name="l08842"></a><span class="lineno"> 8842</span> <span class="comment"> *</span></div><div class="line"><a name="l08843"></a><span class="lineno"> 8843</span> <span class="comment"> * Returns the element of WIN32OLE_VARIANT object(OLE array).</span></div><div class="line"><a name="l08844"></a><span class="lineno"> 8844</span> <span class="comment"> * This method is available only when the variant type of</span></div><div class="line"><a name="l08845"></a><span class="lineno"> 8845</span> <span class="comment"> * WIN32OLE_VARIANT object is VT_ARRAY.</span></div><div class="line"><a name="l08846"></a><span class="lineno"> 8846</span> <span class="comment"> *</span></div><div class="line"><a name="l08847"></a><span class="lineno"> 8847</span> <span class="comment"> * REMARK:</span></div><div class="line"><a name="l08848"></a><span class="lineno"> 8848</span> <span class="comment"> * The all indicies should be 0 or natural number and</span></div><div class="line"><a name="l08849"></a><span class="lineno"> 8849</span> <span class="comment"> * lower than or equal to max indicies.</span></div><div class="line"><a name="l08850"></a><span class="lineno"> 8850</span> <span class="comment"> * (This point is different with Ruby Array indicies.)</span></div><div class="line"><a name="l08851"></a><span class="lineno"> 8851</span> <span class="comment"> *</span></div><div class="line"><a name="l08852"></a><span class="lineno"> 8852</span> <span class="comment"> * obj = WIN32OLE_VARIANT.new([[1,2,3],[4,5,6]])</span></div><div class="line"><a name="l08853"></a><span class="lineno"> 8853</span> <span class="comment"> * p obj[0,0] # => 1</span></div><div class="line"><a name="l08854"></a><span class="lineno"> 8854</span> <span class="comment"> * p obj[1,0] # => 4</span></div><div class="line"><a name="l08855"></a><span class="lineno"> 8855</span> <span class="comment"> * p obj[2,0] # => WIN32OLERuntimeError</span></div><div class="line"><a name="l08856"></a><span class="lineno"> 8856</span> <span class="comment"> * p obj[0, -1] # => WIN32OLERuntimeError</span></div><div class="line"><a name="l08857"></a><span class="lineno"> 8857</span> <span class="comment"> *</span></div><div class="line"><a name="l08858"></a><span class="lineno"> 8858</span> <span class="comment"> */</span></div><div class="line"><a name="l08859"></a><span class="lineno"> 8859</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08860"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a52007ffd60bf368cb33f51b4ece83379"> 8860</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a52007ffd60bf368cb33f51b4ece83379">folevariant_ary_aref</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l08861"></a><span class="lineno"> 8861</span> {</div><div class="line"><a name="l08862"></a><span class="lineno"> 8862</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l08863"></a><span class="lineno"> 8863</span>  SAFEARRAY *psa;</div><div class="line"><a name="l08864"></a><span class="lineno"> 8864</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l08865"></a><span class="lineno"> 8865</span>  VARIANT variant;</div><div class="line"><a name="l08866"></a><span class="lineno"> 8866</span>  <span class="keywordtype">long</span> *pid;</div><div class="line"><a name="l08867"></a><span class="lineno"> 8867</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l08868"></a><span class="lineno"> 8868</span> </div><div class="line"><a name="l08869"></a><span class="lineno"> 8869</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>, pvar);</div><div class="line"><a name="l08870"></a><span class="lineno"> 8870</span>  <span class="keywordflow">if</span> (!V_ISARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>))) {</div><div class="line"><a name="l08871"></a><span class="lineno"> 8871</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l08872"></a><span class="lineno"> 8872</span>  <span class="stringliteral">"`[]' is not available for this variant type object"</span>);</div><div class="line"><a name="l08873"></a><span class="lineno"> 8873</span>  }</div><div class="line"><a name="l08874"></a><span class="lineno"> 8874</span>  psa = <a class="code" href="../../d2/d99/win32ole_8c.html#a17a347d953c452aabf9e16be24f4a582">get_locked_safe_array</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l08875"></a><span class="lineno"> 8875</span>  <span class="keywordflow">if</span> (psa == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l08876"></a><span class="lineno"> 8876</span>  <span class="keywordflow">return</span> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l08877"></a><span class="lineno"> 8877</span>  }</div><div class="line"><a name="l08878"></a><span class="lineno"> 8878</span> </div><div class="line"><a name="l08879"></a><span class="lineno"> 8879</span>  pid = <a class="code" href="../../d2/d99/win32ole_8c.html#a251af5930d14dc9c03f0ec689aaae38f">ary2safe_array_index</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, psa);</div><div class="line"><a name="l08880"></a><span class="lineno"> 8880</span> </div><div class="line"><a name="l08881"></a><span class="lineno"> 8881</span>  VariantInit(&variant);</div><div class="line"><a name="l08882"></a><span class="lineno"> 8882</span>  V_VT(&variant) = (V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) & ~VT_ARRAY) | VT_BYREF;</div><div class="line"><a name="l08883"></a><span class="lineno"> 8883</span>  hr = SafeArrayPtrOfIndex(psa, pid, &V_BYREF(&variant));</div><div class="line"><a name="l08884"></a><span class="lineno"> 8884</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08885"></a><span class="lineno"> 8885</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to SafeArrayPtrOfIndex"</span>);</div><div class="line"><a name="l08886"></a><span class="lineno"> 8886</span>  }</div><div class="line"><a name="l08887"></a><span class="lineno"> 8887</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(&variant);</div><div class="line"><a name="l08888"></a><span class="lineno"> 8888</span> </div><div class="line"><a name="l08889"></a><span class="lineno"> 8889</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad85fa2cce60ae4f1915b162471096a66">unlock_safe_array</a>(psa);</div><div class="line"><a name="l08890"></a><span class="lineno"> 8890</span>  <span class="keywordflow">if</span> (pid) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pid);</div><div class="line"><a name="l08891"></a><span class="lineno"> 8891</span>  <span class="keywordflow">return</span> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l08892"></a><span class="lineno"> 8892</span> }</div><div class="line"><a name="l08893"></a><span class="lineno"> 8893</span> </div><div class="line"><a name="l08894"></a><span class="lineno"> 8894</span> <span class="keyword">static</span> VOID *</div><div class="line"><a name="l08895"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac4baf3ffd7d85c0541bb0313f6da9b5d"> 8895</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac4baf3ffd7d85c0541bb0313f6da9b5d">val2variant_ptr</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, VARIANT *<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>, VARTYPE vt)</div><div class="line"><a name="l08896"></a><span class="lineno"> 8896</span> {</div><div class="line"><a name="l08897"></a><span class="lineno"> 8897</span>  VOID *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l08898"></a><span class="lineno"> 8898</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr = <a class="code" href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a>;</div><div class="line"><a name="l08899"></a><span class="lineno"> 8899</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab41ead361600f93bdec89d772172aae6">ole_val2variant_ex</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>, vt);</div><div class="line"><a name="l08900"></a><span class="lineno"> 8900</span>  <span class="keywordflow">if</span> ((vt & ~VT_BYREF) == VT_VARIANT) {</div><div class="line"><a name="l08901"></a><span class="lineno"> 8901</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>;</div><div class="line"><a name="l08902"></a><span class="lineno"> 8902</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l08903"></a><span class="lineno"> 8903</span>  <span class="keywordflow">if</span> ( (vt & ~VT_BYREF) != V_VT(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) {</div><div class="line"><a name="l08904"></a><span class="lineno"> 8904</span>  hr = VariantChangeTypeEx(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>, <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>,</div><div class="line"><a name="l08905"></a><span class="lineno"> 8905</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a>, 0, (VARTYPE)(vt & ~VT_BYREF));</div><div class="line"><a name="l08906"></a><span class="lineno"> 8906</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08907"></a><span class="lineno"> 8907</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to change type"</span>);</div><div class="line"><a name="l08908"></a><span class="lineno"> 8908</span>  }</div><div class="line"><a name="l08909"></a><span class="lineno"> 8909</span>  }</div><div class="line"><a name="l08910"></a><span class="lineno"> 8910</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a04a08c5718d5989071001bbb08d6bd04">get_ptr_of_variant</a>(<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>);</div><div class="line"><a name="l08911"></a><span class="lineno"> 8911</span>  }</div><div class="line"><a name="l08912"></a><span class="lineno"> 8912</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l08913"></a><span class="lineno"> 8913</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to get pointer of variant"</span>);</div><div class="line"><a name="l08914"></a><span class="lineno"> 8914</span>  }</div><div class="line"><a name="l08915"></a><span class="lineno"> 8915</span>  <span class="keywordflow">return</span> <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l08916"></a><span class="lineno"> 8916</span> }</div><div class="line"><a name="l08917"></a><span class="lineno"> 8917</span> </div><div class="line"><a name="l08918"></a><span class="lineno"> 8918</span> <span class="comment">/*</span></div><div class="line"><a name="l08919"></a><span class="lineno"> 8919</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08920"></a><span class="lineno"> 8920</span> <span class="comment"> * WIN32OLE_VARIANT[i,j,...] = val #=> set the element of OLE array</span></div><div class="line"><a name="l08921"></a><span class="lineno"> 8921</span> <span class="comment"> *</span></div><div class="line"><a name="l08922"></a><span class="lineno"> 8922</span> <span class="comment"> * Set the element of WIN32OLE_VARIANT object(OLE array) to val.</span></div><div class="line"><a name="l08923"></a><span class="lineno"> 8923</span> <span class="comment"> * This method is available only when the variant type of</span></div><div class="line"><a name="l08924"></a><span class="lineno"> 8924</span> <span class="comment"> * WIN32OLE_VARIANT object is VT_ARRAY.</span></div><div class="line"><a name="l08925"></a><span class="lineno"> 8925</span> <span class="comment"> *</span></div><div class="line"><a name="l08926"></a><span class="lineno"> 8926</span> <span class="comment"> * REMARK:</span></div><div class="line"><a name="l08927"></a><span class="lineno"> 8927</span> <span class="comment"> * The all indicies should be 0 or natural number and</span></div><div class="line"><a name="l08928"></a><span class="lineno"> 8928</span> <span class="comment"> * lower than or equal to max indicies.</span></div><div class="line"><a name="l08929"></a><span class="lineno"> 8929</span> <span class="comment"> * (This point is different with Ruby Array indicies.)</span></div><div class="line"><a name="l08930"></a><span class="lineno"> 8930</span> <span class="comment"> *</span></div><div class="line"><a name="l08931"></a><span class="lineno"> 8931</span> <span class="comment"> * obj = WIN32OLE_VARIANT.new([[1,2,3],[4,5,6]])</span></div><div class="line"><a name="l08932"></a><span class="lineno"> 8932</span> <span class="comment"> * obj[0,0] = 7</span></div><div class="line"><a name="l08933"></a><span class="lineno"> 8933</span> <span class="comment"> * obj[1,0] = 8</span></div><div class="line"><a name="l08934"></a><span class="lineno"> 8934</span> <span class="comment"> * p obj.value # => [[7,2,3], [8,5,6]]</span></div><div class="line"><a name="l08935"></a><span class="lineno"> 8935</span> <span class="comment"> * obj[2,0] = 9 # => WIN32OLERuntimeError</span></div><div class="line"><a name="l08936"></a><span class="lineno"> 8936</span> <span class="comment"> * obj[0, -1] = 9 # => WIN32OLERuntimeError</span></div><div class="line"><a name="l08937"></a><span class="lineno"> 8937</span> <span class="comment"> *</span></div><div class="line"><a name="l08938"></a><span class="lineno"> 8938</span> <span class="comment"> */</span></div><div class="line"><a name="l08939"></a><span class="lineno"> 8939</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08940"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a8bc9e5d97cd25261219ffa5642187da8"> 8940</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a8bc9e5d97cd25261219ffa5642187da8">folevariant_ary_aset</a>(<span class="keywordtype">int</span> <a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l08941"></a><span class="lineno"> 8941</span> {</div><div class="line"><a name="l08942"></a><span class="lineno"> 8942</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l08943"></a><span class="lineno"> 8943</span>  SAFEARRAY *psa;</div><div class="line"><a name="l08944"></a><span class="lineno"> 8944</span>  VARIANT <a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>;</div><div class="line"><a name="l08945"></a><span class="lineno"> 8945</span>  VARTYPE vt;</div><div class="line"><a name="l08946"></a><span class="lineno"> 8946</span>  <span class="keywordtype">long</span> *pid;</div><div class="line"><a name="l08947"></a><span class="lineno"> 8947</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a> hr;</div><div class="line"><a name="l08948"></a><span class="lineno"> 8948</span>  VOID *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l08949"></a><span class="lineno"> 8949</span> </div><div class="line"><a name="l08950"></a><span class="lineno"> 8950</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>, pvar);</div><div class="line"><a name="l08951"></a><span class="lineno"> 8951</span>  <span class="keywordflow">if</span> (!V_ISARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>))) {</div><div class="line"><a name="l08952"></a><span class="lineno"> 8952</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l08953"></a><span class="lineno"> 8953</span>  <span class="stringliteral">"`[]' is not available for this variant type object"</span>);</div><div class="line"><a name="l08954"></a><span class="lineno"> 8954</span>  }</div><div class="line"><a name="l08955"></a><span class="lineno"> 8955</span>  psa = <a class="code" href="../../d2/d99/win32ole_8c.html#a17a347d953c452aabf9e16be24f4a582">get_locked_safe_array</a>(<span class="keyword">self</span>);</div><div class="line"><a name="l08956"></a><span class="lineno"> 8956</span>  <span class="keywordflow">if</span> (psa == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) {</div><div class="line"><a name="l08957"></a><span class="lineno"> 8957</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>, <span class="stringliteral">"failed to get SafeArray pointer"</span>);</div><div class="line"><a name="l08958"></a><span class="lineno"> 8958</span>  }</div><div class="line"><a name="l08959"></a><span class="lineno"> 8959</span> </div><div class="line"><a name="l08960"></a><span class="lineno"> 8960</span>  pid = <a class="code" href="../../d2/d99/win32ole_8c.html#a251af5930d14dc9c03f0ec689aaae38f">ary2safe_array_index</a>(<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>-1, <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>, psa);</div><div class="line"><a name="l08961"></a><span class="lineno"> 8961</span> </div><div class="line"><a name="l08962"></a><span class="lineno"> 8962</span>  VariantInit(&<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>);</div><div class="line"><a name="l08963"></a><span class="lineno"> 8963</span>  vt = (V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) & ~VT_ARRAY);</div><div class="line"><a name="l08964"></a><span class="lineno"> 8964</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#ac4baf3ffd7d85c0541bb0313f6da9b5d">val2variant_ptr</a>(<a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>[<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>-1], &<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>, vt);</div><div class="line"><a name="l08965"></a><span class="lineno"> 8965</span>  <span class="keywordflow">if</span> ((V_VT(&<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) == VT_DISPATCH && V_DISPATCH(&<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>) ||</div><div class="line"><a name="l08966"></a><span class="lineno"> 8966</span>  (V_VT(&<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) == VT_UNKNOWN && V_UNKNOWN(&<a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>) == <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)) {</div><div class="line"><a name="l08967"></a><span class="lineno"> 8967</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"argument does not have IDispatch or IUnknown Interface"</span>);</div><div class="line"><a name="l08968"></a><span class="lineno"> 8968</span>  }</div><div class="line"><a name="l08969"></a><span class="lineno"> 8969</span>  hr = SafeArrayPutElement(psa, pid, <a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>);</div><div class="line"><a name="l08970"></a><span class="lineno"> 8970</span>  <span class="keywordflow">if</span> (FAILED(hr)) {</div><div class="line"><a name="l08971"></a><span class="lineno"> 8971</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a>(hr, <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>, <span class="stringliteral">"failed to SafeArrayPutElement"</span>);</div><div class="line"><a name="l08972"></a><span class="lineno"> 8972</span>  }</div><div class="line"><a name="l08973"></a><span class="lineno"> 8973</span> </div><div class="line"><a name="l08974"></a><span class="lineno"> 8974</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad85fa2cce60ae4f1915b162471096a66">unlock_safe_array</a>(psa);</div><div class="line"><a name="l08975"></a><span class="lineno"> 8975</span>  <span class="keywordflow">if</span> (pid) <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(pid);</div><div class="line"><a name="l08976"></a><span class="lineno"> 8976</span>  <span class="keywordflow">return</span> <a class="code" href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a>[<a class="code" href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a>-1];</div><div class="line"><a name="l08977"></a><span class="lineno"> 8977</span> }</div><div class="line"><a name="l08978"></a><span class="lineno"> 8978</span> </div><div class="line"><a name="l08979"></a><span class="lineno"> 8979</span> <span class="comment">/*</span></div><div class="line"><a name="l08980"></a><span class="lineno"> 8980</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l08981"></a><span class="lineno"> 8981</span> <span class="comment"> * WIN32OLE_VARIANT.value #=> Ruby object.</span></div><div class="line"><a name="l08982"></a><span class="lineno"> 8982</span> <span class="comment"> *</span></div><div class="line"><a name="l08983"></a><span class="lineno"> 8983</span> <span class="comment"> * Returns Ruby object value from OLE variant.</span></div><div class="line"><a name="l08984"></a><span class="lineno"> 8984</span> <span class="comment"> * obj = WIN32OLE_VARIANT.new(1, WIN32OLE::VARIANT::VT_BSTR)</span></div><div class="line"><a name="l08985"></a><span class="lineno"> 8985</span> <span class="comment"> * obj.value # => "1" (not Fixnum object, but String object "1")</span></div><div class="line"><a name="l08986"></a><span class="lineno"> 8986</span> <span class="comment"> *</span></div><div class="line"><a name="l08987"></a><span class="lineno"> 8987</span> <span class="comment"> */</span></div><div class="line"><a name="l08988"></a><span class="lineno"> 8988</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l08989"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#aadf36ab75f655cbc860c9e88e37db822"> 8989</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#aadf36ab75f655cbc860c9e88e37db822">folevariant_value</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l08990"></a><span class="lineno"> 8990</span> {</div><div class="line"><a name="l08991"></a><span class="lineno"> 8991</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l08992"></a><span class="lineno"> 8992</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l08993"></a><span class="lineno"> 8993</span>  VARTYPE vt;</div><div class="line"><a name="l08994"></a><span class="lineno"> 8994</span>  <span class="keywordtype">int</span> dim;</div><div class="line"><a name="l08995"></a><span class="lineno"> 8995</span>  SAFEARRAY *psa;</div><div class="line"><a name="l08996"></a><span class="lineno"> 8996</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>, pvar);</div><div class="line"><a name="l08997"></a><span class="lineno"> 8997</span> </div><div class="line"><a name="l08998"></a><span class="lineno"> 8998</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a>(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l08999"></a><span class="lineno"> 8999</span>  vt = V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l09000"></a><span class="lineno"> 9000</span> </div><div class="line"><a name="l09001"></a><span class="lineno"> 9001</span>  <span class="keywordflow">if</span> ((vt & ~VT_BYREF) == (VT_UI1|VT_ARRAY)) {</div><div class="line"><a name="l09002"></a><span class="lineno"> 9002</span>  <span class="keywordflow">if</span> (vt & VT_BYREF) {</div><div class="line"><a name="l09003"></a><span class="lineno"> 9003</span>  psa = *V_ARRAYREF(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l09004"></a><span class="lineno"> 9004</span>  } <span class="keywordflow">else</span> {</div><div class="line"><a name="l09005"></a><span class="lineno"> 9005</span>  psa = V_ARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l09006"></a><span class="lineno"> 9006</span>  }</div><div class="line"><a name="l09007"></a><span class="lineno"> 9007</span>  <span class="keywordflow">if</span> (!psa) {</div><div class="line"><a name="l09008"></a><span class="lineno"> 9008</span>  <span class="keywordflow">return</span> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l09009"></a><span class="lineno"> 9009</span>  }</div><div class="line"><a name="l09010"></a><span class="lineno"> 9010</span>  dim = SafeArrayGetDim(psa);</div><div class="line"><a name="l09011"></a><span class="lineno"> 9011</span>  <span class="keywordflow">if</span> (dim == 1) {</div><div class="line"><a name="l09012"></a><span class="lineno"> 9012</span>  <a class="code" href="../../df/d38/vm__exec_8c.html">val</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"pack"</span>), 1, <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<span class="stringliteral">"C*"</span>));</div><div class="line"><a name="l09013"></a><span class="lineno"> 9013</span>  }</div><div class="line"><a name="l09014"></a><span class="lineno"> 9014</span>  }</div><div class="line"><a name="l09015"></a><span class="lineno"> 9015</span>  <span class="keywordflow">return</span> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>;</div><div class="line"><a name="l09016"></a><span class="lineno"> 9016</span> }</div><div class="line"><a name="l09017"></a><span class="lineno"> 9017</span> </div><div class="line"><a name="l09018"></a><span class="lineno"> 9018</span> <span class="comment">/*</span></div><div class="line"><a name="l09019"></a><span class="lineno"> 9019</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l09020"></a><span class="lineno"> 9020</span> <span class="comment"> * WIN32OLE_VARIANT.vartype #=> OLE variant type.</span></div><div class="line"><a name="l09021"></a><span class="lineno"> 9021</span> <span class="comment"> *</span></div><div class="line"><a name="l09022"></a><span class="lineno"> 9022</span> <span class="comment"> * Returns OLE variant type.</span></div><div class="line"><a name="l09023"></a><span class="lineno"> 9023</span> <span class="comment"> * obj = WIN32OLE_VARIANT.new("string")</span></div><div class="line"><a name="l09024"></a><span class="lineno"> 9024</span> <span class="comment"> * obj.vartype # => WIN32OLE::VARIANT::VT_BSTR</span></div><div class="line"><a name="l09025"></a><span class="lineno"> 9025</span> <span class="comment"> *</span></div><div class="line"><a name="l09026"></a><span class="lineno"> 9026</span> <span class="comment"> */</span></div><div class="line"><a name="l09027"></a><span class="lineno"> 9027</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l09028"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a23d7c602c87c1e61b5495de603979936"> 9028</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a23d7c602c87c1e61b5495de603979936">folevariant_vartype</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>)</div><div class="line"><a name="l09029"></a><span class="lineno"> 9029</span> {</div><div class="line"><a name="l09030"></a><span class="lineno"> 9030</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l09031"></a><span class="lineno"> 9031</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>, pvar);</div><div class="line"><a name="l09032"></a><span class="lineno"> 9032</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(V_VT(&pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l09033"></a><span class="lineno"> 9033</span> }</div><div class="line"><a name="l09034"></a><span class="lineno"> 9034</span> </div><div class="line"><a name="l09035"></a><span class="lineno"> 9035</span> <span class="comment">/*</span></div><div class="line"><a name="l09036"></a><span class="lineno"> 9036</span> <span class="comment"> * call-seq:</span></div><div class="line"><a name="l09037"></a><span class="lineno"> 9037</span> <span class="comment"> * WIN32OLE_VARIANT.value = val #=> set WIN32OLE_VARIANT value to val.</span></div><div class="line"><a name="l09038"></a><span class="lineno"> 9038</span> <span class="comment"> *</span></div><div class="line"><a name="l09039"></a><span class="lineno"> 9039</span> <span class="comment"> * Sets variant value to val. If the val type does not match variant value</span></div><div class="line"><a name="l09040"></a><span class="lineno"> 9040</span> <span class="comment"> * type(vartype), then val is changed to match variant value type(vartype)</span></div><div class="line"><a name="l09041"></a><span class="lineno"> 9041</span> <span class="comment"> * before setting val.</span></div><div class="line"><a name="l09042"></a><span class="lineno"> 9042</span> <span class="comment"> * Thie method is not available when vartype is VT_ARRAY(except VT_UI1|VT_ARRAY).</span></div><div class="line"><a name="l09043"></a><span class="lineno"> 9043</span> <span class="comment"> * If the vartype is VT_UI1|VT_ARRAY, the val should be String object.</span></div><div class="line"><a name="l09044"></a><span class="lineno"> 9044</span> <span class="comment"> *</span></div><div class="line"><a name="l09045"></a><span class="lineno"> 9045</span> <span class="comment"> * obj = WIN32OLE_VARIANT.new(1) # obj.vartype is WIN32OLE::VARIANT::VT_I4</span></div><div class="line"><a name="l09046"></a><span class="lineno"> 9046</span> <span class="comment"> * obj.value = 3.2 # 3.2 is changed to 3 when setting value.</span></div><div class="line"><a name="l09047"></a><span class="lineno"> 9047</span> <span class="comment"> * p obj.value # => 3</span></div><div class="line"><a name="l09048"></a><span class="lineno"> 9048</span> <span class="comment"> */</span></div><div class="line"><a name="l09049"></a><span class="lineno"> 9049</span> <span class="keyword">static</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="line"><a name="l09050"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a50260416a5f8ae64ee1b630148f19160"> 9050</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a50260416a5f8ae64ee1b630148f19160">folevariant_set_value</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <span class="keyword">self</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> <a class="code" href="../../df/d38/vm__exec_8c.html">val</a>)</div><div class="line"><a name="l09051"></a><span class="lineno"> 9051</span> {</div><div class="line"><a name="l09052"></a><span class="lineno"> 9052</span>  <span class="keyword">struct </span><a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a> *pvar;</div><div class="line"><a name="l09053"></a><span class="lineno"> 9053</span>  VARTYPE vt;</div><div class="line"><a name="l09054"></a><span class="lineno"> 9054</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a>(<span class="keyword">self</span>, <span class="keyword">struct</span> <a class="code" href="../../dd/dd6/structolevariantdata.html">olevariantdata</a>, pvar);</div><div class="line"><a name="l09055"></a><span class="lineno"> 9055</span>  vt = V_VT(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>));</div><div class="line"><a name="l09056"></a><span class="lineno"> 9056</span>  <span class="keywordflow">if</span> (V_ISARRAY(&(pvar-><a class="code" href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">var</a>)) && ((vt & ~VT_BYREF) != (VT_UI1|VT_ARRAY) || <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>) != <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a>)) {</div><div class="line"><a name="l09057"></a><span class="lineno"> 9057</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a>,</div><div class="line"><a name="l09058"></a><span class="lineno"> 9058</span>  <span class="stringliteral">"`value=' is not available for this variant type object"</span>);</div><div class="line"><a name="l09059"></a><span class="lineno"> 9059</span>  }</div><div class="line"><a name="l09060"></a><span class="lineno"> 9060</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3cd351272efa990ad547562acc560dbb">ole_val2olevariantdata</a>(<a class="code" href="../../df/d38/vm__exec_8c.html">val</a>, vt, pvar);</div><div class="line"><a name="l09061"></a><span class="lineno"> 9061</span>  <span class="keywordflow">return</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>;</div><div class="line"><a name="l09062"></a><span class="lineno"> 9062</span> }</div><div class="line"><a name="l09063"></a><span class="lineno"> 9063</span> </div><div class="line"><a name="l09064"></a><span class="lineno"> 9064</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l09065"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#abfd24c730b491591cb4cbd90bfb104a6"> 9065</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#abfd24c730b491591cb4cbd90bfb104a6">init_enc2cp</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l09066"></a><span class="lineno"> 9066</span> {</div><div class="line"><a name="l09067"></a><span class="lineno"> 9067</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae55d84a8797460e9279316d18ed42e37">enc2cp_table</a> = <a class="code" href="../../dd/d24/st_8h.html#a955c6e936b9681649ab9ffa4aa741949">st_init_numtable</a>();</div><div class="line"><a name="l09068"></a><span class="lineno"> 9068</span> }</div><div class="line"><a name="l09069"></a><span class="lineno"> 9069</span> </div><div class="line"><a name="l09070"></a><span class="lineno"> 9070</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l09071"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#a2f7320fdc7ec16f02bffe3ad3d996024"> 9071</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#a2f7320fdc7ec16f02bffe3ad3d996024">free_enc2cp</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l09072"></a><span class="lineno"> 9072</span> {</div><div class="line"><a name="l09073"></a><span class="lineno"> 9073</span>  <a class="code" href="../../dd/d24/st_8h.html#acb004847ef312373d65bfb0d1a21c5b3">st_free_table</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae55d84a8797460e9279316d18ed42e37">enc2cp_table</a>);</div><div class="line"><a name="l09074"></a><span class="lineno"> 9074</span> }</div><div class="line"><a name="l09075"></a><span class="lineno"> 9075</span> </div><div class="line"><a name="l09076"></a><span class="lineno"> 9076</span> <span class="keywordtype">void</span></div><div class="line"><a name="l09077"></a><span class="lineno"><a class="line" href="../../d2/d99/win32ole_8c.html#ac00113a6af189ae37896dc351916f83f"> 9077</a></span> <a class="code" href="../../d2/d99/win32ole_8c.html#ac00113a6af189ae37896dc351916f83f">Init_win32ole</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l09078"></a><span class="lineno"> 9078</span> {</div><div class="line"><a name="l09079"></a><span class="lineno"> 9079</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aac13c3c50abb6519352a3398703aec8f">g_ole_initialized_init</a>();</div><div class="line"><a name="l09080"></a><span class="lineno"> 9080</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a2af0935d4ce085aa2320acd37d10cec5">ary_ole_event</a> = <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>();</div><div class="line"><a name="l09081"></a><span class="lineno"> 9081</span>  <a class="code" href="../../d8/d16/gc_8c.html#adc7efe8997f04b5c275d7e7aed9169e3">rb_gc_register_mark_object</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a2af0935d4ce085aa2320acd37d10cec5">ary_ole_event</a>);</div><div class="line"><a name="l09082"></a><span class="lineno"> 9082</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a0ce01fae8d4199ffd5f3df63cf0796f8">id_events</a> = <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"events"</span>);</div><div class="line"><a name="l09083"></a><span class="lineno"> 9083</span> </div><div class="line"><a name="l09084"></a><span class="lineno"> 9084</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808">com_vtbl</a>.QueryInterface = QueryInterface;</div><div class="line"><a name="l09085"></a><span class="lineno"> 9085</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808">com_vtbl</a>.AddRef = AddRef;</div><div class="line"><a name="l09086"></a><span class="lineno"> 9086</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808">com_vtbl</a>.Release = Release;</div><div class="line"><a name="l09087"></a><span class="lineno"> 9087</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808">com_vtbl</a>.GetTypeInfoCount = GetTypeInfoCount;</div><div class="line"><a name="l09088"></a><span class="lineno"> 9088</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808">com_vtbl</a>.GetTypeInfo = GetTypeInfo;</div><div class="line"><a name="l09089"></a><span class="lineno"> 9089</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808">com_vtbl</a>.GetIDsOfNames = GetIDsOfNames;</div><div class="line"><a name="l09090"></a><span class="lineno"> 9090</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808">com_vtbl</a>.Invoke = Invoke;</div><div class="line"><a name="l09091"></a><span class="lineno"> 9091</span> </div><div class="line"><a name="l09092"></a><span class="lineno"> 9092</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181">message_filter</a>.QueryInterface = mf_QueryInterface;</div><div class="line"><a name="l09093"></a><span class="lineno"> 9093</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181">message_filter</a>.AddRef = mf_AddRef;</div><div class="line"><a name="l09094"></a><span class="lineno"> 9094</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181">message_filter</a>.Release = mf_Release;</div><div class="line"><a name="l09095"></a><span class="lineno"> 9095</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181">message_filter</a>.HandleInComingCall = mf_HandleInComingCall;</div><div class="line"><a name="l09096"></a><span class="lineno"> 9096</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181">message_filter</a>.RetryRejectedCall = mf_RetryRejectedCall;</div><div class="line"><a name="l09097"></a><span class="lineno"> 9097</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181">message_filter</a>.MessagePending = mf_MessagePending;</div><div class="line"><a name="l09098"></a><span class="lineno"> 9098</span> </div><div class="line"><a name="l09099"></a><span class="lineno"> 9099</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a9e1526602f12196f5bf394832700029a">com_hash</a> = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a27705a261a9addb9ed4cb65dd5a61b1c">Data_Wrap_Struct</a>(<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a39cf94183e6d744167ae5f6a7bde0363">rb_cData</a>, <a class="code" href="../../d8/d16/gc_8c.html#a5489730b418f25891238cfea5cdaa531">rb_mark_hash</a>, <a class="code" href="../../dd/d24/st_8h.html#acb004847ef312373d65bfb0d1a21c5b3">st_free_table</a>, <a class="code" href="../../dd/d24/st_8h.html#a955c6e936b9681649ab9ffa4aa741949">st_init_numtable</a>());</div><div class="line"><a name="l09100"></a><span class="lineno"> 9100</span>  <a class="code" href="../../d8/d16/gc_8c.html#adc7efe8997f04b5c275d7e7aed9169e3">rb_gc_register_mark_object</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a9e1526602f12196f5bf394832700029a">com_hash</a>);</div><div class="line"><a name="l09101"></a><span class="lineno"> 9101</span> </div><div class="line"><a name="l09102"></a><span class="lineno"> 9102</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a> = <a class="code" href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a>(<span class="stringliteral">"WIN32OLE"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a57c96ead3ef230b4838e65fe037c346e">rb_cObject</a>);</div><div class="line"><a name="l09103"></a><span class="lineno"> 9103</span> </div><div class="line"><a name="l09104"></a><span class="lineno"> 9104</span>  <a class="code" href="../../db/d2e/intern_8h.html#a6c99ed7f070458b961026d43d27d0642">rb_define_alloc_func</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a2d0cf91d19e5f8f14cf8c167f4699275">fole_s_allocate</a>);</div><div class="line"><a name="l09105"></a><span class="lineno"> 9105</span> </div><div class="line"><a name="l09106"></a><span class="lineno"> 9106</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"initialize"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a7f8945d4358f512f72dcfc6a0298bd1c">fole_initialize</a>, -1);</div><div class="line"><a name="l09107"></a><span class="lineno"> 9107</span> </div><div class="line"><a name="l09108"></a><span class="lineno"> 9108</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"connect"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a41b6cce0ceb88f59521f6a9b5cbc903e">fole_s_connect</a>, -1);</div><div class="line"><a name="l09109"></a><span class="lineno"> 9109</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"const_load"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aece2e35f468147b6d40f99a14c3c7f6a">fole_s_const_load</a>, -1);</div><div class="line"><a name="l09110"></a><span class="lineno"> 9110</span> </div><div class="line"><a name="l09111"></a><span class="lineno"> 9111</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_free"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aaed28da1a2098bc9ce356c985343e7e2">fole_s_free</a>, 1);</div><div class="line"><a name="l09112"></a><span class="lineno"> 9112</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_reference_count"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a5f96c057db4987aa9d01f368539b1507">fole_s_reference_count</a>, 1);</div><div class="line"><a name="l09113"></a><span class="lineno"> 9113</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_show_help"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a71d23fe98f21177991723bbbd03b6875">fole_s_show_help</a>, -1);</div><div class="line"><a name="l09114"></a><span class="lineno"> 9114</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"codepage"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a46e95b41258862662f5e02173c154a7a">fole_s_get_code_page</a>, 0);</div><div class="line"><a name="l09115"></a><span class="lineno"> 9115</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"codepage="</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ac2cadf7c61871ef6c7d630762d3ca09d">fole_s_set_code_page</a>, 1);</div><div class="line"><a name="l09116"></a><span class="lineno"> 9116</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"locale"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a3a0d9cd7ac70636cff4bfc3a398f9349">fole_s_get_locale</a>, 0);</div><div class="line"><a name="l09117"></a><span class="lineno"> 9117</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"locale="</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ac0a9f64129d5836fc8f9b0195ca478ec">fole_s_set_locale</a>, 1);</div><div class="line"><a name="l09118"></a><span class="lineno"> 9118</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"create_guid"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a9ac8207bb0ee9c5e02c8a012cc00d4e2">fole_s_create_guid</a>, 0);</div><div class="line"><a name="l09119"></a><span class="lineno"> 9119</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_initialize"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a711bebed75d5dbef9317d46792aa8255">fole_s_ole_initialize</a>, 0);</div><div class="line"><a name="l09120"></a><span class="lineno"> 9120</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_uninitialize"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a197b9a7e0b15c57cddf36d7950572b1a">fole_s_ole_uninitialize</a>, 0);</div><div class="line"><a name="l09121"></a><span class="lineno"> 9121</span> </div><div class="line"><a name="l09122"></a><span class="lineno"> 9122</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"invoke"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a950b2a90a61b3cae5543c9d93b00ead3">fole_invoke</a>, -1);</div><div class="line"><a name="l09123"></a><span class="lineno"> 9123</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"[]"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a5032240cb2729bee87cc42cb5cc23695">fole_getproperty_with_bracket</a>, -1);</div><div class="line"><a name="l09124"></a><span class="lineno"> 9124</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"_invoke"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#abf52aec9001101679b74a4117347b4ce">fole_invoke2</a>, 3);</div><div class="line"><a name="l09125"></a><span class="lineno"> 9125</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"_getproperty"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a303d4c6c980af9ead5d8e06cdf4be789">fole_getproperty2</a>, 3);</div><div class="line"><a name="l09126"></a><span class="lineno"> 9126</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"_setproperty"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aea975e81d1fe3056985636f1fa72e8b9">fole_setproperty2</a>, 3);</div><div class="line"><a name="l09127"></a><span class="lineno"> 9127</span> </div><div class="line"><a name="l09128"></a><span class="lineno"> 9128</span>  <span class="comment">/* support propput method that takes an argument */</span></div><div class="line"><a name="l09129"></a><span class="lineno"> 9129</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"[]="</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a60f46a0254e9350ddf3ae68009748eb8">fole_setproperty_with_bracket</a>, -1);</div><div class="line"><a name="l09130"></a><span class="lineno"> 9130</span> </div><div class="line"><a name="l09131"></a><span class="lineno"> 9131</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_free"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a1c39e066aeecfd08aada95a49e3e48f4">fole_free</a>, 0);</div><div class="line"><a name="l09132"></a><span class="lineno"> 9132</span> </div><div class="line"><a name="l09133"></a><span class="lineno"> 9133</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"each"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a83b4d0c7361c567ebe70479b937c3a7d">fole_each</a>, 0);</div><div class="line"><a name="l09134"></a><span class="lineno"> 9134</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"method_missing"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a9f2d2aeab774970ad953b6541ee96dcf">fole_missing</a>, -1);</div><div class="line"><a name="l09135"></a><span class="lineno"> 9135</span> </div><div class="line"><a name="l09136"></a><span class="lineno"> 9136</span>  <span class="comment">/* support setproperty method much like Perl ;-) */</span></div><div class="line"><a name="l09137"></a><span class="lineno"> 9137</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"setproperty"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a434cf8ff2ac0a88549687089a80ffb01">fole_setproperty</a>, -1);</div><div class="line"><a name="l09138"></a><span class="lineno"> 9138</span> </div><div class="line"><a name="l09139"></a><span class="lineno"> 9139</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_methods"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a7172b0aee359977f81f71251db26edc5">fole_methods</a>, 0);</div><div class="line"><a name="l09140"></a><span class="lineno"> 9140</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_get_methods"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aaff897843a1cf2bfb5857b77f78bd7f2">fole_get_methods</a>, 0);</div><div class="line"><a name="l09141"></a><span class="lineno"> 9141</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_put_methods"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a1a1d911e7d192419a0bc563c1134e1f1">fole_put_methods</a>, 0);</div><div class="line"><a name="l09142"></a><span class="lineno"> 9142</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_func_methods"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a6a99140a5476f0da87c2c9aba0752f0f">fole_func_methods</a>, 0);</div><div class="line"><a name="l09143"></a><span class="lineno"> 9143</span> </div><div class="line"><a name="l09144"></a><span class="lineno"> 9144</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_method"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a14d93d21d7208d39e5c3c63d50214abd">fole_method_help</a>, 1);</div><div class="line"><a name="l09145"></a><span class="lineno"> 9145</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_method_help"</span>, <span class="stringliteral">"ole_method"</span>);</div><div class="line"><a name="l09146"></a><span class="lineno"> 9146</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_activex_initialize"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a60fc00d3ccda920f10703894be73a31d">fole_activex_initialize</a>, 0);</div><div class="line"><a name="l09147"></a><span class="lineno"> 9147</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_type"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a190323bc253935196667f23146769fb3">fole_type</a>, 0);</div><div class="line"><a name="l09148"></a><span class="lineno"> 9148</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_obj_help"</span>, <span class="stringliteral">"ole_type"</span>);</div><div class="line"><a name="l09149"></a><span class="lineno"> 9149</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_typelib"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#abcd6997bfbcd8f8c44472b2f05480e39">fole_typelib</a>, 0);</div><div class="line"><a name="l09150"></a><span class="lineno"> 9150</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_query_interface"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a1c2427bf2f78d7dc92d556bea85123ce">fole_query_interface</a>, 1);</div><div class="line"><a name="l09151"></a><span class="lineno"> 9151</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ole_respond_to?"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#af8996048ad14314fa7aef6d4d775731b">fole_respond_to</a>, 1);</div><div class="line"><a name="l09152"></a><span class="lineno"> 9152</span> </div><div class="line"><a name="l09153"></a><span class="lineno"> 9153</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"VERSION"</span>, <a class="code" href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ac7331f65815deaeea30dc7a834594148">WIN32OLE_VERSION</a>));</div><div class="line"><a name="l09154"></a><span class="lineno"> 9154</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"ARGV"</span>, <a class="code" href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a>());</div><div class="line"><a name="l09155"></a><span class="lineno"> 9155</span> </div><div class="line"><a name="l09156"></a><span class="lineno"> 9156</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"CP_ACP"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(CP_ACP));</div><div class="line"><a name="l09157"></a><span class="lineno"> 9157</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"CP_OEMCP"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(CP_OEMCP));</div><div class="line"><a name="l09158"></a><span class="lineno"> 9158</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"CP_MACCP"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(CP_MACCP));</div><div class="line"><a name="l09159"></a><span class="lineno"> 9159</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"CP_THREAD_ACP"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(CP_THREAD_ACP));</div><div class="line"><a name="l09160"></a><span class="lineno"> 9160</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"CP_SYMBOL"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(CP_SYMBOL));</div><div class="line"><a name="l09161"></a><span class="lineno"> 9161</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"CP_UTF7"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(CP_UTF7));</div><div class="line"><a name="l09162"></a><span class="lineno"> 9162</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"CP_UTF8"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(CP_UTF8));</div><div class="line"><a name="l09163"></a><span class="lineno"> 9163</span> </div><div class="line"><a name="l09164"></a><span class="lineno"> 9164</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"LOCALE_SYSTEM_DEFAULT"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(LOCALE_SYSTEM_DEFAULT));</div><div class="line"><a name="l09165"></a><span class="lineno"> 9165</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"LOCALE_USER_DEFAULT"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(LOCALE_USER_DEFAULT));</div><div class="line"><a name="l09166"></a><span class="lineno"> 9166</span> </div><div class="line"><a name="l09167"></a><span class="lineno"> 9167</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a> = <a class="code" href="../../de/ddf/group__class.html#gad0eeed44f413060a2417852168747388">rb_define_module_under</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a>, <span class="stringliteral">"VARIANT"</span>);</div><div class="line"><a name="l09168"></a><span class="lineno"> 9168</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_EMPTY"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_EMPTY));</div><div class="line"><a name="l09169"></a><span class="lineno"> 9169</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_NULL"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_NULL));</div><div class="line"><a name="l09170"></a><span class="lineno"> 9170</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_I2"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_I2));</div><div class="line"><a name="l09171"></a><span class="lineno"> 9171</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_I4"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_I4));</div><div class="line"><a name="l09172"></a><span class="lineno"> 9172</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_R4"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_R4));</div><div class="line"><a name="l09173"></a><span class="lineno"> 9173</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_R8"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_R8));</div><div class="line"><a name="l09174"></a><span class="lineno"> 9174</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_CY"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_CY));</div><div class="line"><a name="l09175"></a><span class="lineno"> 9175</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_DATE"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_DATE));</div><div class="line"><a name="l09176"></a><span class="lineno"> 9176</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_BSTR"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_BSTR));</div><div class="line"><a name="l09177"></a><span class="lineno"> 9177</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_USERDEFINED"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_USERDEFINED));</div><div class="line"><a name="l09178"></a><span class="lineno"> 9178</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_PTR"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_PTR));</div><div class="line"><a name="l09179"></a><span class="lineno"> 9179</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_DISPATCH"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_DISPATCH));</div><div class="line"><a name="l09180"></a><span class="lineno"> 9180</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_ERROR"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_ERROR));</div><div class="line"><a name="l09181"></a><span class="lineno"> 9181</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_BOOL"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_BOOL));</div><div class="line"><a name="l09182"></a><span class="lineno"> 9182</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_VARIANT"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_VARIANT));</div><div class="line"><a name="l09183"></a><span class="lineno"> 9183</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_UNKNOWN"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_UNKNOWN));</div><div class="line"><a name="l09184"></a><span class="lineno"> 9184</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_I1"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_I1));</div><div class="line"><a name="l09185"></a><span class="lineno"> 9185</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_UI1"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_UI1));</div><div class="line"><a name="l09186"></a><span class="lineno"> 9186</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_UI2"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_UI2));</div><div class="line"><a name="l09187"></a><span class="lineno"> 9187</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_UI4"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_UI4));</div><div class="line"><a name="l09188"></a><span class="lineno"> 9188</span> <span class="preprocessor">#if (_MSC_VER >= 1300) || defined(__CYGWIN__) || defined(__MINGW32__)</span></div><div class="line"><a name="l09189"></a><span class="lineno"> 9189</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_I8"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_I8));</div><div class="line"><a name="l09190"></a><span class="lineno"> 9190</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_UI8"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_UI8));</div><div class="line"><a name="l09191"></a><span class="lineno"> 9191</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l09192"></a><span class="lineno"> 9192</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_INT"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_INT));</div><div class="line"><a name="l09193"></a><span class="lineno"> 9193</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_UINT"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_UINT));</div><div class="line"><a name="l09194"></a><span class="lineno"> 9194</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_ARRAY"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_ARRAY));</div><div class="line"><a name="l09195"></a><span class="lineno"> 9195</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a>, <span class="stringliteral">"VT_BYREF"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_BYREF));</div><div class="line"><a name="l09196"></a><span class="lineno"> 9196</span> </div><div class="line"><a name="l09197"></a><span class="lineno"> 9197</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a> = <a class="code" href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a>(<span class="stringliteral">"WIN32OLE_TYPELIB"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a57c96ead3ef230b4838e65fe037c346e">rb_cObject</a>);</div><div class="line"><a name="l09198"></a><span class="lineno"> 9198</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"typelibs"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ac1a1bad5f7ad2818c0d660068ab44e8a">foletypelib_s_typelibs</a>, 0);</div><div class="line"><a name="l09199"></a><span class="lineno"> 9199</span>  <a class="code" href="../../db/d2e/intern_8h.html#a6c99ed7f070458b961026d43d27d0642">rb_define_alloc_func</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a038baf72fddd2f2f0317efe9f0b4c2ad">foletypelib_s_allocate</a>);</div><div class="line"><a name="l09200"></a><span class="lineno"> 9200</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"initialize"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a9429c757d4fe15ece52d69edf0e094e2">foletypelib_initialize</a>, -2);</div><div class="line"><a name="l09201"></a><span class="lineno"> 9201</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"guid"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a3757bad3ebff1b9c19971d2b364625b4">foletypelib_guid</a>, 0);</div><div class="line"><a name="l09202"></a><span class="lineno"> 9202</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"name"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a91f2817851c7bb20c0fe5bd881163956">foletypelib_name</a>, 0);</div><div class="line"><a name="l09203"></a><span class="lineno"> 9203</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"version"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a11c9249c3a3713391907080d3e9d9d9b">foletypelib_version</a>, 0);</div><div class="line"><a name="l09204"></a><span class="lineno"> 9204</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"major_version"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a9a574ecfa512cc905e0c882fe0413b43">foletypelib_major_version</a>, 0);</div><div class="line"><a name="l09205"></a><span class="lineno"> 9205</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"minor_version"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aff402c8fcf8df12ad99c93c4ba96abd4">foletypelib_minor_version</a>, 0);</div><div class="line"><a name="l09206"></a><span class="lineno"> 9206</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"path"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a55c610157abbd413fa24145b5705907d">foletypelib_path</a>, 0);</div><div class="line"><a name="l09207"></a><span class="lineno"> 9207</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"ole_types"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ad954f499199716efcb6d3656d6874aea">foletypelib_ole_types</a>, 0);</div><div class="line"><a name="l09208"></a><span class="lineno"> 9208</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"ole_classes"</span>, <span class="stringliteral">"ole_types"</span>);</div><div class="line"><a name="l09209"></a><span class="lineno"> 9209</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"visible?"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a60cc14e6fb03174de0b20323e13afcdd">foletypelib_visible</a>, 0);</div><div class="line"><a name="l09210"></a><span class="lineno"> 9210</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"library_name"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a31f75b0afdb68143a0ea46798c10b413">foletypelib_library_name</a>, 0);</div><div class="line"><a name="l09211"></a><span class="lineno"> 9211</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"to_s"</span>, <span class="stringliteral">"name"</span>);</div><div class="line"><a name="l09212"></a><span class="lineno"> 9212</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a>, <span class="stringliteral">"inspect"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aa01105060883846e72031eed6131b7d7">foletypelib_inspect</a>, 0);</div><div class="line"><a name="l09213"></a><span class="lineno"> 9213</span> </div><div class="line"><a name="l09214"></a><span class="lineno"> 9214</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a> = <a class="code" href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a>(<span class="stringliteral">"WIN32OLE_TYPE"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a57c96ead3ef230b4838e65fe037c346e">rb_cObject</a>);</div><div class="line"><a name="l09215"></a><span class="lineno"> 9215</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"ole_classes"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a6aba758cd00cea749b2a7e1ae22098df">foletype_s_ole_classes</a>, 1);</div><div class="line"><a name="l09216"></a><span class="lineno"> 9216</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"typelibs"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ad7869cc5544dece10a158bb1e6340e1e">foletype_s_typelibs</a>, 0);</div><div class="line"><a name="l09217"></a><span class="lineno"> 9217</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"progids"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a900802f6db162dab47ccf45555a9905d">foletype_s_progids</a>, 0);</div><div class="line"><a name="l09218"></a><span class="lineno"> 9218</span>  <a class="code" href="../../db/d2e/intern_8h.html#a6c99ed7f070458b961026d43d27d0642">rb_define_alloc_func</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#ac3ae981871b66fdb4efa0a05ad712256">foletype_s_allocate</a>);</div><div class="line"><a name="l09219"></a><span class="lineno"> 9219</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"initialize"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a2fdc77d63c0a1d101a2597e9d13da037">foletype_initialize</a>, 2);</div><div class="line"><a name="l09220"></a><span class="lineno"> 9220</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"name"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ae702a671c49f24709fcec4962b540fbd">foletype_name</a>, 0);</div><div class="line"><a name="l09221"></a><span class="lineno"> 9221</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"ole_type"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#af7405fc306fc6dd47d3718be25b547b7">foletype_ole_type</a>, 0);</div><div class="line"><a name="l09222"></a><span class="lineno"> 9222</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"guid"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a55b1c52400f549decd28910adf9534b0">foletype_guid</a>, 0);</div><div class="line"><a name="l09223"></a><span class="lineno"> 9223</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"progid"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a6f887102a87a5c6e8f1155ea69bd02a1">foletype_progid</a>, 0);</div><div class="line"><a name="l09224"></a><span class="lineno"> 9224</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"visible?"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a67538b99589f8465d34e18df229b9700">foletype_visible</a>, 0);</div><div class="line"><a name="l09225"></a><span class="lineno"> 9225</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"to_s"</span>, <span class="stringliteral">"name"</span>);</div><div class="line"><a name="l09226"></a><span class="lineno"> 9226</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"major_version"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a198156271b35da99714f298e4885d34c">foletype_major_version</a>, 0);</div><div class="line"><a name="l09227"></a><span class="lineno"> 9227</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"minor_version"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aad76daf1fd7ba9e72d79d2906bb41254">foletype_minor_version</a>, 0);</div><div class="line"><a name="l09228"></a><span class="lineno"> 9228</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"typekind"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a8b4f3db715ec27ff1b90d5a594e17556">foletype_typekind</a>, 0);</div><div class="line"><a name="l09229"></a><span class="lineno"> 9229</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"helpstring"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a536bbe39f587ff60fd0cee5db26dc333">foletype_helpstring</a>, 0);</div><div class="line"><a name="l09230"></a><span class="lineno"> 9230</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"src_type"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a1a24f6def4ff0e89e8f3884381b49be2">foletype_src_type</a>, 0);</div><div class="line"><a name="l09231"></a><span class="lineno"> 9231</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"helpfile"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a0f560d82cf2e4604437fc3bb7280cec3">foletype_helpfile</a>, 0);</div><div class="line"><a name="l09232"></a><span class="lineno"> 9232</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"helpcontext"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a17402178059917f6dd6803ee73df6426">foletype_helpcontext</a>, 0);</div><div class="line"><a name="l09233"></a><span class="lineno"> 9233</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"variables"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a7601c0e4082bdf69b36e4b712c71d849">foletype_variables</a>, 0);</div><div class="line"><a name="l09234"></a><span class="lineno"> 9234</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"ole_methods"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a80ab193b9c367a2c3582c7b8513d0ccf">foletype_methods</a>, 0);</div><div class="line"><a name="l09235"></a><span class="lineno"> 9235</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"ole_typelib"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ae383fe3eb9655495e30cac84b29e6168">foletype_ole_typelib</a>, 0);</div><div class="line"><a name="l09236"></a><span class="lineno"> 9236</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"implemented_ole_types"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ad0f95a9f48f7af93146a71963663ec1d">foletype_impl_ole_types</a>, 0);</div><div class="line"><a name="l09237"></a><span class="lineno"> 9237</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"source_ole_types"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a6a2bfa6c8da64466fb5babc49837e561">foletype_source_ole_types</a>, 0);</div><div class="line"><a name="l09238"></a><span class="lineno"> 9238</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"default_event_sources"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a2ea06a0d884fd9971f1540791dadb03a">foletype_default_event_sources</a>, 0);</div><div class="line"><a name="l09239"></a><span class="lineno"> 9239</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"default_ole_types"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a1aa9cb27ad3f5c039b159d04221c2730">foletype_default_ole_types</a>, 0);</div><div class="line"><a name="l09240"></a><span class="lineno"> 9240</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a>, <span class="stringliteral">"inspect"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a865684be9919637fc636e618fcfc34c0">foletype_inspect</a>, 0);</div><div class="line"><a name="l09241"></a><span class="lineno"> 9241</span> </div><div class="line"><a name="l09242"></a><span class="lineno"> 9242</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a> = <a class="code" href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a>(<span class="stringliteral">"WIN32OLE_VARIABLE"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a57c96ead3ef230b4838e65fe037c346e">rb_cObject</a>);</div><div class="line"><a name="l09243"></a><span class="lineno"> 9243</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>, <span class="stringliteral">"name"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a2e6e042a244e5434dd410a469ed351c9">folevariable_name</a>, 0);</div><div class="line"><a name="l09244"></a><span class="lineno"> 9244</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>, <span class="stringliteral">"ole_type"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a20fb23da064c1347bccf49c1e676ddbb">folevariable_ole_type</a>, 0);</div><div class="line"><a name="l09245"></a><span class="lineno"> 9245</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>, <span class="stringliteral">"ole_type_detail"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a7fd47663ce9b04a6aab54fbeb42a8298">folevariable_ole_type_detail</a>, 0);</div><div class="line"><a name="l09246"></a><span class="lineno"> 9246</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>, <span class="stringliteral">"value"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a0b0b26c0997cc209fd7a7f6aa8f7f21c">folevariable_value</a>, 0);</div><div class="line"><a name="l09247"></a><span class="lineno"> 9247</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>, <span class="stringliteral">"visible?"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ad362e99b0e786cf59de8ca21b1509d9e">folevariable_visible</a>, 0);</div><div class="line"><a name="l09248"></a><span class="lineno"> 9248</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>, <span class="stringliteral">"variable_kind"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a0fc97ff3ba5a68010e19aac6920897cc">folevariable_variable_kind</a>, 0);</div><div class="line"><a name="l09249"></a><span class="lineno"> 9249</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>, <span class="stringliteral">"varkind"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#af2f972ca981683bd7a3e06d766776420">folevariable_varkind</a>, 0);</div><div class="line"><a name="l09250"></a><span class="lineno"> 9250</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>, <span class="stringliteral">"inspect"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aca6350a62c8eea366d1df29eca78dc48">folevariable_inspect</a>, 0);</div><div class="line"><a name="l09251"></a><span class="lineno"> 9251</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a>, <span class="stringliteral">"to_s"</span>, <span class="stringliteral">"name"</span>);</div><div class="line"><a name="l09252"></a><span class="lineno"> 9252</span> </div><div class="line"><a name="l09253"></a><span class="lineno"> 9253</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a> = <a class="code" href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a>(<span class="stringliteral">"WIN32OLE_METHOD"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a57c96ead3ef230b4838e65fe037c346e">rb_cObject</a>);</div><div class="line"><a name="l09254"></a><span class="lineno"> 9254</span>  <a class="code" href="../../db/d2e/intern_8h.html#a6c99ed7f070458b961026d43d27d0642">rb_define_alloc_func</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#afb37c29e28b1f960fbf22b605993354d">folemethod_s_allocate</a>);</div><div class="line"><a name="l09255"></a><span class="lineno"> 9255</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"initialize"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a7b85e610d07b34c298cf33157d20744f">folemethod_initialize</a>, 2);</div><div class="line"><a name="l09256"></a><span class="lineno"> 9256</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"name"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a6c0faebe3e31e28f7202288a1ec72573">folemethod_name</a>, 0);</div><div class="line"><a name="l09257"></a><span class="lineno"> 9257</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"return_type"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a69aa8b97b2991bba847a006ba8a683ff">folemethod_return_type</a>, 0);</div><div class="line"><a name="l09258"></a><span class="lineno"> 9258</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"return_vtype"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ae4836afb8566d0ed610b9360d6f50990">folemethod_return_vtype</a>, 0);</div><div class="line"><a name="l09259"></a><span class="lineno"> 9259</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"return_type_detail"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a4143de391103e02d12818baedff3f685">folemethod_return_type_detail</a>, 0);</div><div class="line"><a name="l09260"></a><span class="lineno"> 9260</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"invoke_kind"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a0faf86c7524111112f60229f8da59d14">folemethod_invoke_kind</a>, 0);</div><div class="line"><a name="l09261"></a><span class="lineno"> 9261</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"invkind"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#afda17c1fafb5c5da6cf2467641cb41a7">folemethod_invkind</a>, 0);</div><div class="line"><a name="l09262"></a><span class="lineno"> 9262</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"visible?"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a2f15f8ec2d25451fb0a2d74f0f2a1b7f">folemethod_visible</a>, 0);</div><div class="line"><a name="l09263"></a><span class="lineno"> 9263</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"event?"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aaa3aba20914a6077714e3aec036c162b">folemethod_event</a>, 0);</div><div class="line"><a name="l09264"></a><span class="lineno"> 9264</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"event_interface"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ae54179477459ef72c2885549ff5e40e6">folemethod_event_interface</a>, 0);</div><div class="line"><a name="l09265"></a><span class="lineno"> 9265</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"helpstring"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#af476ba7b3bb2b432ef6e7e772ec7a6f8">folemethod_helpstring</a>, 0);</div><div class="line"><a name="l09266"></a><span class="lineno"> 9266</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"helpfile"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a6f9ef6641c628823181498337f6d8db5">folemethod_helpfile</a>, 0);</div><div class="line"><a name="l09267"></a><span class="lineno"> 9267</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"helpcontext"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#afacb5c1ecde95354cfd6a6be1415c5b8">folemethod_helpcontext</a>, 0);</div><div class="line"><a name="l09268"></a><span class="lineno"> 9268</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"dispid"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a48e776cb94d0c16741489a9c9450a398">folemethod_dispid</a>, 0);</div><div class="line"><a name="l09269"></a><span class="lineno"> 9269</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"offset_vtbl"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ab72c16ea0e701d5685275b1a9aed1585">folemethod_offset_vtbl</a>, 0);</div><div class="line"><a name="l09270"></a><span class="lineno"> 9270</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"size_params"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a3aca3c33d649f21caec07ab0fac207ae">folemethod_size_params</a>, 0);</div><div class="line"><a name="l09271"></a><span class="lineno"> 9271</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"size_opt_params"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#af36a9f22dfbb15239480f833541fb2d6">folemethod_size_opt_params</a>, 0);</div><div class="line"><a name="l09272"></a><span class="lineno"> 9272</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"params"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ac95137c8f13aece1fc5c9e6480062b68">folemethod_params</a>, 0);</div><div class="line"><a name="l09273"></a><span class="lineno"> 9273</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"to_s"</span>, <span class="stringliteral">"name"</span>);</div><div class="line"><a name="l09274"></a><span class="lineno"> 9274</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a>, <span class="stringliteral">"inspect"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a6946f44fe8fd3dc52c25b9138ce1329f">folemethod_inspect</a>, 0);</div><div class="line"><a name="l09275"></a><span class="lineno"> 9275</span> </div><div class="line"><a name="l09276"></a><span class="lineno"> 9276</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a> = <a class="code" href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a>(<span class="stringliteral">"WIN32OLE_PARAM"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a57c96ead3ef230b4838e65fe037c346e">rb_cObject</a>);</div><div class="line"><a name="l09277"></a><span class="lineno"> 9277</span>  <a class="code" href="../../db/d2e/intern_8h.html#a6c99ed7f070458b961026d43d27d0642">rb_define_alloc_func</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#ada8d032e43fda83f47fc1dc5d67b7e42">foleparam_s_allocate</a>);</div><div class="line"><a name="l09278"></a><span class="lineno"> 9278</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"initialize"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a28a014fe0e5748d97ce5df5aca42ae00">foleparam_initialize</a>, 2);</div><div class="line"><a name="l09279"></a><span class="lineno"> 9279</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"name"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aaf29c43a083c4cb50d8e2e24bdde16b6">foleparam_name</a>, 0);</div><div class="line"><a name="l09280"></a><span class="lineno"> 9280</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"ole_type"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a1d906af605a6180e2e90b662b1932879">foleparam_ole_type</a>, 0);</div><div class="line"><a name="l09281"></a><span class="lineno"> 9281</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"ole_type_detail"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a5d3bde90e102b667d712389285c5d200">foleparam_ole_type_detail</a>, 0);</div><div class="line"><a name="l09282"></a><span class="lineno"> 9282</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"input?"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#af7bc1b360651a48a8b08d6baaee78905">foleparam_input</a>, 0);</div><div class="line"><a name="l09283"></a><span class="lineno"> 9283</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"output?"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#af263844f08ace69c092c8ab5a0839892">foleparam_output</a>, 0);</div><div class="line"><a name="l09284"></a><span class="lineno"> 9284</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"optional?"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a4c2d586120bd8d98112b6be60e4f8294">foleparam_optional</a>, 0);</div><div class="line"><a name="l09285"></a><span class="lineno"> 9285</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"retval?"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ac6ec24a19ac346216e24b0033d8bd202">foleparam_retval</a>, 0);</div><div class="line"><a name="l09286"></a><span class="lineno"> 9286</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"default"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a3fd59f1b292db308f516fe025a5cd446">foleparam_default</a>, 0);</div><div class="line"><a name="l09287"></a><span class="lineno"> 9287</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"to_s"</span>, <span class="stringliteral">"name"</span>);</div><div class="line"><a name="l09288"></a><span class="lineno"> 9288</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a>, <span class="stringliteral">"inspect"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a5079f1cd6dbfb8ce2b112d4f4de56970">foleparam_inspect</a>, 0);</div><div class="line"><a name="l09289"></a><span class="lineno"> 9289</span> </div><div class="line"><a name="l09290"></a><span class="lineno"> 9290</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a> = <a class="code" href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a>(<span class="stringliteral">"WIN32OLE_EVENT"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a57c96ead3ef230b4838e65fe037c346e">rb_cObject</a>);</div><div class="line"><a name="l09291"></a><span class="lineno"> 9291</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>, <span class="stringliteral">"message_loop"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a593b161d7b4621b0e6b31434cec8d8cc">fev_s_msg_loop</a>, 0);</div><div class="line"><a name="l09292"></a><span class="lineno"> 9292</span>  <a class="code" href="../../db/d2e/intern_8h.html#a6c99ed7f070458b961026d43d27d0642">rb_define_alloc_func</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#ad2e1b59fa7e18c47b5de24b1a58b6ff7">fev_s_allocate</a>);</div><div class="line"><a name="l09293"></a><span class="lineno"> 9293</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>, <span class="stringliteral">"initialize"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a6bcacff9ce50a9417b8b262dba751248">fev_initialize</a>, -1);</div><div class="line"><a name="l09294"></a><span class="lineno"> 9294</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>, <span class="stringliteral">"on_event"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aab8c56df7fcad310b56c1785e2beae95">fev_on_event</a>, -1);</div><div class="line"><a name="l09295"></a><span class="lineno"> 9295</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>, <span class="stringliteral">"on_event_with_outargs"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a1f53a6e31877dd97034b00483513dd88">fev_on_event_with_outargs</a>, -1);</div><div class="line"><a name="l09296"></a><span class="lineno"> 9296</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>, <span class="stringliteral">"off_event"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a2fe63f55350b20cc7532caf5ad0e7ccc">fev_off_event</a>, -1);</div><div class="line"><a name="l09297"></a><span class="lineno"> 9297</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>, <span class="stringliteral">"unadvise"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a03d0ad12a5dfd5fe6dfb820a2fcf4ca7">fev_unadvise</a>, 0);</div><div class="line"><a name="l09298"></a><span class="lineno"> 9298</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>, <span class="stringliteral">"handler="</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#ae384ff6b7496bc19a6cc419461cf61f5">fev_set_handler</a>, 1);</div><div class="line"><a name="l09299"></a><span class="lineno"> 9299</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a>, <span class="stringliteral">"handler"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aee60a56e4ca92f2f597dbc14483ccfeb">fev_get_handler</a>, 0);</div><div class="line"><a name="l09300"></a><span class="lineno"> 9300</span> </div><div class="line"><a name="l09301"></a><span class="lineno"> 9301</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a> = <a class="code" href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a>(<span class="stringliteral">"WIN32OLE_VARIANT"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a57c96ead3ef230b4838e65fe037c346e">rb_cObject</a>);</div><div class="line"><a name="l09302"></a><span class="lineno"> 9302</span>  <a class="code" href="../../db/d2e/intern_8h.html#a6c99ed7f070458b961026d43d27d0642">rb_define_alloc_func</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <a class="code" href="../../d2/d99/win32ole_8c.html#a3e39523be2bde7adc51ab796000cdec9">folevariant_s_allocate</a>);</div><div class="line"><a name="l09303"></a><span class="lineno"> 9303</span>  <a class="code" href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <span class="stringliteral">"array"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a5c16d87bf1711b15fc92a2a26773a3ea">folevariant_s_array</a>, 2);</div><div class="line"><a name="l09304"></a><span class="lineno"> 9304</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <span class="stringliteral">"initialize"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a58954f48574ac2b42e8e9d2b96f930aa">folevariant_initialize</a>, -2);</div><div class="line"><a name="l09305"></a><span class="lineno"> 9305</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <span class="stringliteral">"value"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#aadf36ab75f655cbc860c9e88e37db822">folevariant_value</a>, 0);</div><div class="line"><a name="l09306"></a><span class="lineno"> 9306</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <span class="stringliteral">"value="</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a50260416a5f8ae64ee1b630148f19160">folevariant_set_value</a>, 1);</div><div class="line"><a name="l09307"></a><span class="lineno"> 9307</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <span class="stringliteral">"vartype"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a23d7c602c87c1e61b5495de603979936">folevariant_vartype</a>, 0);</div><div class="line"><a name="l09308"></a><span class="lineno"> 9308</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <span class="stringliteral">"[]"</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a52007ffd60bf368cb33f51b4ece83379">folevariant_ary_aref</a>, -1);</div><div class="line"><a name="l09309"></a><span class="lineno"> 9309</span>  <a class="code" href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <span class="stringliteral">"[]="</span>, <a class="code" href="../../d2/d99/win32ole_8c.html#a8bc9e5d97cd25261219ffa5642187da8">folevariant_ary_aset</a>, -1);</div><div class="line"><a name="l09310"></a><span class="lineno"> 9310</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <span class="stringliteral">"Empty"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"new"</span>), 2, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_EMPTY)));</div><div class="line"><a name="l09311"></a><span class="lineno"> 9311</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <span class="stringliteral">"Null"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"new"</span>), 2, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_NULL)));</div><div class="line"><a name="l09312"></a><span class="lineno"> 9312</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <span class="stringliteral">"Nothing"</span>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a>(<a class="code" href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a>, <a class="code" href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a>(<span class="stringliteral">"new"</span>), 2, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a>, <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a>(VT_DISPATCH)));</div><div class="line"><a name="l09313"></a><span class="lineno"> 9313</span> </div><div class="line"><a name="l09314"></a><span class="lineno"> 9314</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a> = <a class="code" href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a>(<span class="stringliteral">"WIN32OLERuntimeError"</span>, <a class="code" href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a>);</div><div class="line"><a name="l09315"></a><span class="lineno"> 9315</span> </div><div class="line"><a name="l09316"></a><span class="lineno"> 9316</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#abfd24c730b491591cb4cbd90bfb104a6">init_enc2cp</a>();</div><div class="line"><a name="l09317"></a><span class="lineno"> 9317</span>  atexit((<span class="keywordtype">void</span> (*)(<span class="keywordtype">void</span>))<a class="code" href="../../d2/d99/win32ole_8c.html#a2f7320fdc7ec16f02bffe3ad3d996024">free_enc2cp</a>);</div><div class="line"><a name="l09318"></a><span class="lineno"> 9318</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#afe5e741ee07fdc09159777facba855b5">ole_init_cp</a>();</div><div class="line"><a name="l09319"></a><span class="lineno"> 9319</span> }</div><div class="ttc" id="win32ole_8c_html_a6830759afb9b256096ce2cfd625762a9"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6830759afb9b256096ce2cfd625762a9">olevariant_free</a></div><div class="ttdeci">static void olevariant_free(struct olevariantdata *pvar)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08637">win32ole.c:8637</a></div></div> <div class="ttc" id="win32ole_8c_html_abf52aec9001101679b74a4117347b4ce"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#abf52aec9001101679b74a4117347b4ce">fole_invoke2</a></div><div class="ttdeci">static VALUE fole_invoke2(VALUE self, VALUE dispid, VALUE args, VALUE types)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03788">win32ole.c:3788</a></div></div> <div class="ttc" id="win32ole_8c_html_a0f560d82cf2e4604437fc3bb7280cec3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a0f560d82cf2e4604437fc3bb7280cec3">foletype_helpfile</a></div><div class="ttdeci">static VALUE foletype_helpfile(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05940">win32ole.c:5940</a></div></div> <div class="ttc" id="win32ole_8c_html_a4709657c93f560e08e25dc95bc54f689"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4709657c93f560e08e25dc95bc54f689">typeinfo_from_ole</a></div><div class="ttdeci">static HRESULT typeinfo_from_ole(struct oledata *pole, ITypeInfo **ppti)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04231">win32ole.c:4231</a></div></div> <div class="ttc" id="intern_8h_html_aa8e250f234a95692386f8cb7e858794d"><div class="ttname"><a href="../../db/d2e/intern_8h.html#aa8e250f234a95692386f8cb7e858794d">rb_apply</a></div><div class="ttdeci">VALUE rb_apply(VALUE, ID, VALUE)</div><div class="ttdoc">Calls a method. </div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d80/vm__eval_8c_source.html#l00744">vm_eval.c:744</a></div></div> <div class="ttc" id="win32ole_8c_html_ac0a9f64129d5836fc8f9b0195ca478ec"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac0a9f64129d5836fc8f9b0195ca478ec">fole_s_set_locale</a></div><div class="ttdeci">static VALUE fole_s_set_locale(VALUE self, VALUE vlcid)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03107">win32ole.c:3107</a></div></div> <div class="ttc" id="win32ole_8c_html_a820b1eeb09d0a8b2c2bac453a22f3805"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a820b1eeb09d0a8b2c2bac453a22f3805">lpInterfaceInfo</a></div><div class="ttdeci">static DWORD HTASK DWORD LPINTERFACEINFO lpInterfaceInfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00633">win32ole.c:633</a></div></div> <div class="ttc" id="proc_8c_html_abc4c96af7623d1ba9cc053d18639621e"><div class="ttname"><a href="../../d3/dda/proc_8c.html#abc4c96af7623d1ba9cc053d18639621e">method_name</a></div><div class="ttdeci">static VALUE method_name(VALUE obj)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/dda/proc_8c_source.html#l01132">proc.c:1132</a></div></div> <div class="ttc" id="win32ole_8c_html_aad76daf1fd7ba9e72d79d2906bb41254"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aad76daf1fd7ba9e72d79d2906bb41254">foletype_minor_version</a></div><div class="ttdeci">static VALUE foletype_minor_version(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05817">win32ole.c:5817</a></div></div> <div class="ttc" id="win32ole_8c_html_a3c3f3d4c55344453eeb66c7c0fbc0aec"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3c3f3d4c55344453eeb66c7c0fbc0aec">lcid_installed</a></div><div class="ttdeci">static BOOL lcid_installed(LCID lcid)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03088">win32ole.c:3088</a></div></div> <div class="ttc" id="win32ole_8c_html_a5411753c688404d6a96cb91c6d44d23c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5411753c688404d6a96cb91c6d44d23c">load_conv_function51932</a></div><div class="ttdeci">#define load_conv_function51932()</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00955">win32ole.c:955</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ac9aadbc1e9c456506a4d7eef5cdc787e"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ac9aadbc1e9c456506a4d7eef5cdc787e">T_SYMBOL</a></div><div class="ttdeci">#define T_SYMBOL</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00502">ruby.h:502</a></div></div> <div class="ttc" id="win32ole_8c_html_a67538b99589f8465d34e18df229b9700"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a67538b99589f8465d34e18df229b9700">foletype_visible</a></div><div class="ttdeci">static VALUE foletype_visible(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05757">win32ole.c:5757</a></div></div> <div class="ttc" id="win32ole_8c_html_aefcc0ccd39ee29ec64e36ff3eece6808"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aefcc0ccd39ee29ec64e36ff3eece6808">com_vtbl</a></div><div class="ttdeci">static IDispatchVtbl com_vtbl</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00234">win32ole.c:234</a></div></div> <div class="ttc" id="win32ole_8c_html_a5d6d21de9fbc08c767655267b2b1140d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5d6d21de9fbc08c767655267b2b1140d">ole_create_dcom</a></div><div class="ttdeci">static VALUE ole_create_dcom(VALUE self, VALUE ole, VALUE host, VALUE others)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02615">win32ole.c:2615</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a42f38632bba2bb73abb03716754f3230"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a42f38632bba2bb73abb03716754f3230">MEMCMP</a></div><div class="ttdeci">#define MEMCMP(p1, p2, type, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01244">ruby.h:1244</a></div></div> <div class="ttc" id="struct___win32_o_l_e_i_dispatch_html_a5103156aae6ce459d1b1a55d32c8233b"><div class="ttname"><a href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a5103156aae6ce459d1b1a55d32c8233b">_Win32OLEIDispatch::dispatch</a></div><div class="ttdeci">IDispatch dispatch</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00697">win32ole.c:697</a></div></div> <div class="ttc" id="array_8c_html_a82b90e872bc91ed8b5ca1ff94b4c6c9d"><div class="ttname"><a href="../../dc/dcc/array_8c.html#a82b90e872bc91ed8b5ca1ff94b4c6c9d">rb_ary_unshift</a></div><div class="ttdeci">VALUE rb_ary_unshift(VALUE ary, VALUE item)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/dcc/array_8c_source.html#l01071">array.c:1071</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aeba7d84cad44c2c53c038db249ca6d37"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aeba7d84cad44c2c53c038db249ca6d37">RUBY_EVENT_THREAD_END</a></div><div class="ttdeci">#define RUBY_EVENT_THREAD_END</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01595">ruby.h:1595</a></div></div> <div class="ttc" id="win32ole_8c_html_ad954f499199716efcb6d3656d6874aea"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad954f499199716efcb6d3656d6874aea">foletypelib_ole_types</a></div><div class="ttdeci">static VALUE foletypelib_ole_types(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05514">win32ole.c:5514</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a39cf94183e6d744167ae5f6a7bde0363"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a39cf94183e6d744167ae5f6a7bde0363">rb_cData</a></div><div class="ttdeci">RUBY_EXTERN VALUE rb_cData</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01433">ruby.h:1433</a></div></div> <div class="ttc" id="win32ole_8c_html_a1f53a6e31877dd97034b00483513dd88"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1f53a6e31877dd97034b00483513dd88">fev_on_event_with_outargs</a></div><div class="ttdeci">static VALUE fev_on_event_with_outargs(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08479">win32ole.c:8479</a></div></div> <div class="ttc" id="win32ole_8c_html_af32eeb4278394bc878b85c8ea4aba1b7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af32eeb4278394bc878b85c8ea4aba1b7">cWIN32OLE_PROPERTY</a></div><div class="ttdeci">VALUE cWIN32OLE_PROPERTY</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00213">win32ole.c:213</a></div></div> <div class="ttc" id="win32ole_8c_html_a4143de391103e02d12818baedff3f685"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4143de391103e02d12818baedff3f685">folemethod_return_type_detail</a></div><div class="ttdeci">static VALUE folemethod_return_type_detail(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06697">win32ole.c:6697</a></div></div> <div class="ttc" id="win32ole_8c_html_af239c482ec64dc4a3ae7f782792b8ee2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af239c482ec64dc4a3ae7f782792b8ee2">ole_variable_ole_type</a></div><div class="ttdeci">static VALUE ole_variable_ole_type(ITypeInfo *pTypeInfo, UINT var_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06241">win32ole.c:6241</a></div></div> <div class="ttc" id="win32ole_8c_html_a3a2f3c03025143ca713045795f4458e5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3a2f3c03025143ca713045795f4458e5">cWIN32OLE_PARAM</a></div><div class="ttdeci">VALUE cWIN32OLE_PARAM</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00208">win32ole.c:208</a></div></div> <div class="ttc" id="win32ole_8c_html_a533965aa8ab8ae4d8f1c07f4bd207628"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a533965aa8ab8ae4d8f1c07f4bd207628">EVENTSINK_Invoke</a></div><div class="ttdeci">STDMETHODIMP EVENTSINK_Invoke(PEVENTSINK pEventSink, DISPID dispid, REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pdispparams, VARIANT *pvarResult, EXCEPINFO *pexcepinfo, UINT *puArgErr)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07811">win32ole.c:7811</a></div></div> <div class="ttc" id="win32ole_8c_html_ad0f95a9f48f7af93146a71963663ec1d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad0f95a9f48f7af93146a71963663ec1d">foletype_impl_ole_types</a></div><div class="ttdeci">static VALUE foletype_impl_ole_types(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06043">win32ole.c:6043</a></div></div> <div class="ttc" id="win32ole_8c_html_ac7520bee4cf7fecac67c8ad2fa6659b8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac7520bee4cf7fecac67c8ad2fa6659b8">ev_on_event</a></div><div class="ttdeci">static VALUE ev_on_event(int argc, VALUE *argv, VALUE self, VALUE is_ary_arg)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08407">win32ole.c:8407</a></div></div> <div class="ttc" id="win32ole_8c_html_a09f78a0da33127d288dcd07efc6692c7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a09f78a0da33127d288dcd07efc6692c7">ole_methods_sub</a></div><div class="ttdeci">static VALUE ole_methods_sub(ITypeInfo *pOwnerTypeInfo, ITypeInfo *pTypeInfo, VALUE methods, int mask)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04164">win32ole.c:4164</a></div></div> <div class="ttc" id="structmy_c_p_i_n_f_o_e_x_html_aaef248f630f4dedd2bac5abe46ee6271"><div class="ttname"><a href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#aaef248f630f4dedd2bac5abe46ee6271">myCPINFOEX::CodePage</a></div><div class="ttdeci">UINT CodePage</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01008">win32ole.c:1008</a></div></div> <div class="ttc" id="win32ole_8c_html_aa667691c99d3a2eca3c54e53df289a9a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa667691c99d3a2eca3c54e53df289a9a">find_default_source</a></div><div class="ttdeci">static HRESULT find_default_source(VALUE ole, IID *piid, ITypeInfo **ppTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08171">win32ole.c:8171</a></div></div> <div class="ttc" id="array_8c_html_ae3c2ac6c88e666d5418855114eb8bcf8"><div class="ttname"><a href="../../dc/dcc/array_8c.html#ae3c2ac6c88e666d5418855114eb8bcf8">rb_ary_entry</a></div><div class="ttdeci">VALUE rb_ary_entry(VALUE ary, long offset)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/dcc/array_8c_source.html#l01088">array.c:1088</a></div></div> <div class="ttc" id="win32ole_8c_html_a2be33b87e96e8ef4c0498e91f76aa3e4"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2be33b87e96e8ef4c0498e91f76aa3e4">ole_method_return_type_detail</a></div><div class="ttdeci">static VALUE ole_method_return_type_detail(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06671">win32ole.c:6671</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a0068ed01a16efbb8740e1b0c295b672e"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a0068ed01a16efbb8740e1b0c295b672e">RARRAY_LEN</a></div><div class="ttdeci">#define RARRAY_LEN(a)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00899">ruby.h:899</a></div></div> <div class="ttc" id="win32ole_8c_html_ab5e5b1edb8c7947faa9e4838b4ac0a8c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab5e5b1edb8c7947faa9e4838b4ac0a8c">ole_invoke2</a></div><div class="ttdeci">static VALUE ole_invoke2(VALUE self, VALUE dispid, VALUE args, VALUE types, USHORT dispkind)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03586">win32ole.c:3586</a></div></div> <div class="ttc" id="win32ole_8c_html_a55b1c52400f549decd28910adf9534b0"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a55b1c52400f549decd28910adf9534b0">foletype_guid</a></div><div class="ttdeci">static VALUE foletype_guid(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05687">win32ole.c:5687</a></div></div> <div class="ttc" id="structoleparamdata_html_ac1731e8b1c06b6758cc773695d0afce2"><div class="ttname"><a href="../../d6/dda/structoleparamdata.html#ac1731e8b1c06b6758cc773695d0afce2">oleparamdata::method_index</a></div><div class="ttdeci">UINT method_index</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00279">win32ole.c:279</a></div></div> <div class="ttc" id="win32ole_8c_html_af41d300448e793508177e5b703c4d0eb"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af41d300448e793508177e5b703c4d0eb">ole_usertype2val</a></div><div class="ttdeci">static VALUE ole_usertype2val(ITypeInfo *pTypeInfo, TYPEDESC *pTypeDesc, VALUE typedetails)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04564">win32ole.c:4564</a></div></div> <div class="ttc" id="nkf_8h_html_aa93f0eb578d23995850d61f7d61c55c1"><div class="ttname"><a href="../../d1/d5c/nkf_8h.html#aa93f0eb578d23995850d61f7d61c55c1">FALSE</a></div><div class="ttdeci">#define FALSE</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d5c/nkf_8h_source.html#l00174">nkf.h:174</a></div></div> <div class="ttc" id="win32ole_8c_html_a48e776cb94d0c16741489a9c9450a398"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a48e776cb94d0c16741489a9c9450a398">folemethod_dispid</a></div><div class="ttdeci">static VALUE folemethod_dispid(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07059">win32ole.c:7059</a></div></div> <div class="ttc" id="win32ole_8c_html_a450345b808e7fd3597b3bebe5340ea59"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a450345b808e7fd3597b3bebe5340ea59">ole_show_help</a></div><div class="ttdeci">static HWND ole_show_help(VALUE helpfile, VALUE helpcontext)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02944">win32ole.c:2944</a></div></div> <div class="ttc" id="win32ole_8c_html_ac3ae981871b66fdb4efa0a05ad712256"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac3ae981871b66fdb4efa0a05ad712256">foletype_s_allocate</a></div><div class="ttdeci">static VALUE foletype_s_allocate(VALUE klass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04875">win32ole.c:4875</a></div></div> <div class="ttc" id="win32ole_8c_html_aa5b58331878760e9f4974a618fa4f35b"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa5b58331878760e9f4974a618fa4f35b">g_lcid_to_check</a></div><div class="ttdeci">static char g_lcid_to_check[8+1]</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00239">win32ole.c:239</a></div></div> <div class="ttc" id="strchr_8c_html_a219836f542ce53545052bed5353820ca"><div class="ttname"><a href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a></div><div class="ttdeci">size_t strlen(const char *)</div></div> <div class="ttc" id="ruby_2ruby_8h_html_a7bce65407b21f6812267e8d5426201f0"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a7bce65407b21f6812267e8d5426201f0">INT2NUM</a></div><div class="ttdeci">#define INT2NUM(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01178">ruby.h:1178</a></div></div> <div class="ttc" id="win32ole_8c_html_a03d0ad12a5dfd5fe6dfb820a2fcf4ca7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a03d0ad12a5dfd5fe6dfb820a2fcf4ca7">fev_unadvise</a></div><div class="ttdeci">static VALUE fev_unadvise(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08539">win32ole.c:8539</a></div></div> <div class="ttc" id="win32ole_8c_html_af36a9f22dfbb15239480f833541fb2d6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af36a9f22dfbb15239480f833541fb2d6">folemethod_size_opt_params</a></div><div class="ttdeci">static VALUE folemethod_size_opt_params(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07153">win32ole.c:7153</a></div></div> <div class="ttc" id="win32ole_8c_html_acb559820d9ca11295b4500f179ef6392"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a></div><div class="ttdeci">int i</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00784">win32ole.c:784</a></div></div> <div class="ttc" id="win32ole_8c_html_af7bc1b360651a48a8b08d6baaee78905"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af7bc1b360651a48a8b08d6baaee78905">foleparam_input</a></div><div class="ttdeci">static VALUE foleparam_input(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07418">win32ole.c:7418</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a523855de5546c34061e030f4606db3e9"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a523855de5546c34061e030f4606db3e9">T_FIXNUM</a></div><div class="ttdeci">#define T_FIXNUM</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00497">ruby.h:497</a></div></div> <div class="ttc" id="structst__table_html"><div class="ttname"><a href="../../d0/ddd/structst__table.html">st_table</a></div><div class="ttdef"><b>Definition:</b> <a href="../../dd/d24/st_8h_source.html#l00077">st.h:77</a></div></div> <div class="ttc" id="win32ole_8c_html_a038616b5c7a8bb7d26e06c5b16a0a643"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a038616b5c7a8bb7d26e06c5b16a0a643">evs_entry</a></div><div class="ttdeci">static VALUE evs_entry(long i)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08567">win32ole.c:8567</a></div></div> <div class="ttc" id="intern_8h_html_ad7cf2d103c6ce7d9b82c0076effac263"><div class="ttname"><a href="../../db/d2e/intern_8h.html#ad7cf2d103c6ce7d9b82c0076effac263">rb_String</a></div><div class="ttdeci">VALUE rb_String(VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/de1/object_8c_source.html#l02791">object.c:2791</a></div></div> <div class="ttc" id="win32ole_8c_html_a60f46a0254e9350ddf3ae68009748eb8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a60f46a0254e9350ddf3ae68009748eb8">fole_setproperty_with_bracket</a></div><div class="ttdeci">static VALUE fole_setproperty_with_bracket(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03848">win32ole.c:3848</a></div></div> <div class="ttc" id="win32ole_8c_html_a2c2cafa30f8f59de53e58a6c03b0eff1"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2c2cafa30f8f59de53e58a6c03b0eff1">clsid_from_remote</a></div><div class="ttdeci">static HRESULT clsid_from_remote(VALUE host, VALUE com, CLSID *pclsid)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02577">win32ole.c:2577</a></div></div> <div class="ttc" id="tcltklib_8c_html_aec7b96885baf2e6f10efbdef9d935a0b"><div class="ttname"><a href="../../d5/d9d/tcltklib_8c.html#aec7b96885baf2e6f10efbdef9d935a0b">minor</a></div><div class="ttdeci">int minor</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d9d/tcltklib_8c_source.html#l00110">tcltklib.c:110</a></div></div> <div class="ttc" id="win32ole_8c_html_a197b9a7e0b15c57cddf36d7950572b1a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a197b9a7e0b15c57cddf36d7950572b1a">fole_s_ole_uninitialize</a></div><div class="ttdeci">static VALUE fole_s_ole_uninitialize(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03166">win32ole.c:3166</a></div></div> <div class="ttc" id="group__embed_html_ga5efbdb123063db473a9b82d8250c0b96"><div class="ttname"><a href="../../de/d43/group__embed.html#ga5efbdb123063db473a9b82d8250c0b96">ruby_finalize</a></div><div class="ttdeci">void ruby_finalize(void)</div><div class="ttdoc">Runs the VM finalization processes. </div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d57/eval_8c_source.html#l00138">eval.c:138</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a877c38180d23c5447d976c70dda89d69"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a877c38180d23c5447d976c70dda89d69">NUM2INT</a></div><div class="ttdeci">#define NUM2INT(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00622">ruby.h:622</a></div></div> <div class="ttc" id="encoding_8c_html_ad43c3812e6d13e0518d9f8b8f463ffcf"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#ad43c3812e6d13e0518d9f8b8f463ffcf">count</a></div><div class="ttdeci">int count</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l00051">encoding.c:51</a></div></div> <div class="ttc" id="win32ole_8c_html_a4d150110b1820ce46e1164b14094cfe9"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4d150110b1820ce46e1164b14094cfe9">threadIDCaller</a></div><div class="ttdeci">static DWORD HTASK threadIDCaller</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00628">win32ole.c:628</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a72d845303f20fad5c5ef29c339d3c7f6"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a72d845303f20fad5c5ef29c339d3c7f6">NUM2UINT</a></div><div class="ttdeci">#define NUM2UINT(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00623">ruby.h:623</a></div></div> <div class="ttc" id="win32ole_8c_html_aff402c8fcf8df12ad99c93c4ba96abd4"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aff402c8fcf8df12ad99c93c4ba96abd4">foletypelib_minor_version</a></div><div class="ttdeci">static VALUE foletypelib_minor_version(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05346">win32ole.c:5346</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ad043eb0996705571cad2e5bb39e9675e"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ad043eb0996705571cad2e5bb39e9675e">Data_Get_Struct</a></div><div class="ttdeci">#define Data_Get_Struct(obj, type, sval)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01025">ruby.h:1025</a></div></div> <div class="ttc" id="group__defmethod_html_gaacfe6a2ec444bdc7f573afb75ea251fe"><div class="ttname"><a href="../../d7/d19/group__defmethod.html#gaacfe6a2ec444bdc7f573afb75ea251fe">rb_define_singleton_method</a></div><div class="ttdeci">void rb_define_singleton_method(VALUE obj, const char *name, VALUE(*func)(ANYARGS), int argc)</div><div class="ttdoc">Defines a singleton method for obj. </div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d0c/class_8c_source.html#l01497">class.c:1497</a></div></div> <div class="ttc" id="win32ole_8c_html_abd8eee90347509b486bdfcb4c7724f2c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#abd8eee90347509b486bdfcb4c7724f2c">EVENTSINK_Constructor</a></div><div class="ttdeci">PIEVENTSINKOBJ EVENTSINK_Constructor()</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07916">win32ole.c:7916</a></div></div> <div class="ttc" id="win32ole_8c_html_a1dd26cbc4aafb084763c87e1585eddad"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1dd26cbc4aafb084763c87e1585eddad">EVENTSINK_AddRef</a></div><div class="ttdeci">EVENTSINK_AddRef(PEVENTSINK pEV)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07601">win32ole.c:7601</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a5a54e4921ce5d7fc253339e79eb6f0b7"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a5a54e4921ce5d7fc253339e79eb6f0b7">FIXNUM_FLAG</a></div><div class="ttdeci">#define FIXNUM_FLAG</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00438">ruby.h:438</a></div></div> <div class="ttc" id="win32ole_8c_html_a5f4caca75a1ca7971310c4f7909bda33"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5f4caca75a1ca7971310c4f7909bda33">ev_advise</a></div><div class="ttdeci">static VALUE ev_advise(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08280">win32ole.c:8280</a></div></div> <div class="ttc" id="win32ole_8c_html_aea975e81d1fe3056985636f1fa72e8b9"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aea975e81d1fe3056985636f1fa72e8b9">fole_setproperty2</a></div><div class="ttdeci">static VALUE fole_setproperty2(VALUE self, VALUE dispid, VALUE args, VALUE types)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03824">win32ole.c:3824</a></div></div> <div class="ttc" id="win32ole_8c_html_ae54179477459ef72c2885549ff5e40e6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae54179477459ef72c2885549ff5e40e6">folemethod_event_interface</a></div><div class="ttdeci">static VALUE folemethod_event_interface(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06908">win32ole.c:6908</a></div></div> <div class="ttc" id="win32ole_8c_html_ab70ec6922b3edc7f24e281108abf3a62"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab70ec6922b3edc7f24e281108abf3a62">ole_search_event_at</a></div><div class="ttdeci">static long ole_search_event_at(VALUE ary, VALUE ev)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07655">win32ole.c:7655</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html">ruby.h</a></div></div> <div class="ttc" id="win32ole_8c_html_a06ff7e4ccaaa9768e4f0354616191089"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a06ff7e4ccaaa9768e4f0354616191089">EVENTSINK_QueryInterface</a></div><div class="ttdeci">STDMETHODIMP EVENTSINK_QueryInterface(PEVENTSINK pEV, REFIID iid, LPVOID *ppv)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07582">win32ole.c:7582</a></div></div> <div class="ttc" id="win32ole_8c_html_a3cd351272efa990ad547562acc560dbb"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3cd351272efa990ad547562acc560dbb">ole_val2olevariantdata</a></div><div class="ttdeci">static void ole_val2olevariantdata(VALUE val, VARTYPE vt, struct olevariantdata *pvar)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01885">win32ole.c:1885</a></div></div> <div class="ttc" id="win32ole_8c_html_a3a0a28ba6e22644006c9bafb793f8a2c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3a0a28ba6e22644006c9bafb793f8a2c">va_init_list</a></div><div class="ttdeci">#define va_init_list(a, b)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00049">win32ole.c:49</a></div></div> <div class="ttc" id="win32ole_8c_html_a4ddfcdbb09e0396eab8089feb9923abd"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4ddfcdbb09e0396eab8089feb9923abd">oletype_set_member</a></div><div class="ttdeci">static VALUE oletype_set_member(VALUE self, ITypeInfo *pTypeInfo, VALUE name)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04886">win32ole.c:4886</a></div></div> <div class="ttc" id="win32ole_8c_html_a2ea06a0d884fd9971f1540791dadb03a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2ea06a0d884fd9971f1540791dadb03a">foletype_default_event_sources</a></div><div class="ttdeci">static VALUE foletype_default_event_sources(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06078">win32ole.c:6078</a></div></div> <div class="ttc" id="win32ole_8c_html_a8517a117cf55ece0f972c1c4bbe11d55"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a8517a117cf55ece0f972c1c4bbe11d55">ole_search_event</a></div><div class="ttdeci">static VALUE ole_search_event(VALUE ary, VALUE ev, BOOL *is_default)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07680">win32ole.c:7680</a></div></div> <div class="ttc" id="win32ole_8c_html_aa75ee71798a27c50db9f316e59e77b27"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa75ee71798a27c50db9f316e59e77b27">ole_methods</a></div><div class="ttdeci">static VALUE ole_methods(VALUE self, int mask)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04272">win32ole.c:4272</a></div></div> <div class="ttc" id="win32ole_8c_html_a1bc1f046c48db0bdb1d581731ddfd2f8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1bc1f046c48db0bdb1d581731ddfd2f8">ole_method_params</a></div><div class="ttdeci">static VALUE ole_method_params(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07161">win32ole.c:7161</a></div></div> <div class="ttc" id="win32ole_8c_html_abf4b402520e638d50441106e09fc2292"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#abf4b402520e638d50441106e09fc2292">EVENTSINK_GetIDsOfNames</a></div><div class="ttdeci">STDMETHODIMP EVENTSINK_GetIDsOfNames(PEVENTSINK pEventSink, REFIID riid, OLECHAR **szNames, UINT cNames, LCID lcid, DISPID *pDispID)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07637">win32ole.c:7637</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a6cdc7dfe8f84777325da08a96ae5f795"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a6cdc7dfe8f84777325da08a96ae5f795">T_MODULE</a></div><div class="ttdeci">#define T_MODULE</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00488">ruby.h:488</a></div></div> <div class="ttc" id="win32ole_8c_html_a0b0eacb7bacb31262f8dfc3c7f283a44"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a0b0eacb7bacb31262f8dfc3c7f283a44">hash2ptr_dispparams</a></div><div class="ttdeci">static void hash2ptr_dispparams(VALUE hash, ITypeInfo *pTypeInfo, DISPID dispid, DISPPARAMS *pdispparams)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07732">win32ole.c:7732</a></div></div> <div class="ttc" id="intern_8h_html_a4e3e3ccf959b5db6c125a68e1e1db0a3"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a4e3e3ccf959b5db6c125a68e1e1db0a3">rb_str_cat</a></div><div class="ttdeci">VALUE rb_str_cat(VALUE, const char *, long)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l01967">string.c:1967</a></div></div> <div class="ttc" id="array_8c_html_a6927d315ff356d40af4f430201dcdbf5"><div class="ttname"><a href="../../dc/dcc/array_8c.html#a6927d315ff356d40af4f430201dcdbf5">rb_ary_delete_at</a></div><div class="ttdeci">VALUE rb_ary_delete_at(VALUE ary, long pos)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/dcc/array_8c_source.html#l02801">array.c:2801</a></div></div> <div class="ttc" id="win32ole_8c_html_a824cc3f3a7bf2ea1137ab0b9f46ff10d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a824cc3f3a7bf2ea1137ab0b9f46ff10d">rgszNames</a></div><div class="ttdeci">static REFIID LPOLESTR __RPC_FAR * rgszNames</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00305">win32ole.c:305</a></div></div> <div class="ttc" id="win32ole_8c_html_a14f4f8b53e3617452f73d78095f02a45"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a14f4f8b53e3617452f73d78095f02a45">reg_get_typelib_file_path</a></div><div class="ttdeci">static VALUE reg_get_typelib_file_path(HKEY hkey)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02402">win32ole.c:2402</a></div></div> <div class="ttc" id="win32ole_8c_html_a5e253cdeb9cfec5844f163f53f08e3d2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5e253cdeb9cfec5844f163f53f08e3d2">evs_delete</a></div><div class="ttdeci">static VALUE evs_delete(long i)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08560">win32ole.c:8560</a></div></div> <div class="ttc" id="win32ole_8c_html_a6df154c28f729fc7a4fd0f817798fac3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6df154c28f729fc7a4fd0f817798fac3">ole_param_ole_type_detail</a></div><div class="ttdeci">static VALUE ole_param_ole_type_detail(ITypeInfo *pTypeInfo, UINT method_index, UINT index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07360">win32ole.c:7360</a></div></div> <div class="ttc" id="win32ole_8c_html_af263844f08ace69c092c8ab5a0839892"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af263844f08ace69c092c8ab5a0839892">foleparam_output</a></div><div class="ttdeci">static VALUE foleparam_output(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07445">win32ole.c:7445</a></div></div> <div class="ttc" id="win32ole_8c_html_a910f5dc71d76d1c8d51e6c0f5010c6e9"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a910f5dc71d76d1c8d51e6c0f5010c6e9">g_ole_initialized_key</a></div><div class="ttdeci">static volatile DWORD g_ole_initialized_key</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00222">win32ole.c:222</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aacea3516b33941ce8149098e223a7466"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aacea3516b33941ce8149098e223a7466">Qtrue</a></div><div class="ttdeci">#define Qtrue</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00434">ruby.h:434</a></div></div> <div class="ttc" id="st_8h_html_acdc42c01229b7537ea5a4c6965c7e47a"><div class="ttname"><a href="../../dd/d24/st_8h.html#acdc42c01229b7537ea5a4c6965c7e47a">st_insert</a></div><div class="ttdeci">int st_insert(st_table *, st_data_t, st_data_t)</div></div> <div class="ttc" id="win32ole_8c_html_a6a99140a5476f0da87c2c9aba0752f0f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6a99140a5476f0da87c2c9aba0752f0f">fole_func_methods</a></div><div class="ttdeci">static VALUE fole_func_methods(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04351">win32ole.c:4351</a></div></div> <div class="ttc" id="win32ole_8c_html_ac8532c3a9901cdf3f13325021a01fd0f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac8532c3a9901cdf3f13325021a01fd0f">UI8_2_NUM</a></div><div class="ttdeci">#define UI8_2_NUM</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00139">win32ole.c:139</a></div></div> <div class="ttc" id="structolevariantdata_html_a164ea1d20db697533e5a88877cfe3635"><div class="ttname"><a href="../../dd/dd6/structolevariantdata.html#a164ea1d20db697533e5a88877cfe3635">olevariantdata::realvar</a></div><div class="ttdeci">VARIANT realvar</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00295">win32ole.c:295</a></div></div> <div class="ttc" id="win32ole_8c_html_ae76f2a9479b736b6d2068f1176ebafb5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae76f2a9479b736b6d2068f1176ebafb5">cWIN32OLE_lcid</a></div><div class="ttdeci">static LCID cWIN32OLE_lcid</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00236">win32ole.c:236</a></div></div> <div class="ttc" id="win32ole_8c_html_af70e34bc5bf782d9c0fe541e851a7594"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af70e34bc5bf782d9c0fe541e851a7594">g_ole_initialized_set</a></div><div class="ttdeci">#define g_ole_initialized_set(val)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00225">win32ole.c:225</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a5cc507d59bd5812216cff9aa85238e5a"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a5cc507d59bd5812216cff9aa85238e5a">rb_float_new</a></div><div class="ttdeci">static VALUE rb_float_new(double d)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00790">ruby.h:790</a></div></div> <div class="ttc" id="win32ole_8c_html_ae833f13bbe5720ef229048b72cf34712"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae833f13bbe5720ef229048b72cf34712">dwTickCount</a></div><div class="ttdeci">static DWORD HTASK DWORD dwTickCount</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00628">win32ole.c:628</a></div></div> <div class="ttc" id="win32ole_8c_html_a1aa2ee3a59a0ec370676af5858be7215"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1aa2ee3a59a0ec370676af5858be7215">ole_type_helpfile</a></div><div class="ttdeci">static VALUE ole_type_helpfile(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05919">win32ole.c:5919</a></div></div> <div class="ttc" id="win32ole_8c_html_a27e8edc4bd92903a3f61d6d6582646f8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a27e8edc4bd92903a3f61d6d6582646f8">ary_new_dim</a></div><div class="ttdeci">static VALUE ary_new_dim(VALUE myary, long *pid, long *plb, long dim)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02042">win32ole.c:2042</a></div></div> <div class="ttc" id="win32ole_8c_html_aab8c56df7fcad310b56c1785e2beae95"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aab8c56df7fcad310b56c1785e2beae95">fev_on_event</a></div><div class="ttdeci">static VALUE fev_on_event(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08459">win32ole.c:8459</a></div></div> <div class="ttc" id="win32ole_8c_html_af2f972ca981683bd7a3e06d766776420"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af2f972ca981683bd7a3e06d766776420">folevariable_varkind</a></div><div class="ttdeci">static VALUE folevariable_varkind(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06495">win32ole.c:6495</a></div></div> <div class="ttc" id="structolemethoddata_html_ab1e9b182df4a49cc70db8cdc5d4c597f"><div class="ttname"><a href="../../d4/df4/structolemethoddata.html#ab1e9b182df4a49cc70db8cdc5d4c597f">olemethoddata::pTypeInfo</a></div><div class="ttdeci">ITypeInfo * pTypeInfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00268">win32ole.c:268</a></div></div> <div class="ttc" id="nkf-utf8_2nkf_8c_html_a64ae40793ade89d800a8c5646d2980fc"><div class="ttname"><a href="../../d6/da0/nkf-utf8_2nkf_8c.html#a64ae40793ade89d800a8c5646d2980fc">id</a></div><div class="ttdeci">const int id</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/da0/nkf-utf8_2nkf_8c_source.html#l00209">nkf.c:209</a></div></div> <div class="ttc" id="win32ole_8c_html_ad803f359899ef12dbf857d073769046a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad803f359899ef12dbf857d073769046a">cWIN32OLE</a></div><div class="ttdeci">VALUE cWIN32OLE</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00203">win32ole.c:203</a></div></div> <div class="ttc" id="structoleeventdata_html_a6a6acfb04132992781ab9d405530e9f8"><div class="ttname"><a href="../../d1/d5d/structoleeventdata.html#a6a6acfb04132992781ab9d405530e9f8">oleeventdata::event_id</a></div><div class="ttdeci">long event_id</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00286">win32ole.c:286</a></div></div> <div class="ttc" id="win32ole_8c_html_a865684be9919637fc636e618fcfc34c0"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a865684be9919637fc636e618fcfc34c0">foletype_inspect</a></div><div class="ttdeci">static VALUE foletype_inspect(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06113">win32ole.c:6113</a></div></div> <div class="ttc" id="win32ole_8c_html_a9d0df8e77429f5995e6055b880f1d9f0"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9d0df8e77429f5995e6055b880f1d9f0">reg_enum_key</a></div><div class="ttdeci">static VALUE reg_enum_key(HKEY hkey, DWORD i)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02342">win32ole.c:2342</a></div></div> <div class="ttc" id="win32ole_8c_html_ad1b2c6199f208bd8beef590eeb7e85f0"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad1b2c6199f208bd8beef590eeb7e85f0">cNames</a></div><div class="ttdeci">static REFIID LPOLESTR __RPC_FAR UINT cNames</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00305">win32ole.c:305</a></div></div> <div class="ttc" id="win32_8h_html_ac99ec3f1036620727a68aa8c25a8963c"><div class="ttname"><a href="../../dc/db1/win32_8h.html#ac99ec3f1036620727a68aa8c25a8963c">strcasecmp</a></div><div class="ttdeci">#define strcasecmp</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/db1/win32_8h_source.html#l00200">win32.h:200</a></div></div> <div class="ttc" id="win32ole_8c_html_a51487ccbc2afad1399d12fcf846949a7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a51487ccbc2afad1399d12fcf846949a7">ole_method_invoke_kind</a></div><div class="ttdeci">static VALUE ole_method_invoke_kind(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06719">win32ole.c:6719</a></div></div> <div class="ttc" id="win32ole_8c_html_a2f6cbb8271a4baf118c86dd9b7448c9e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2f6cbb8271a4baf118c86dd9b7448c9e">typelib_file_from_typelib</a></div><div class="ttdeci">static VALUE typelib_file_from_typelib(VALUE ole)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02446">win32ole.c:2446</a></div></div> <div class="ttc" id="win32ole_8c_html_a900802f6db162dab47ccf45555a9905d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a900802f6db162dab47ccf45555a9905d">foletype_s_progids</a></div><div class="ttdeci">static VALUE foletype_s_progids(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04844">win32ole.c:4844</a></div></div> <div class="ttc" id="win32ole_8c_html_ad582d6c36e9f765b19478484e6ea3643"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad582d6c36e9f765b19478484e6ea3643">vtEventSink</a></div><div class="ttdeci">static IEventSinkVtbl vtEventSink</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07576">win32ole.c:7576</a></div></div> <div class="ttc" id="win32ole_8c_html_a17402178059917f6dd6803ee73df6426"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a17402178059917f6dd6803ee73df6426">foletype_helpcontext</a></div><div class="ttdeci">static VALUE foletype_helpcontext(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05968">win32ole.c:5968</a></div></div> <div class="ttc" id="error_8c_html_a565ed9d70f4089e1b4a36e9b3381b8c6"><div class="ttname"><a href="../../db/dcc/error_8c.html#a565ed9d70f4089e1b4a36e9b3381b8c6">rb_eTypeError</a></div><div class="ttdeci">VALUE rb_eTypeError</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00516">error.c:516</a></div></div> <div class="ttc" id="win32ole_8c_html_a19f090a02e7c5b155208ba5b16572ce9"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a19f090a02e7c5b155208ba5b16572ce9">dwCallType</a></div><div class="ttdeci">static DWORD dwCallType</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00628">win32ole.c:628</a></div></div> <div class="ttc" id="win32ole_8c_html_a1c39e066aeecfd08aada95a49e3e48f4"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1c39e066aeecfd08aada95a49e3e48f4">fole_free</a></div><div class="ttdeci">static VALUE fole_free(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03961">win32ole.c:3961</a></div></div> <div class="ttc" id="win32ole_8c_html_a047992a0ec88c62f680c1d484e33d5c5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a047992a0ec88c62f680c1d484e33d5c5">cWIN32OLE_enc</a></div><div class="ttdeci">static rb_encoding * cWIN32OLE_enc</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00237">win32ole.c:237</a></div></div> <div class="ttc" id="win32ole_8c_html_a2b08fbcbd4d0817540a1552bea9cd501"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2b08fbcbd4d0817540a1552bea9cd501">cWIN32OLE_cp</a></div><div class="ttdeci">static UINT cWIN32OLE_cp</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00235">win32ole.c:235</a></div></div> <div class="ttc" id="encoding_8c_html_a62b808940b1049f1af6233cbbb828bd6"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#a62b808940b1049f1af6233cbbb828bd6">rb_default_internal_encoding</a></div><div class="ttdeci">rb_encoding * rb_default_internal_encoding(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l01371">encoding.c:1371</a></div></div> <div class="ttc" id="win32ole_8c_html_a6e0113d66cb81a8bd0fb0a2766e3ce2f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6e0113d66cb81a8bd0fb0a2766e3ce2f">NUM2I8</a></div><div class="ttdeci">#define NUM2I8</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00140">win32ole.c:140</a></div></div> <div class="ttc" id="win32ole_8c_html_a3793b5d66c90dc1df5ebfb9f070d917e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3793b5d66c90dc1df5ebfb9f070d917e">installed_lcid_proc</a></div><div class="ttdeci">static BOOL CALLBACK installed_lcid_proc(LPTSTR str)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03078">win32ole.c:3078</a></div></div> <div class="ttc" id="array_8c_html_a59d553a8cd781364b8bcb0deae25cca2"><div class="ttname"><a href="../../dc/dcc/array_8c.html#a59d553a8cd781364b8bcb0deae25cca2">rb_ary_push</a></div><div class="ttdeci">VALUE rb_ary_push(VALUE ary, VALUE item)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/dcc/array_8c_source.html#l00822">array.c:822</a></div></div> <div class="ttc" id="win32ole_8c_html_a06b2abe1d4bcdc1f68258fff57e08f68"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a06b2abe1d4bcdc1f68258fff57e08f68">ole_typelib_from_itypeinfo</a></div><div class="ttdeci">static VALUE ole_typelib_from_itypeinfo(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04413">win32ole.c:4413</a></div></div> <div class="ttc" id="win32ole_8c_html_afbdc037edc37f16c9ab3e62d5c25f65f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afbdc037edc37f16c9ab3e62d5c25f65f">make_inspect</a></div><div class="ttdeci">static VALUE make_inspect(const char *class_name, VALUE detail)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01990">win32ole.c:1990</a></div></div> <div class="ttc" id="win32ole_8c_html_abfd24c730b491591cb4cbd90bfb104a6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#abfd24c730b491591cb4cbd90bfb104a6">init_enc2cp</a></div><div class="ttdeci">static void init_enc2cp(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l09065">win32ole.c:9065</a></div></div> <div class="ttc" id="win32ole_8c_html_a4106a72cfb400847e5a60da385996a25"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4106a72cfb400847e5a60da385996a25">ole_variant2val</a></div><div class="ttdeci">static VALUE ole_variant2val(VARIANT *pvar)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02075">win32ole.c:2075</a></div></div> <div class="ttc" id="win32ole_8c_html_a190323bc253935196667f23146769fb3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a190323bc253935196667f23146769fb3">fole_type</a></div><div class="ttdeci">static VALUE fole_type(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04390">win32ole.c:4390</a></div></div> <div class="ttc" id="st_8h_html_acb004847ef312373d65bfb0d1a21c5b3"><div class="ttname"><a href="../../dd/d24/st_8h.html#acb004847ef312373d65bfb0d1a21c5b3">st_free_table</a></div><div class="ttdeci">void st_free_table(st_table *)</div><div class="ttdef"><b>Definition:</b> <a href="../../d4/d71/st_8c_source.html#l00334">st.c:334</a></div></div> <div class="ttc" id="intern_8h_html_a2f12f7ad949fa2e6abb64f2311c6e2c5"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a2f12f7ad949fa2e6abb64f2311c6e2c5">rb_str_concat</a></div><div class="ttdeci">VALUE rb_str_concat(VALUE, VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l02166">string.c:2166</a></div></div> <div class="ttc" id="structtag_i_e_v_e_n_t_s_i_n_k_o_b_j_html_a43db5d87802de4430819746d16b67d0a"><div class="ttname"><a href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a43db5d87802de4430819746d16b67d0a">tagIEVENTSINKOBJ::lpVtbl</a></div><div class="ttdeci">IEventSinkVtbl * lpVtbl</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00196">win32ole.c:196</a></div></div> <div class="ttc" id="win32ole_8c_html_a714a0793c185ef6579d1db4f41c7dc2a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a714a0793c185ef6579d1db4f41c7dc2a">ole_const_load</a></div><div class="ttdeci">static void ole_const_load(ITypeLib *pTypeLib, VALUE klass, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02514">win32ole.c:2514</a></div></div> <div class="ttc" id="win32ole_8c_html_a58954f48574ac2b42e8e9d2b96f930aa"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a58954f48574ac2b42e8e9d2b96f930aa">folevariant_initialize</a></div><div class="ttdeci">static VALUE folevariant_initialize(VALUE self, VALUE args)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08741">win32ole.c:8741</a></div></div> <div class="ttc" id="win32ole_8c_html_ad39844f2dafaf44c62d2e05644ebae7f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad39844f2dafaf44c62d2e05644ebae7f">val2dispatch</a></div><div class="ttdeci">static IDispatch * val2dispatch(VALUE val)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00804">win32ole.c:804</a></div></div> <div class="ttc" id="win32ole_8c_html_ad7e303f0dec303ecdef04cc6d828eb7c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad7e303f0dec303ecdef04cc6d828eb7c">ole_mb2wc</a></div><div class="ttdeci">static LPWSTR ole_mb2wc(char *pm, int len)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01356">win32ole.c:1356</a></div></div> <div class="ttc" id="win32ole_8c_html_a4bf6dbe617bdbaa7cb3af5b84d8b89da"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4bf6dbe617bdbaa7cb3af5b84d8b89da">ole_param_flag_mask</a></div><div class="ttdeci">static VALUE ole_param_flag_mask(ITypeInfo *pTypeInfo, UINT method_index, UINT index, USHORT mask)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07394">win32ole.c:7394</a></div></div> <div class="ttc" id="win32ole_8c_html_aae0f4a590a5c1279929e891188052399"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aae0f4a590a5c1279929e891188052399">olevariable_free</a></div><div class="ttdeci">static void olevariable_free(struct olevariabledata *polevar)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01288">win32ole.c:1288</a></div></div> <div class="ttc" id="win32ole_8c_html_aa3bce24e6382845f469fcfa09a8eb36c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa3bce24e6382845f469fcfa09a8eb36c">IEVENTSINKOBJ</a></div><div class="ttdeci">struct tagIEVENTSINKOBJ IEVENTSINKOBJ</div></div> <div class="ttc" id="win32ole_8c_html_af66ca3fc604e4bfb7cfc7c5513826c25"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af66ca3fc604e4bfb7cfc7c5513826c25">ole_method_offset_vtbl</a></div><div class="ttdeci">static VALUE ole_method_offset_vtbl(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07067">win32ole.c:7067</a></div></div> <div class="ttc" id="win32ole_8c_html_a81b81a3a3c4a8c09c871e89792faa0fe"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a81b81a3a3c4a8c09c871e89792faa0fe">Win32OLEIDispatch</a></div><div class="ttdeci">struct _Win32OLEIDispatch Win32OLEIDispatch</div></div> <div class="ttc" id="ruby_2ruby_8h_html_a6a973fe624aa9aa9ba0cdeb6792d3187"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a6a973fe624aa9aa9ba0cdeb6792d3187">rb_funcall</a></div><div class="ttdeci">VALUE rb_funcall(VALUE, ID, int,...)</div><div class="ttdoc">Calls a method. </div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d80/vm__eval_8c_source.html#l00773">vm_eval.c:773</a></div></div> <div class="ttc" id="eval_8c_html_a6aa7fb1169ed41978a16375b6f921b0e"><div class="ttname"><a href="../../d3/d57/eval_8c.html#a6aa7fb1169ed41978a16375b6f921b0e">rb_protect</a></div><div class="ttdeci">VALUE rb_protect(VALUE(*proc)(VALUE), VALUE data, int *state)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d57/eval_8c_source.html#l00771">eval.c:771</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ad5a1e03b0a66824f95f6aaf07b4a4052"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ad5a1e03b0a66824f95f6aaf07b4a4052">Check_Type</a></div><div class="ttdeci">#define Check_Type(v, t)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00539">ruby.h:539</a></div></div> <div class="ttc" id="error_8c_html_a0f771a2840561f1838169b3d7d4616f3"><div class="ttname"><a href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a></div><div class="ttdeci">void rb_raise(VALUE exc, const char *fmt,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l01788">error.c:1788</a></div></div> <div class="ttc" id="win32ole_8c_html_a6f9ef6641c628823181498337f6d8db5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6f9ef6641c628823181498337f6d8db5">folemethod_helpfile</a></div><div class="ttdeci">static VALUE folemethod_helpfile(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06998">win32ole.c:6998</a></div></div> <div class="ttc" id="win32ole_8c_html_a5079f1cd6dbfb8ce2b112d4f4de56970"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5079f1cd6dbfb8ce2b112d4f4de56970">foleparam_inspect</a></div><div class="ttdeci">static VALUE foleparam_inspect(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07559">win32ole.c:7559</a></div></div> <div class="ttc" id="intern_8h_html_a35a10b958666c1b330238eea7b7f3a8a"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a35a10b958666c1b330238eea7b7f3a8a">rb_ivar_get</a></div><div class="ttdeci">VALUE rb_ivar_get(VALUE, ID)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/d2a/variable_8c_source.html#l01116">variable.c:1116</a></div></div> <div class="ttc" id="win32ole_8c_html_a732ceb5b7f7a3b8bb7200da916011cd0"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a732ceb5b7f7a3b8bb7200da916011cd0">EVENTSINK_Destructor</a></div><div class="ttdeci">void EVENTSINK_Destructor(PIEVENTSINKOBJ)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07938">win32ole.c:7938</a></div></div> <div class="ttc" id="win32ole_8c_html_afd407d8a5a6f061bb64f6797f4718975"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afd407d8a5a6f061bb64f6797f4718975">V_UINTREF</a></div><div class="ttdeci">#define V_UINTREF(X)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00097">win32ole.c:97</a></div></div> <div class="ttc" id="win32ole_8c_html_a5e173ea2107da10dde0bf63b92f32ec2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5e173ea2107da10dde0bf63b92f32ec2">ole_method_dispid</a></div><div class="ttdeci">static VALUE ole_method_dispid(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07036">win32ole.c:7036</a></div></div> <div class="ttc" id="array_8c_html_aaf8c74d0eef61073fadf2c631fa9540f"><div class="ttname"><a href="../../dc/dcc/array_8c.html#aaf8c74d0eef61073fadf2c631fa9540f">rb_ary_clear</a></div><div class="ttdeci">VALUE rb_ary_clear(VALUE ary)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/dcc/array_8c_source.html#l03208">array.c:3208</a></div></div> <div class="ttc" id="win32ole_8c_html_a7172b0aee359977f81f71251db26edc5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7172b0aee359977f81f71251db26edc5">fole_methods</a></div><div class="ttdeci">static VALUE fole_methods(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04302">win32ole.c:4302</a></div></div> <div class="ttc" id="win32ole_8c_html_ab26df562c721106c4a74f86c1e7e4ec3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab26df562c721106c4a74f86c1e7e4ec3">OLEData_Get_Struct</a></div><div class="ttdeci">#define OLEData_Get_Struct(obj, pole)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00125">win32ole.c:125</a></div></div> <div class="ttc" id="win32ole_8c_html_aa6977439cb75f72440c305fd1e49ef28"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa6977439cb75f72440c305fd1e49ef28">ole_method_visible</a></div><div class="ttdeci">static VALUE ole_method_visible(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06776">win32ole.c:6776</a></div></div> <div class="ttc" id="win32ole_8c_html_aff00e9a63405922541efd0eafab08ffb"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aff00e9a63405922541efd0eafab08ffb">wFlags</a></div><div class="ttdeci">static DISPID REFIID LCID WORD wFlags</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00306">win32ole.c:306</a></div></div> <div class="ttc" id="win32ole_8c_html_ab41ead361600f93bdec89d772172aae6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab41ead361600f93bdec89d772172aae6">ole_val2variant_ex</a></div><div class="ttdeci">static void ole_val2variant_ex(VALUE val, VARIANT *var, VARTYPE vt)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01695">win32ole.c:1695</a></div></div> <div class="ttc" id="win32ole_8c_html_a12a29db3df4934ec380c22ff639bc206"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a12a29db3df4934ec380c22ff639bc206">is_all_index_under</a></div><div class="ttdeci">static VALUE is_all_index_under(long *pid, long *pub, long dim)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01479">win32ole.c:1479</a></div></div> <div class="ttc" id="intern_8h_html_a6c99ed7f070458b961026d43d27d0642"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a6c99ed7f070458b961026d43d27d0642">rb_define_alloc_func</a></div><div class="ttdeci">void rb_define_alloc_func(VALUE, rb_alloc_func_t)</div></div> <div class="ttc" id="intern_8h_html_a6e65fc310dd65ebd60d68ada991da6f6"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a6e65fc310dd65ebd60d68ada991da6f6">rb_obj_is_kind_of</a></div><div class="ttdeci">VALUE rb_obj_is_kind_of(VALUE, VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/de1/object_8c_source.html#l00593">object.c:593</a></div></div> <div class="ttc" id="intern_8h_html_af22113d5eb78709346350cc93de7f6f3"><div class="ttname"><a href="../../db/d2e/intern_8h.html#af22113d5eb78709346350cc93de7f6f3">rb_backtrace</a></div><div class="ttdeci">void rb_backtrace(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d73/vm__backtrace_8c_source.html#l00766">vm_backtrace.c:766</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a8357e81bbb60cb41b0a292a90653a5e5"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a8357e81bbb60cb41b0a292a90653a5e5">T_HASH</a></div><div class="ttdeci">#define T_HASH</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00493">ruby.h:493</a></div></div> <div class="ttc" id="win32ole_8c_html_a198156271b35da99714f298e4885d34c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a198156271b35da99714f298e4885d34c">foletype_major_version</a></div><div class="ttdeci">static VALUE foletype_major_version(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05787">win32ole.c:5787</a></div></div> <div class="ttc" id="array_8c_html_a8317ecd6a0abb5ad08c50c732f30059b"><div class="ttname"><a href="../../dc/dcc/array_8c.html#a8317ecd6a0abb5ad08c50c732f30059b">rb_ary_new3</a></div><div class="ttdeci">VALUE rb_ary_new3(long n,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/dcc/array_8c_source.html#l00432">array.c:432</a></div></div> <div class="ttc" id="win32ole_8c_html_ad16a835e668be21d7980984570f1b948"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad16a835e668be21d7980984570f1b948">oletypelib_get_typelib</a></div><div class="ttdeci">static ITypeLib * oletypelib_get_typelib(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04944">win32ole.c:4944</a></div></div> <div class="ttc" id="error_8c_html_ae53f1d228c34c2a7715d7d39ab1a2991"><div class="ttname"><a href="../../db/dcc/error_8c.html#ae53f1d228c34c2a7715d7d39ab1a2991">rb_eSecurityError</a></div><div class="ttdeci">VALUE rb_eSecurityError</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00525">error.c:525</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_abb509cfdf6560a9f795b1f6932d93691"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#abb509cfdf6560a9f795b1f6932d93691">DATA_PTR</a></div><div class="ttdeci">#define DATA_PTR(dta)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00985">ruby.h:985</a></div></div> <div class="ttc" id="structolevariantdata_html"><div class="ttname"><a href="../../dd/dd6/structolevariantdata.html">olevariantdata</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00294">win32ole.c:294</a></div></div> <div class="ttc" id="structoletypelibdata_html"><div class="ttname"><a href="../../d6/dd4/structoletypelibdata.html">oletypelibdata</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00258">win32ole.c:258</a></div></div> <div class="ttc" id="structmy_c_p_i_n_f_o_e_x_html_ace3c4d7aeedd1b2094b1e43e00f5ef70"><div class="ttname"><a href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#ace3c4d7aeedd1b2094b1e43e00f5ef70">myCPINFOEX::CodePageName</a></div><div class="ttdeci">char CodePageName[MAX_PATH]</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01009">win32ole.c:1009</a></div></div> <div class="ttc" id="nkf-utf8_2nkf_8c_html_aae877041546563a319dff9e25bc3aaf7"><div class="ttname"><a href="../../d6/da0/nkf-utf8_2nkf_8c.html#aae877041546563a319dff9e25bc3aaf7">alias</a></div><div class="ttdeci">const char * alias</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/da0/nkf-utf8_2nkf_8c_source.html#l01151">nkf.c:1151</a></div></div> <div class="ttc" id="win32ole_8c_html_a78f7f599a5e13fe2d10c0b27961fa49b"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a78f7f599a5e13fe2d10c0b27961fa49b">ghhctrl</a></div><div class="ttdeci">static HINSTANCE ghhctrl</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00230">win32ole.c:230</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_abbd332f6f94d77e0a369c7720128639e"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#abbd332f6f94d77e0a369c7720128639e">T_ARRAY</a></div><div class="ttdeci">#define T_ARRAY</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00492">ruby.h:492</a></div></div> <div class="ttc" id="win32ole_8c_html_a5f96c057db4987aa9d01f368539b1507"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5f96c057db4987aa9d01f368539b1507">fole_s_reference_count</a></div><div class="ttdeci">static VALUE fole_s_reference_count(VALUE self, VALUE obj)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02913">win32ole.c:2913</a></div></div> <div class="ttc" id="bignum_8c_html_ad7d1c2410535e73b7dce7e3ed994bcf0"><div class="ttname"><a href="../../d1/dcc/bignum_8c.html#ad7d1c2410535e73b7dce7e3ed994bcf0">rb_big2dbl</a></div><div class="ttdeci">double rb_big2dbl(VALUE x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/dcc/bignum_8c_source.html#l01429">bignum.c:1429</a></div></div> <div class="ttc" id="win32ole_8c_html_a3827bf7153f5d6f7081a65fdf97f26a0"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3827bf7153f5d6f7081a65fdf97f26a0">eWIN32OLERuntimeError</a></div><div class="ttdeci">VALUE eWIN32OLERuntimeError</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00211">win32ole.c:211</a></div></div> <div class="ttc" id="win32ole_8c_html_aeb62a0f44f5b31fd7be1cb10084e1bf5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aeb62a0f44f5b31fd7be1cb10084e1bf5">OLE_GET_TYPEATTR</a></div><div class="ttdeci">#define OLE_GET_TYPEATTR(X, Y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00113">win32ole.c:113</a></div></div> <div class="ttc" id="intern_8h_html_aabbf48d0162ce9a462b13b71ccf683a5"><div class="ttname"><a href="../../db/d2e/intern_8h.html#aabbf48d0162ce9a462b13b71ccf683a5">rb_str_cmp</a></div><div class="ttdeci">int rb_str_cmp(VALUE, VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l02312">string.c:2312</a></div></div> <div class="ttc" id="structoleeventdata_html_ad3fdbd434fbde2331ea2f436f2daa94f"><div class="ttname"><a href="../../d1/d5d/structoleeventdata.html#ad3fdbd434fbde2331ea2f436f2daa94f">oleeventdata::pConnectionPoint</a></div><div class="ttdeci">IConnectionPoint * pConnectionPoint</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00285">win32ole.c:285</a></div></div> <div class="ttc" id="win32ole_8c_html_a14d93d21d7208d39e5c3c63d50214abd"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a14d93d21d7208d39e5c3c63d50214abd">fole_method_help</a></div><div class="ttdeci">static VALUE fole_method_help(VALUE self, VALUE cmdname)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04728">win32ole.c:4728</a></div></div> <div class="ttc" id="win32ole_8c_html_a6946f44fe8fd3dc52c25b9138ce1329f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6946f44fe8fd3dc52c25b9138ce1329f">folemethod_inspect</a></div><div class="ttdeci">static VALUE folemethod_inspect(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07229">win32ole.c:7229</a></div></div> <div class="ttc" id="win32ole_8c_html_a823003b3f886ae7d06708d5d18c20d0f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a823003b3f886ae7d06708d5d18c20d0f">ole_set_member</a></div><div class="ttdeci">static VALUE ole_set_member(VALUE self, IDispatch *dispatch)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02009">win32ole.c:2009</a></div></div> <div class="ttc" id="win32ole_8c_html_a456f7cf14bf360940a0ab80340a30a5c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a456f7cf14bf360940a0ab80340a30a5c">ole_method_event</a></div><div class="ttdeci">static VALUE ole_method_event(ITypeInfo *pTypeInfo, UINT method_index, VALUE method_name)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06813">win32ole.c:6813</a></div></div> <div class="ttc" id="win32ole_8c_html_a1829379decfeb26fe41ee99ea10a32ae"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1829379decfeb26fe41ee99ea10a32ae">dwData</a></div><div class="ttdeci">IUnknown COSERVERINFO MULTI_QI *typedef LPCSTR UINT DWORD dwData</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00151">win32ole.c:151</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a2fd3da1e43e6fdef8c373875c5c9ccc7"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a2fd3da1e43e6fdef8c373875c5c9ccc7">rb_block_call</a></div><div class="ttdeci">VALUE rb_block_call(VALUE, ID, int, VALUE *, VALUE(*)(ANYARGS), VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d80/vm__eval_8c_source.html#l01120">vm_eval.c:1120</a></div></div> <div class="ttc" id="structolevariabledata_html_a3da87642080ecdc100a4a779258d1ba5"><div class="ttname"><a href="../../d2/d9a/structolevariabledata.html#a3da87642080ecdc100a4a779258d1ba5">olevariabledata::pTypeInfo</a></div><div class="ttdeci">ITypeInfo * pTypeInfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00273">win32ole.c:273</a></div></div> <div class="ttc" id="win32ole_8c_html_a69aa8b97b2991bba847a006ba8a683ff"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a69aa8b97b2991bba847a006ba8a683ff">folemethod_return_type</a></div><div class="ttdeci">static VALUE folemethod_return_type(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06629">win32ole.c:6629</a></div></div> <div class="ttc" id="win32ole_8c_html_a41f0ea7dd0ed5bdbe6fd43e9b16ef91f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a41f0ea7dd0ed5bdbe6fd43e9b16ef91f">FNENUMSYSEMCODEPAGES</a></div><div class="ttdeci">BOOL() FNENUMSYSEMCODEPAGES(CODEPAGE_ENUMPROC, DWORD)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00153">win32ole.c:153</a></div></div> <div class="ttc" id="win32ole_8c_html_a65439140996baa0857d23174dde5dac8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a65439140996baa0857d23174dde5dac8">threadIDCallee</a></div><div class="ttdeci">static HTASK threadIDCallee</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00662">win32ole.c:662</a></div></div> <div class="ttc" id="intern_8h_html_a2dbbded6179580510ae67c33f29505ec"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a2dbbded6179580510ae67c33f29505ec">rb_Float</a></div><div class="ttdeci">VALUE rb_Float(VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/de1/object_8c_source.html#l02700">object.c:2700</a></div></div> <div class="ttc" id="win32ole_8c_html_ad7869cc5544dece10a158bb1e6340e1e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad7869cc5544dece10a158bb1e6340e1e">foletype_s_typelibs</a></div><div class="ttdeci">static VALUE foletype_s_typelibs(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04827">win32ole.c:4827</a></div></div> <div class="ttc" id="win32ole_8c_html_a04a08c5718d5989071001bbb08d6bd04"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a04a08c5718d5989071001bbb08d6bd04">get_ptr_of_variant</a></div><div class="ttdeci">static void * get_ptr_of_variant(VARIANT *pvar)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01410">win32ole.c:1410</a></div></div> <div class="ttc" id="structmy_c_p_i_n_f_o_e_x_html_a178dbbc1282de54a58ba0a6d46b35123"><div class="ttname"><a href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#a178dbbc1282de54a58ba0a6d46b35123">myCPINFOEX::LeadByte</a></div><div class="ttdeci">BYTE LeadByte[12]</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01006">win32ole.c:1006</a></div></div> <div class="ttc" id="intern_8h_html_a514248a396e8910d80016bc5d3785a81"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a514248a396e8910d80016bc5d3785a81">rb_fix2str</a></div><div class="ttdeci">VALUE rb_fix2str(VALUE, int)</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/d27/numeric_8c_source.html#l02573">numeric.c:2573</a></div></div> <div class="ttc" id="win32ole_8c_html_a78014010885156d66440be3692ea4a13"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a78014010885156d66440be3692ea4a13">oleclass_from_typelib</a></div><div class="ttdeci">static VALUE oleclass_from_typelib(VALUE self, ITypeLib *pTypeLib, VALUE oleclass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04897">win32ole.c:4897</a></div></div> <div class="ttc" id="structoleparamdata_html"><div class="ttname"><a href="../../d6/dda/structoleparamdata.html">oleparamdata</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00277">win32ole.c:277</a></div></div> <div class="ttc" id="win32ole_8c_html_a0e365aecee59aa21b999d051a4c76a2b"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a0e365aecee59aa21b999d051a4c76a2b">ary_store_dim</a></div><div class="ttdeci">static void ary_store_dim(VALUE myary, long *pid, long *plb, long dim, VALUE val)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02068">win32ole.c:2068</a></div></div> <div class="ttc" id="win32ole_8c_html_a46e95b41258862662f5e02173c154a7a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a46e95b41258862662f5e02173c154a7a">fole_s_get_code_page</a></div><div class="ttdeci">static VALUE fole_s_get_code_page(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03015">win32ole.c:3015</a></div></div> <div class="ttc" id="win32ole_8c_html_a1db0ce1c948a3568385af4333d51d21e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1db0ce1c948a3568385af4333d51d21e">olemethod_free</a></div><div class="ttdeci">static void olemethod_free(struct olemethoddata *polemethod)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01280">win32ole.c:1280</a></div></div> <div class="ttc" id="win32ole_8c_html_a81d5683f19a2b3e891115a7005223ecf"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a81d5683f19a2b3e891115a7005223ecf">ole_delete_event</a></div><div class="ttdeci">static void ole_delete_event(VALUE ary, VALUE ev)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07722">win32ole.c:7722</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a621bc62b1fd82640c1078daf90e1c061"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a621bc62b1fd82640c1078daf90e1c061">OBJ_TAINTED</a></div><div class="ttdeci">#define OBJ_TAINTED(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01153">ruby.h:1153</a></div></div> <div class="ttc" id="structmy_c_p_i_n_f_o_e_x_html_ae39d7dcd68304c5fc3f04d962afd7cd4"><div class="ttname"><a href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#ae39d7dcd68304c5fc3f04d962afd7cd4">myCPINFOEX::MaxCharSize</a></div><div class="ttdeci">UINT MaxCharSize</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01004">win32ole.c:1004</a></div></div> <div class="ttc" id="win32ole_8c_html_afc1f3a868b87bab628cd530d46f876d7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afc1f3a868b87bab628cd530d46f876d7">ole_val2ptr_variant</a></div><div class="ttdeci">static void ole_val2ptr_variant(VALUE val, VARIANT *var)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01730">win32ole.c:1730</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a084521c82d2eb576d63d64bfe6b79642"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a084521c82d2eb576d63d64bfe6b79642">NUM2DBL</a></div><div class="ttdeci">#define NUM2DBL(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00675">ruby.h:675</a></div></div> <div class="ttc" id="struct___win32_o_l_e_i_dispatch_html"><div class="ttname"><a href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html">_Win32OLEIDispatch</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00695">win32ole.c:695</a></div></div> <div class="ttc" id="win32ole_8c_html_a025ca1dc7e3a355101d2528a1e4c1354"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a025ca1dc7e3a355101d2528a1e4c1354">cWIN32OLE_TYPE</a></div><div class="ttdeci">VALUE cWIN32OLE_TYPE</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00205">win32ole.c:205</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a9b4f42ada717bfbe7a78830639476aed"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a9b4f42ada717bfbe7a78830639476aed">rb_obj_classname</a></div><div class="ttdeci">const char * rb_obj_classname(VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/d2a/variable_8c_source.html#l00396">variable.c:396</a></div></div> <div class="ttc" id="win32ole_8c_html_afa4d94a8fadbff668fda61cff6af208c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afa4d94a8fadbff668fda61cff6af208c">ole_ary_m_entry</a></div><div class="ttdeci">static VALUE ole_ary_m_entry(VALUE val, long *pid)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01397">win32ole.c:1397</a></div></div> <div class="ttc" id="win32ole_8c_html_a53606d594d28df92bb76a6afb1ae94fe"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a53606d594d28df92bb76a6afb1ae94fe">ole_type_visible</a></div><div class="ttdeci">static VALUE ole_type_visible(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05731">win32ole.c:5731</a></div></div> <div class="ttc" id="win32ole_8c_html_a029768b0134384136ccb8fec098031a7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a029768b0134384136ccb8fec098031a7">ole_type_impl_ole_types</a></div><div class="ttdeci">static VALUE ole_type_impl_ole_types(ITypeInfo *pTypeInfo, int implflags)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05993">win32ole.c:5993</a></div></div> <div class="ttc" id="win32ole_8c_html_ad04a677a5615054a1486ccbcf5312d90"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad04a677a5615054a1486ccbcf5312d90">find_default_source_from_typeinfo</a></div><div class="ttdeci">static HRESULT find_default_source_from_typeinfo(ITypeInfo *pTypeInfo, TYPEATTR *pTypeAttr, ITypeInfo **ppTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08135">win32ole.c:8135</a></div></div> <div class="ttc" id="win32ole_8c_html_a1d7c82f61a1880fbbd308aa150767c14"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1d7c82f61a1880fbbd308aa150767c14">set_argv</a></div><div class="ttdeci">static VALUE set_argv(VARIANTARG *realargs, unsigned int beg, unsigned int end)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03320">win32ole.c:3320</a></div></div> <div class="ttc" id="win32ole_8c_html_a52007ffd60bf368cb33f51b4ece83379"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a52007ffd60bf368cb33f51b4ece83379">folevariant_ary_aref</a></div><div class="ttdeci">static VALUE folevariant_ary_aref(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08860">win32ole.c:8860</a></div></div> <div class="ttc" id="win32ole_8c_html_aed99a9f4a309f2e9dbf5b02f29ff8e22"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aed99a9f4a309f2e9dbf5b02f29ff8e22">NORETURN</a></div><div class="ttdeci">NORETURN(static void failed_load_conv51932(void))</div></div> <div class="ttc" id="win32ole_8c_html_ad74e541d2cc665141eb7721fd668c2a5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad74e541d2cc665141eb7721fd668c2a5">WC2VSTR</a></div><div class="ttdeci">#define WC2VSTR(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00144">win32ole.c:144</a></div></div> <div class="ttc" id="win32ole_8c_html_aaa4e0270632c9307fd04b301c488cee1"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aaa4e0270632c9307fd04b301c488cee1">ole_ole_type</a></div><div class="ttdeci">static VALUE ole_ole_type(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05598">win32ole.c:5598</a></div></div> <div class="ttc" id="win32ole_8c_html_a5d3bde90e102b667d712389285c5d200"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5d3bde90e102b667d712389285c5d200">foleparam_ole_type_detail</a></div><div class="ttdeci">static VALUE foleparam_ole_type_detail(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07385">win32ole.c:7385</a></div></div> <div class="ttc" id="win32ole_8c_html_aa619ede67812e724cc5e198f7790a9dd"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa619ede67812e724cc5e198f7790a9dd">oleparam_free</a></div><div class="ttdeci">static void oleparam_free(struct oleparamdata *pole)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01295">win32ole.c:1295</a></div></div> <div class="ttc" id="win32ole_8c_html_a09549d1a72c129044395c7ae8e97e2fd"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a09549d1a72c129044395c7ae8e97e2fd">ole_method_helpfile</a></div><div class="ttdeci">static VALUE ole_method_helpfile(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06976">win32ole.c:6976</a></div></div> <div class="ttc" id="structtag_i_e_v_e_n_t_s_i_n_k_o_b_j_html_a22754fa974e76bbc3feb7598c4b58afe"><div class="ttname"><a href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a22754fa974e76bbc3feb7598c4b58afe">tagIEVENTSINKOBJ::m_cRef</a></div><div class="ttdeci">DWORD m_cRef</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00197">win32ole.c:197</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a27705a261a9addb9ed4cb65dd5a61b1c"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a27705a261a9addb9ed4cb65dd5a61b1c">Data_Wrap_Struct</a></div><div class="ttdeci">#define Data_Wrap_Struct(klass, mark, free, sval)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01007">ruby.h:1007</a></div></div> <div class="ttc" id="win32ole_8c_html_a4b5a598a4f53b3724549c48dcfbf7c48"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a></div><div class="ttdeci">Win32OLEIDispatch * p</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00786">win32ole.c:786</a></div></div> <div class="ttc" id="win32ole_8c_html_afda17c1fafb5c5da6cf2467641cb41a7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afda17c1fafb5c5da6cf2467641cb41a7">folemethod_invkind</a></div><div class="ttdeci">static VALUE folemethod_invkind(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06749">win32ole.c:6749</a></div></div> <div class="ttc" id="win32ole_8c_html_adad9431755c118178073c87698ebb8e4"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#adad9431755c118178073c87698ebb8e4">ole_val2variant</a></div><div class="ttdeci">static void ole_val2variant(VALUE val, VARIANT *var)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01629">win32ole.c:1629</a></div></div> <div class="ttc" id="eval_8c_html_a237939d28c83950b84fb6a45ccca53a0"><div class="ttname"><a href="../../d3/d57/eval_8c.html#a237939d28c83950b84fb6a45ccca53a0">rb_exc_raise</a></div><div class="ttdeci">void rb_exc_raise(VALUE mesg)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d57/eval_8c_source.html#l00527">eval.c:527</a></div></div> <div class="ttc" id="win32ole_8c_html_a3757bad3ebff1b9c19971d2b364625b4"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3757bad3ebff1b9c19971d2b364625b4">foletypelib_guid</a></div><div class="ttdeci">static VALUE foletypelib_guid(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05243">win32ole.c:5243</a></div></div> <div class="ttc" id="win32ole_8c_html_a61528773fffe3438d8ce4e64bb4e5c6f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a61528773fffe3438d8ce4e64bb4e5c6f">uCommand</a></div><div class="ttdeci">IUnknown COSERVERINFO MULTI_QI *typedef LPCSTR UINT uCommand</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00151">win32ole.c:151</a></div></div> <div class="ttc" id="win32ole_8c_html_a2007081b1749d56e7a5ed6b196d9fa45"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2007081b1749d56e7a5ed6b196d9fa45">g_uninitialize_hooked</a></div><div class="ttdeci">static BOOL g_uninitialize_hooked</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00227">win32ole.c:227</a></div></div> <div class="ttc" id="win32ole_8c_html_a1bd7a8575ca2650132d636d65dcda2f6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1bd7a8575ca2650132d636d65dcda2f6">args</a></div><div class="ttdeci">int args</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00785">win32ole.c:785</a></div></div> <div class="ttc" id="win32ole_8c_html_af7405fc306fc6dd47d3718be25b547b7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af7405fc306fc6dd47d3718be25b547b7">foletype_ole_type</a></div><div class="ttdeci">static VALUE foletype_ole_type(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05652">win32ole.c:5652</a></div></div> <div class="ttc" id="win32ole_8c_html_af35c14e43de709d8f72501c8b73300a6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af35c14e43de709d8f72501c8b73300a6">g_cp_to_check</a></div><div class="ttdeci">static UINT g_cp_to_check</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00238">win32ole.c:238</a></div></div> <div class="ttc" id="win32ole_8c_html_aac13c3c50abb6519352a3398703aec8f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aac13c3c50abb6519352a3398703aec8f">g_ole_initialized_init</a></div><div class="ttdeci">#define g_ole_initialized_init()</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00224">win32ole.c:224</a></div></div> <div class="ttc" id="ripper_8c_html_a962e14dc81f0fa2107c555dd10129c27"><div class="ttname"><a href="../../d5/d11/ripper_8c.html#a962e14dc81f0fa2107c555dd10129c27">rb_is_const_id</a></div><div class="ttdeci">int rb_is_const_id(ID id)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d11/ripper_8c_source.html#l17053">ripper.c:17053</a></div></div> <div class="ttc" id="win32ole_8c_html_a7fd47663ce9b04a6aab54fbeb42a8298"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7fd47663ce9b04a6aab54fbeb42a8298">folevariable_ole_type_detail</a></div><div class="ttdeci">static VALUE folevariable_ole_type_detail(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06309">win32ole.c:6309</a></div></div> <div class="ttc" id="win32ole_8c_html_a1aa9cb27ad3f5c039b159d04221c2730"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1aa9cb27ad3f5c039b159d04221c2730">foletype_default_ole_types</a></div><div class="ttdeci">static VALUE foletype_default_ole_types(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06096">win32ole.c:6096</a></div></div> <div class="ttc" id="win32ole_8c_html_af9b956c8687447bdff77fa11bfdeab6c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af9b956c8687447bdff77fa11bfdeab6c">PIEVENTSINKOBJ</a></div><div class="ttdeci">struct tagIEVENTSINKOBJ * PIEVENTSINKOBJ</div></div> <div class="ttc" id="win32ole_8c_html_a8d0dc6164e89f16d8b1acfb5022e41e8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a8d0dc6164e89f16d8b1acfb5022e41e8">EVENTSINK_GetTypeInfoCount</a></div><div class="ttdeci">STDMETHODIMP EVENTSINK_GetTypeInfoCount(PEVENTSINK pEV, UINT *pct)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07619">win32ole.c:7619</a></div></div> <div class="ttc" id="win32ole_8c_html_abb98c7449dc683552d93e0ab76a4d8ee"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#abb98c7449dc683552d93e0ab76a4d8ee">ole_docinfo_from_type</a></div><div class="ttdeci">static HRESULT ole_docinfo_from_type(ITypeInfo *pTypeInfo, BSTR *name, BSTR *helpstr, DWORD *helpcontext, BSTR *helpfile)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04541">win32ole.c:4541</a></div></div> <div class="ttc" id="win32ole_8c_html_a58ed2b02963206faa9aac83bf473a812"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a58ed2b02963206faa9aac83bf473a812">PEVENTSINK</a></div><div class="ttdeci">struct IEventSink * PEVENTSINK</div></div> <div class="ttc" id="win32ole_8c_html_a0b0b26c0997cc209fd7a7f6aa8f7f21c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a0b0b26c0997cc209fd7a7f6aa8f7f21c">folevariable_value</a></div><div class="ttdeci">static VALUE folevariable_value(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06353">win32ole.c:6353</a></div></div> <div class="ttc" id="structoleparam_html_a61df15975c8db1bbcd439b4579091fdc"><div class="ttname"><a href="../../d2/d5d/structoleparam.html#a61df15975c8db1bbcd439b4579091fdc">oleparam::pNamedArgs</a></div><div class="ttdeci">OLECHAR ** pNamedArgs</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00291">win32ole.c:291</a></div></div> <div class="ttc" id="intern_8h_html_aa1fbc95b7e9c7e0697f0f5c19e2fb2d2"><div class="ttname"><a href="../../db/d2e/intern_8h.html#aa1fbc95b7e9c7e0697f0f5c19e2fb2d2">rb_write_error</a></div><div class="ttdeci">void rb_write_error(const char *)</div><div class="ttdef"><b>Definition:</b> <a href="../../df/d0a/io_8c_source.html#l07099">io.c:7099</a></div></div> <div class="ttc" id="win32ole_8c_html_a0faf86c7524111112f60229f8da59d14"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a0faf86c7524111112f60229f8da59d14">folemethod_invoke_kind</a></div><div class="ttdeci">static VALUE folemethod_invoke_kind(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06768">win32ole.c:6768</a></div></div> <div class="ttc" id="win32ole_8c_html_a3caf5ac5f0932872736edc5d35bd71e6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3caf5ac5f0932872736edc5d35bd71e6">ole_search_handler_method</a></div><div class="ttdeci">static VALUE ole_search_handler_method(VALUE handler, VALUE ev, BOOL *is_default_handler)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07704">win32ole.c:7704</a></div></div> <div class="ttc" id="win32ole_8c_html_a909b7cc51ca1a6d9765706c7d0089b2b"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a909b7cc51ca1a6d9765706c7d0089b2b">ole_typedesc2val</a></div><div class="ttdeci">static VALUE ole_typedesc2val(ITypeInfo *pTypeInfo, TYPEDESC *pTypeDesc, VALUE typedetails)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04602">win32ole.c:4602</a></div></div> <div class="ttc" id="st_8h_html_a2d85287fbdaf7dcbc22d45e925c29fea"><div class="ttname"><a href="../../dd/d24/st_8h.html#a2d85287fbdaf7dcbc22d45e925c29fea">st_lookup</a></div><div class="ttdeci">int st_lookup(st_table *, st_data_t, st_data_t *)</div></div> <div class="ttc" id="win32ole_8c_html_a6bcacff9ce50a9417b8b262dba751248"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6bcacff9ce50a9417b8b262dba751248">fev_initialize</a></div><div class="ttdeci">static VALUE fev_initialize(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08371">win32ole.c:8371</a></div></div> <div class="ttc" id="win32ole_8c_html_a6f774f9af58d93389160a187b06f4f38"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6f774f9af58d93389160a187b06f4f38">oleparam_ole_param</a></div><div class="ttdeci">static VALUE oleparam_ole_param(VALUE self, VALUE olemethod, int n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07292">win32ole.c:7292</a></div></div> <div class="ttc" id="win32ole_8c_html_add1934e43857f1911e6ff0050d8f593e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#add1934e43857f1911e6ff0050d8f593e">ole_val2variant2</a></div><div class="ttdeci">static void ole_val2variant2(VALUE val, VARIANT *var)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01982">win32ole.c:1982</a></div></div> <div class="ttc" id="win32ole_8c_html_ada66e0a6c7b3c3915de52016aa828026"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ada66e0a6c7b3c3915de52016aa828026">create_win32ole_object</a></div><div class="ttdeci">static VALUE create_win32ole_object(VALUE klass, IDispatch *pDispatch, int argc, VALUE *argv)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02034">win32ole.c:2034</a></div></div> <div class="ttc" id="structoleparamdata_html_aae87bcf392d7438e862e16b9dad19134"><div class="ttname"><a href="../../d6/dda/structoleparamdata.html#aae87bcf392d7438e862e16b9dad19134">oleparamdata::pTypeInfo</a></div><div class="ttdeci">ITypeInfo * pTypeInfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00278">win32ole.c:278</a></div></div> <div class="ttc" id="win32ole_8c_html_a331dfbd740eaac20e1c89cac4c1810fd"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a331dfbd740eaac20e1c89cac4c1810fd">pExcepInfo</a></div><div class="ttdeci">static DISPID REFIID LCID WORD DISPPARAMS __RPC_FAR VARIANT __RPC_FAR EXCEPINFO __RPC_FAR * pExcepInfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00306">win32ole.c:306</a></div></div> <div class="ttc" id="encoding_8c_html_a0724183879562529f7d3365ef5115b6d"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#a0724183879562529f7d3365ef5115b6d">rb_default_external_encoding</a></div><div class="ttdeci">rb_encoding * rb_default_external_encoding(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l01286">encoding.c:1286</a></div></div> <div class="ttc" id="win32ole_8c_html_a904af26931d02b6f49611a7201d3c9c1"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a904af26931d02b6f49611a7201d3c9c1">ole_types_from_typelib</a></div><div class="ttdeci">static VALUE ole_types_from_typelib(ITypeLib *pTypeLib, VALUE classes)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02862">win32ole.c:2862</a></div></div> <div class="ttc" id="win32ole_8c_html_ad85fa2cce60ae4f1915b162471096a66"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad85fa2cce60ae4f1915b162471096a66">unlock_safe_array</a></div><div class="ttdeci">static void unlock_safe_array(SAFEARRAY *psa)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08830">win32ole.c:8830</a></div></div> <div class="ttc" id="win32ole_8c_html_a3395108ccf7c08e1c3461a468b4412a6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3395108ccf7c08e1c3461a468b4412a6">ole_wc2vstr</a></div><div class="ttdeci">static VALUE ole_wc2vstr(LPWSTR pw, BOOL isfree)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01386">win32ole.c:1386</a></div></div> <div class="ttc" id="win32ole_8c_html_a7979d0bf1755bd9d1e72709d8fd3ff89"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7979d0bf1755bd9d1e72709d8fd3ff89">OLE_FREE</a></div><div class="ttdeci">#define OLE_FREE(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00116">win32ole.c:116</a></div></div> <div class="ttc" id="win32ole_8c_html_aaa3aba20914a6077714e3aec036c162b"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aaa3aba20914a6077714e3aec036c162b">folemethod_event</a></div><div class="ttdeci">static VALUE folemethod_event(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06887">win32ole.c:6887</a></div></div> <div class="ttc" id="win32ole_8c_html_ad4337eb4b87a4587146ae21e3f7b7f29"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad4337eb4b87a4587146ae21e3f7b7f29">ole_hresult2msg</a></div><div class="ttdeci">static VALUE ole_hresult2msg(HRESULT hr)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01103">win32ole.c:1103</a></div></div> <div class="ttc" id="win32ole_8c_html_a3fd59f1b292db308f516fe025a5cd446"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3fd59f1b292db308f516fe025a5cd446">foleparam_default</a></div><div class="ttdeci">static VALUE foleparam_default(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07542">win32ole.c:7542</a></div></div> <div class="ttc" id="win32ole_8c_html_a54ad2dbeaac58c98d5aab369aacc7650"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a54ad2dbeaac58c98d5aab369aacc7650">ole_variable_varkind</a></div><div class="ttdeci">static VALUE ole_variable_varkind(ITypeInfo *pTypeInfo, UINT var_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06463">win32ole.c:6463</a></div></div> <div class="ttc" id="win32ole_8c_html_a9e1526602f12196f5bf394832700029a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9e1526602f12196f5bf394832700029a">com_hash</a></div><div class="ttdeci">static VALUE com_hash</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00233">win32ole.c:233</a></div></div> <div class="ttc" id="win32ole_8c_html_abadfae1ced24da452479079a0b01da5b"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#abadfae1ced24da452479079a0b01da5b">ole_method_return_vtype</a></div><div class="ttdeci">static VALUE ole_method_return_vtype(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06637">win32ole.c:6637</a></div></div> <div class="ttc" id="win32ole_8c_html_a23d4b2b48618ab5d151662931e221172"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a23d4b2b48618ab5d151662931e221172">ole_variable_kind</a></div><div class="ttdeci">static VALUE ole_variable_kind(ITypeInfo *pTypeInfo, UINT var_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06407">win32ole.c:6407</a></div></div> <div class="ttc" id="win32ole_8c_html_a7761c680fae0129661c0bea85dd54e29"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7761c680fae0129661c0bea85dd54e29">ole_encoding2cp</a></div><div class="ttdeci">static UINT ole_encoding2cp(rb_encoding *enc)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00863">win32ole.c:863</a></div></div> <div class="ttc" id="structtag_i_e_v_e_n_t_s_i_n_k_o_b_j_html_a1203bec2c0d25a2e73da1ed2ec8f0d26"><div class="ttname"><a href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a1203bec2c0d25a2e73da1ed2ec8f0d26">tagIEVENTSINKOBJ::pTypeInfo</a></div><div class="ttdeci">ITypeInfo * pTypeInfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00200">win32ole.c:200</a></div></div> <div class="ttc" id="structolemethoddata_html_ada76a0c2c10b622b4efe50b0ae8cec4c"><div class="ttname"><a href="../../d4/df4/structolemethoddata.html#ada76a0c2c10b622b4efe50b0ae8cec4c">olemethoddata::pOwnerTypeInfo</a></div><div class="ttdeci">ITypeInfo * pOwnerTypeInfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00267">win32ole.c:267</a></div></div> <div class="ttc" id="win32ole_8c_html_a8c02b8f9190decc7b4077cb122d313fa"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a8c02b8f9190decc7b4077cb122d313fa">olemethod_set_member</a></div><div class="ttdeci">static VALUE olemethod_set_member(VALUE self, ITypeInfo *pTypeInfo, ITypeInfo *pOwnerTypeInfo, int index, VALUE name)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06525">win32ole.c:6525</a></div></div> <div class="ttc" id="win32ole_8c_html_a193adc17c1530bdbca68249ac0761baa"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a193adc17c1530bdbca68249ac0761baa">ole_variable_visible</a></div><div class="ttdeci">static VALUE ole_variable_visible(ITypeInfo *pTypeInfo, UINT var_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06361">win32ole.c:6361</a></div></div> <div class="ttc" id="win32ole_8c_html_a3d4d9282d5e9e36ad04cec2fdcd0fe0e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3d4d9282d5e9e36ad04cec2fdcd0fe0e">ole_initialize</a></div><div class="ttdeci">static void ole_initialize(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01225">win32ole.c:1225</a></div></div> <div class="ttc" id="win32ole_8c_html_a54e783dcc1a3fec965bbc80eb16bd913"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a54e783dcc1a3fec965bbc80eb16bd913">mWIN32OLE_VARIANT</a></div><div class="ttdeci">VALUE mWIN32OLE_VARIANT</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00212">win32ole.c:212</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a79041aa2bc7439c11906a86f82a52eb6"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a></div><div class="ttdeci">#define ALLOC_N(type, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01223">ruby.h:1223</a></div></div> <div class="ttc" id="struct___win32_o_l_e_i_dispatch_html_a78456213cddd8a467016276c988698a6"><div class="ttname"><a href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#a78456213cddd8a467016276c988698a6">_Win32OLEIDispatch::refcount</a></div><div class="ttdeci">ULONG refcount</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00698">win32ole.c:698</a></div></div> <div class="ttc" id="win32ole_8c_html_ad86ed24d2a7324b1bb5474f6f0782812"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad86ed24d2a7324b1bb5474f6f0782812">g_lcid_installed</a></div><div class="ttdeci">static BOOL g_lcid_installed</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00229">win32ole.c:229</a></div></div> <div class="ttc" id="struct_i_event_sink_vtbl_html_ab0ef28eaafa7e679bfb0b80e98da0135"><div class="ttname"><a href="../../de/d78/struct_i_event_sink_vtbl.html#ab0ef28eaafa7e679bfb0b80e98da0135">IEventSinkVtbl::QueryInterface</a></div><div class="ttdeci">STDMETHOD() QueryInterface(PEVENTSINK, REFIID, LPVOID *)</div></div> <div class="ttc" id="win32ole_8c_html_a6b9cb77954f22e0de4393538501f8619"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6b9cb77954f22e0de4393538501f8619">ole_variable_value</a></div><div class="ttdeci">static VALUE ole_variable_value(ITypeInfo *pTypeInfo, UINT var_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06317">win32ole.c:6317</a></div></div> <div class="ttc" id="vm__exec_8c_html"><div class="ttname"><a href="../../df/d38/vm__exec_8c.html">val</a></div><div class="ttdeci">#define val</div></div> <div class="ttc" id="win32ole_8c_html_a1a24f6def4ff0e89e8f3884381b49be2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1a24f6def4ff0e89e8f3884381b49be2">foletype_src_type</a></div><div class="ttdeci">static VALUE foletype_src_type(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05911">win32ole.c:5911</a></div></div> <div class="ttc" id="win32ole_8c_html_acee37022da7bca094884d7d5c544470f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#acee37022da7bca094884d7d5c544470f">ole_vstr2wc</a></div><div class="ttdeci">static LPWSTR ole_vstr2wc(VALUE vstr)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01303">win32ole.c:1303</a></div></div> <div class="ttc" id="win32ole_8c_html_a6eabe7fdb6877c4fc48f030143375f31"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6eabe7fdb6877c4fc48f030143375f31">rbtime2vtdate</a></div><div class="ttdeci">static double rbtime2vtdate(VALUE tmobj)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00825">win32ole.c:825</a></div></div> <div class="ttc" id="win32ole_8c_html_a6ea161e7d9af7836343b5fc9078e45d4"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6ea161e7d9af7836343b5fc9078e45d4">ole_type_helpcontext</a></div><div class="ttdeci">static VALUE ole_type_helpcontext(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05948">win32ole.c:5948</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a57c96ead3ef230b4838e65fe037c346e"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a57c96ead3ef230b4838e65fe037c346e">rb_cObject</a></div><div class="ttdeci">RUBY_EXTERN VALUE rb_cObject</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01426">ruby.h:1426</a></div></div> <div class="ttc" id="error_8c_html_a95ad3953d535707e2cf2b1d837f5e253"><div class="ttname"><a href="../../db/dcc/error_8c.html#a95ad3953d535707e2cf2b1d837f5e253">rb_eRuntimeError</a></div><div class="ttdeci">VALUE rb_eRuntimeError</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00515">error.c:515</a></div></div> <div class="ttc" id="win32ole_8c_html_ad3196fc77437d523ed1459e8ff809d3a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad3196fc77437d523ed1459e8ff809d3a">DWORD</a></div><div class="ttdeci">IUnknown DWORD</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00149">win32ole.c:149</a></div></div> <div class="ttc" id="win32ole_8c_html_aec5bd42c3df2556e0a864fd127c84986"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aec5bd42c3df2556e0a864fd127c84986">ole_uninitialize_hook</a></div><div class="ttdeci">static void ole_uninitialize_hook(rb_event_flag_t evflag, VALUE data, VALUE self, ID mid, VALUE klass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01219">win32ole.c:1219</a></div></div> <div class="ttc" id="win32ole_8c_html_a3270db47af757cbdea41b2e897fd5b63"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3270db47af757cbdea41b2e897fd5b63">ole_ptrtype2val</a></div><div class="ttdeci">static VALUE ole_ptrtype2val(ITypeInfo *pTypeInfo, TYPEDESC *pTypeDesc, VALUE typedetails)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04589">win32ole.c:4589</a></div></div> <div class="ttc" id="win32ole_8c_html_a6aba758cd00cea749b2a7e1ae22098df"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6aba758cd00cea749b2a7e1ae22098df">foletype_s_ole_classes</a></div><div class="ttdeci">static VALUE foletype_s_ole_classes(VALUE self, VALUE typelib)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04805">win32ole.c:4805</a></div></div> <div class="ttc" id="win32ole_8c_html_ab70a2b3ac84618de156452bb215ac232"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab70a2b3ac84618de156452bb215ac232">ole_set_byref</a></div><div class="ttdeci">static void ole_set_byref(VARIANT *realvar, VARIANT *var, VARTYPE vt)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01798">win32ole.c:1798</a></div></div> <div class="ttc" id="struct___win32_o_l_e_i_dispatch_html_ac822787106ceaeca7d783ac7ee604db8"><div class="ttname"><a href="../../d2/dda/struct___win32_o_l_e_i_dispatch.html#ac822787106ceaeca7d783ac7ee604db8">_Win32OLEIDispatch::obj</a></div><div class="ttdeci">VALUE obj</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00699">win32ole.c:699</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a3a7d10c48d5dff0a5d4aa94acb74811a"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a3a7d10c48d5dff0a5d4aa94acb74811a">T_NIL</a></div><div class="ttdeci">#define T_NIL</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00484">ruby.h:484</a></div></div> <div class="ttc" id="win32ole_8c_html_afe7b5c965ce1a10b205d15b8c47646d9"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afe7b5c965ce1a10b205d15b8c47646d9">typelib_file</a></div><div class="ttdeci">static VALUE typelib_file(VALUE ole)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02504">win32ole.c:2504</a></div></div> <div class="ttc" id="win32ole_8c_html_a63b4faafeb1711dd2ea21e5a7ba406d5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a63b4faafeb1711dd2ea21e5a7ba406d5">g_ole_initialized</a></div><div class="ttdeci">#define g_ole_initialized</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00223">win32ole.c:223</a></div></div> <div class="ttc" id="win32ole_8c_html_a88485f594ddcf839c3057757d8d91b53"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a88485f594ddcf839c3057757d8d91b53">oletypelib_search_registry</a></div><div class="ttdeci">static VALUE oletypelib_search_registry(VALUE self, VALUE typelib)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05106">win32ole.c:5106</a></div></div> <div class="ttc" id="intern_8h_html_a5bd27db3e38af6131db24321c7cf9ec6"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a5bd27db3e38af6131db24321c7cf9ec6">rb_str_cat2</a></div><div class="ttdeci">VALUE rb_str_cat2(VALUE, const char *)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l01986">string.c:1986</a></div></div> <div class="ttc" id="array_8c_html_a9518114fd36cb4ef4656ec1dc63348c9"><div class="ttname"><a href="../../dc/dcc/array_8c.html#a9518114fd36cb4ef4656ec1dc63348c9">rb_ary_new</a></div><div class="ttdeci">VALUE rb_ary_new(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/dcc/array_8c_source.html#l00424">array.c:424</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a7fc7e09f45d0ef129ea29f3a5b0c32b8"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a7fc7e09f45d0ef129ea29f3a5b0c32b8">T_TRUE</a></div><div class="ttdeci">#define T_TRUE</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00498">ruby.h:498</a></div></div> <div class="ttc" id="win32ole_8c_html_afacb5c1ecde95354cfd6a6be1415c5b8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afacb5c1ecde95354cfd6a6be1415c5b8">folemethod_helpcontext</a></div><div class="ttdeci">static VALUE folemethod_helpcontext(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07028">win32ole.c:7028</a></div></div> <div class="ttc" id="struct_i_event_sink_html"><div class="ttname"><a href="../../dc/d91/struct_i_event_sink.html">IEventSink</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00154">win32ole.c:154</a></div></div> <div class="ttc" id="win32ole_8c_html_a6c5c0d1bde5f2871dc2127dacd9205fb"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6c5c0d1bde5f2871dc2127dacd9205fb">oletypelib_get_libattr</a></div><div class="ttdeci">static void oletypelib_get_libattr(ITypeLib *pTypeLib, TLIBATTR **ppTLibAttr)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04952">win32ole.c:4952</a></div></div> <div class="ttc" id="subst_8h_html_aa367b75c5aed883fef5befbdf04835a4"><div class="ttname"><a href="../../d7/d72/subst_8h.html#aa367b75c5aed883fef5befbdf04835a4">snprintf</a></div><div class="ttdeci">#define snprintf</div><div class="ttdef"><b>Definition:</b> <a href="../../d7/d72/subst_8h_source.html#l00006">subst.h:6</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a4832bad8845a35fc50f7a160901854a1"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a4832bad8845a35fc50f7a160901854a1">NIL_P</a></div><div class="ttdeci">#define NIL_P(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00446">ruby.h:446</a></div></div> <div class="ttc" id="win32ole_8c_html_ac3e7d57a2e31cb6749fd9fb4bdac99b2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac3e7d57a2e31cb6749fd9fb4bdac99b2">pctinfo</a></div><div class="ttdeci">static UINT __RPC_FAR * pctinfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00303">win32ole.c:303</a></div></div> <div class="ttc" id="win32ole_8c_html_a5e12333be1ac8271835f370a58abb6b2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5e12333be1ac8271835f370a58abb6b2">ole_type_from_itypeinfo</a></div><div class="ttdeci">static VALUE ole_type_from_itypeinfo(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04357">win32ole.c:4357</a></div></div> <div class="ttc" id="structoledata_html"><div class="ttname"><a href="../../d1/d03/structoledata.html">oledata</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00254">win32ole.c:254</a></div></div> <div class="ttc" id="encoding_8c_html_aa020a886cff98ea2edead4231ff72973"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#aa020a886cff98ea2edead4231ff72973">enc_name</a></div><div class="ttdeci">static VALUE enc_name(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l01003">encoding.c:1003</a></div></div> <div class="ttc" id="group__class_html_ga15d068dbe88a3bab3700b03bebb7fbac"><div class="ttname"><a href="../../de/ddf/group__class.html#ga15d068dbe88a3bab3700b03bebb7fbac">rb_define_class</a></div><div class="ttdeci">VALUE rb_define_class(const char *name, VALUE super)</div><div class="ttdoc">Defines a top-level class. </div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d0c/class_8c_source.html#l00488">class.c:488</a></div></div> <div class="ttc" id="strerror_8c_html_ae4f3f55be5de649fd367081b9d1b4b0c"><div class="ttname"><a href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a></div><div class="ttdeci">static char msg[50]</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d04/strerror_8c_source.html#l00008">strerror.c:8</a></div></div> <div class="ttc" id="win32ole_8c_html_adae672a14ddd2ecdc02a17f8a4828d85"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#adae672a14ddd2ecdc02a17f8a4828d85">cWIN32OLE_EVENT</a></div><div class="ttdeci">VALUE cWIN32OLE_EVENT</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00209">win32ole.c:209</a></div></div> <div class="ttc" id="win32ole_8c_html_a752b650185811a148fde591fe97104e3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a752b650185811a148fde591fe97104e3">imessage_filter</a></div><div class="ttdeci">static IMessageFilter imessage_filter</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00243">win32ole.c:243</a></div></div> <div class="ttc" id="error_8c_html_a89a7ea938248c2019b7e6a0c11b92af6"><div class="ttname"><a href="../../db/dcc/error_8c.html#a89a7ea938248c2019b7e6a0c11b92af6">rb_eNoMethodError</a></div><div class="ttdeci">VALUE rb_eNoMethodError</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00524">error.c:524</a></div></div> <div class="ttc" id="st_8h_html_aa04e4ee0a6e1f19e64f3be4668f41234"><div class="ttname"><a href="../../dd/d24/st_8h.html#aa04e4ee0a6e1f19e64f3be4668f41234">st_delete</a></div><div class="ttdeci">int st_delete(st_table *, st_data_t *, st_data_t *)</div></div> <div class="ttc" id="ruby_2ruby_8h_html_a861b20872f7d24f1c5f2da5261037322"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a861b20872f7d24f1c5f2da5261037322">rb_define_const</a></div><div class="ttdeci">void rb_define_const(VALUE, const char *, VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/d2a/variable_8c_source.html#l02204">variable.c:2204</a></div></div> <div class="ttc" id="array_8c_html_a1d7683de2cd34217808092d90ffd0869"><div class="ttname"><a href="../../dc/dcc/array_8c.html#a1d7683de2cd34217808092d90ffd0869">rb_ary_store</a></div><div class="ttdeci">void rb_ary_store(VALUE ary, long idx, VALUE val)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/dcc/array_8c_source.html#l00719">array.c:719</a></div></div> <div class="ttc" id="win32ole_8c_html_a77934e557be2fa38c4a3dc9327c0e181"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a77934e557be2fa38c4a3dc9327c0e181">message_filter</a></div><div class="ttdeci">static IMessageFilterVtbl message_filter</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00242">win32ole.c:242</a></div></div> <div class="ttc" id="win32ole_8c_html_ad1d7db020ebeab12bc94c56f82f43076"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad1d7db020ebeab12bc94c56f82f43076">reg_get_val</a></div><div class="ttdeci">static VALUE reg_get_val(HKEY hkey, const char *subkey)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02357">win32ole.c:2357</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a02d9b54a782bcf6c3d0137cefaa94c87"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a02d9b54a782bcf6c3d0137cefaa94c87">rb_eval_string</a></div><div class="ttdeci">VALUE rb_eval_string(const char *)</div><div class="ttdoc">Evaluates the given string in an isolated binding. </div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d80/vm__eval_8c_source.html#l01384">vm_eval.c:1384</a></div></div> <div class="ttc" id="structtag_i_e_v_e_n_t_s_i_n_k_o_b_j_html"><div class="ttname"><a href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html">tagIEVENTSINKOBJ</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00195">win32ole.c:195</a></div></div> <div class="ttc" id="structolevariantdata_html_a4480949fdcb7bf172930bb9803c49964"><div class="ttname"><a href="../../dd/dd6/structolevariantdata.html#a4480949fdcb7bf172930bb9803c49964">olevariantdata::var</a></div><div class="ttdeci">VARIANT var</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00296">win32ole.c:296</a></div></div> <div class="ttc" id="win32ole_8c_html_a2d0cf91d19e5f8f14cf8c167f4699275"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2d0cf91d19e5f8f14cf8c167f4699275">fole_s_allocate</a></div><div class="ttdeci">static VALUE fole_s_allocate(VALUE klass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02023">win32ole.c:2023</a></div></div> <div class="ttc" id="win32ole_8c_html_a303d4c6c980af9ead5d8e06cdf4be789"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a303d4c6c980af9ead5d8e06cdf4be789">fole_getproperty2</a></div><div class="ttdeci">static VALUE fole_getproperty2(VALUE self, VALUE dispid, VALUE args, VALUE types)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03806">win32ole.c:3806</a></div></div> <div class="ttc" id="win32ole_8c_html_afc5830d08daccd1d3e65c2a374b17a77"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afc5830d08daccd1d3e65c2a374b17a77">oletypelib_free</a></div><div class="ttdeci">static void oletypelib_free(struct oletypelibdata *poletypelib)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01266">win32ole.c:1266</a></div></div> <div class="ttc" id="win32ole_8c_html_a7c43bce680b77e3dd2a1df61a36cf2f5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7c43bce680b77e3dd2a1df61a36cf2f5">ole_method_invkind</a></div><div class="ttdeci">static VALUE ole_method_invkind(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06705">win32ole.c:6705</a></div></div> <div class="ttc" id="win32ole_8c_html_a950b2a90a61b3cae5543c9d93b00ead3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a950b2a90a61b3cae5543c9d93b00ead3">fole_invoke</a></div><div class="ttdeci">static VALUE fole_invoke(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03580">win32ole.c:3580</a></div></div> <div class="ttc" id="win32ole_8c_html_a17a347d953c452aabf9e16be24f4a582"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a17a347d953c452aabf9e16be24f4a582">get_locked_safe_array</a></div><div class="ttdeci">static SAFEARRAY * get_locked_safe_array(VALUE val)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08789">win32ole.c:8789</a></div></div> <div class="ttc" id="win32ole_8c_html_ade95b6654fa8f56b6d40a6773d2331ad"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ade95b6654fa8f56b6d40a6773d2331ad">ole_type_progid</a></div><div class="ttdeci">static VALUE ole_type_progid(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05695">win32ole.c:5695</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a3d072e0c25cf678e9b8601b957b92eae"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a3d072e0c25cf678e9b8601b957b92eae">T_FLOAT</a></div><div class="ttdeci">#define T_FLOAT</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00489">ruby.h:489</a></div></div> <div class="ttc" id="win32ole_8c_html_a38c94372747cca7b01ac64e76f941a2c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a38c94372747cca7b01ac64e76f941a2c">code_page_installed</a></div><div class="ttdeci">static BOOL code_page_installed(UINT cp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03030">win32ole.c:3030</a></div></div> <div class="ttc" id="win32ole_8c_html_a55c610157abbd413fa24145b5705907d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a55c610157abbd413fa24145b5705907d">foletypelib_path</a></div><div class="ttdeci">static VALUE foletypelib_path(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05417">win32ole.c:5417</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a394faf7191f18552a20cb17ce14226f0"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a394faf7191f18552a20cb17ce14226f0">TYPE</a></div><div class="ttdeci">#define TYPE(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00513">ruby.h:513</a></div></div> <div class="ttc" id="ruby_8c_html_ad1447518f4372828b8435ae82e48499e"><div class="ttname"><a href="../../df/d77/ruby_8c.html#ad1447518f4372828b8435ae82e48499e">argc</a></div><div class="ttdeci">int argc</div><div class="ttdef"><b>Definition:</b> <a href="../../df/d77/ruby_8c_source.html#l00130">ruby.c:130</a></div></div> <div class="ttc" id="win32ole_8c_html_abcd6997bfbcd8f8c44472b2f05480e39"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#abcd6997bfbcd8f8c44472b2f05480e39">fole_typelib</a></div><div class="ttdeci">static VALUE fole_typelib(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04441">win32ole.c:4441</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aba0717d2689eb68797421a02ab9295c6"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aba0717d2689eb68797421a02ab9295c6">Qfalse</a></div><div class="ttdeci">#define Qfalse</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00433">ruby.h:433</a></div></div> <div class="ttc" id="win32ole_8c_html_ac8c00a4cb59ce47acdabd17199dda0fa"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac8c00a4cb59ce47acdabd17199dda0fa">ole_set_safe_array</a></div><div class="ttdeci">static void ole_set_safe_array(long n, SAFEARRAY *psa, long *pid, long *pub, VALUE val, long dim, VARTYPE vt)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01491">win32ole.c:1491</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a1408f4b967485afd869990b67e766ceb"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a1408f4b967485afd869990b67e766ceb">ALLOCA_N</a></div><div class="ttdeci">#define ALLOCA_N(type, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01227">ruby.h:1227</a></div></div> <div class="ttc" id="win32ole_8c_html_ae702a671c49f24709fcec4962b540fbd"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae702a671c49f24709fcec4962b540fbd">foletype_name</a></div><div class="ttdeci">static VALUE foletype_name(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05592">win32ole.c:5592</a></div></div> <div class="ttc" id="win32ole_8c_html_a50260416a5f8ae64ee1b630148f19160"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a50260416a5f8ae64ee1b630148f19160">folevariant_set_value</a></div><div class="ttdeci">static VALUE folevariant_set_value(VALUE self, VALUE val)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l09050">win32ole.c:9050</a></div></div> <div class="ttc" id="win32ole_8c_html_a148da008cc189df71d5b47bf1bbb6d06"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a148da008cc189df71d5b47bf1bbb6d06">ole_wc2mb</a></div><div class="ttdeci">static char * ole_wc2mb(LPWSTR pw)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01067">win32ole.c:1067</a></div></div> <div class="ttc" id="win32ole_8c_html_a91f2817851c7bb20c0fe5bd881163956"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a91f2817851c7bb20c0fe5bd881163956">foletypelib_name</a></div><div class="ttdeci">static VALUE foletypelib_name(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05271">win32ole.c:5271</a></div></div> <div class="ttc" id="win32ole_8c_html_a60cc14e6fb03174de0b20323e13afcdd"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a60cc14e6fb03174de0b20323e13afcdd">foletypelib_visible</a></div><div class="ttdeci">static VALUE foletypelib_visible(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05457">win32ole.c:5457</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a41ac74a27dd1eadc2ca86d10590f2163"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a41ac74a27dd1eadc2ca86d10590f2163">T_BIGNUM</a></div><div class="ttdeci">#define T_BIGNUM</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00495">ruby.h:495</a></div></div> <div class="ttc" id="gc_8c_html_adc7efe8997f04b5c275d7e7aed9169e3"><div class="ttname"><a href="../../d8/d16/gc_8c.html#adc7efe8997f04b5c275d7e7aed9169e3">rb_gc_register_mark_object</a></div><div class="ttdeci">void rb_gc_register_mark_object(VALUE obj)</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d16/gc_8c_source.html#l02982">gc.c:2982</a></div></div> <div class="ttc" id="win32ole_8c_html_a7b85e610d07b34c298cf33157d20744f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7b85e610d07b34c298cf33157d20744f">folemethod_initialize</a></div><div class="ttdeci">static VALUE folemethod_initialize(VALUE self, VALUE oletype, VALUE method)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06566">win32ole.c:6566</a></div></div> <div class="ttc" id="win32ole_8c_html_aebe176e60c05479fdbc4ce192fefc5f3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aebe176e60c05479fdbc4ce192fefc5f3">hash2named_arg</a></div><div class="ttdeci">static VALUE hash2named_arg(VALUE pair, struct oleparam *pOp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03282">win32ole.c:3282</a></div></div> <div class="ttc" id="win32ole_8c_html_aca6350a62c8eea366d1df29eca78dc48"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aca6350a62c8eea366d1df29eca78dc48">folevariable_inspect</a></div><div class="ttdeci">static VALUE folevariable_inspect(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06510">win32ole.c:6510</a></div></div> <div class="ttc" id="win32ole_8c_html_aad5717d16ab405a0b4b7d3211ff72527"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aad5717d16ab405a0b4b7d3211ff72527">ole_methods_from_typeinfo</a></div><div class="ttdeci">static VALUE ole_methods_from_typeinfo(ITypeInfo *pTypeInfo, int mask)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04202">win32ole.c:4202</a></div></div> <div class="ttc" id="win32ole_8c_html_a0603b3be2cd978771772b56d3c8a1317"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a0603b3be2cd978771772b56d3c8a1317">iTInfo</a></div><div class="ttdeci">static UINT iTInfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00304">win32ole.c:304</a></div></div> <div class="ttc" id="win32_8c_html_a6ce68847c12434f60d1b2654a3dc3409"><div class="ttname"><a href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a></div><div class="ttdeci">int err</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/df2/win32_8c_source.html#l00087">win32.c:87</a></div></div> <div class="ttc" id="win32ole_8c_html_a633ecb2e5bb97e8d4de926ea39ce7765"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a633ecb2e5bb97e8d4de926ea39ce7765">I8_2_NUM</a></div><div class="ttdeci">#define I8_2_NUM</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00138">win32ole.c:138</a></div></div> <div class="ttc" id="win32ole_8c_html_a5f7b09d5d74e06de5f6c89beae493338"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5f7b09d5d74e06de5f6c89beae493338">ole_type_guid</a></div><div class="ttdeci">static VALUE ole_type_guid(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05660">win32ole.c:5660</a></div></div> <div class="ttc" id="intern_8h_html_a6b530fce35a344ec394c08c6643cdd8a"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a6b530fce35a344ec394c08c6643cdd8a">rb_sym_to_s</a></div><div class="ttdeci">VALUE rb_sym_to_s(VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l07924">string.c:7924</a></div></div> <div class="ttc" id="error_8c_html_ac80019ce275be87f28c42761abe460ee"><div class="ttname"><a href="../../db/dcc/error_8c.html#ac80019ce275be87f28c42761abe460ee">rb_eIndexError</a></div><div class="ttdeci">VALUE rb_eIndexError</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00518">error.c:518</a></div></div> <div class="ttc" id="win32ole_8c_html_a60fc00d3ccda920f10703894be73a31d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a60fc00d3ccda920f10703894be73a31d">fole_activex_initialize</a></div><div class="ttdeci">static VALUE fole_activex_initialize(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04770">win32ole.c:4770</a></div></div> <div class="ttc" id="structoleparamdata_html_a6c2c365a36f711221c12113e7dfbcaeb"><div class="ttname"><a href="../../d6/dda/structoleparamdata.html#a6c2c365a36f711221c12113e7dfbcaeb">oleparamdata::index</a></div><div class="ttdeci">UINT index</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00280">win32ole.c:280</a></div></div> <div class="ttc" id="encoding_8h_html"><div class="ttname"><a href="../../d5/de3/encoding_8h.html">encoding.h</a></div></div> <div class="ttc" id="win32ole_8c_html_a8612f92772dd1fbb3ff187c706fd88bc"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a8612f92772dd1fbb3ff187c706fd88bc">rgDispId</a></div><div class="ttdeci">static REFIID LPOLESTR __RPC_FAR UINT LCID DISPID __RPC_FAR * rgDispId</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00305">win32ole.c:305</a></div></div> <div class="ttc" id="structtag_i_e_v_e_n_t_s_i_n_k_o_b_j_html_a860ed444261d864cf62269b6d075748c"><div class="ttname"><a href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a860ed444261d864cf62269b6d075748c">tagIEVENTSINKOBJ::m_event_id</a></div><div class="ttdeci">int m_event_id</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00199">win32ole.c:199</a></div></div> <div class="ttc" id="win32ole_8c_html_a3d4c4141e36eb51f6028533a97b8d484"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3d4c4141e36eb51f6028533a97b8d484">V_INTREF</a></div><div class="ttdeci">#define V_INTREF(X)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00089">win32ole.c:89</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ac8df5a8a8961bd9e16be385fef28c2f2"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ac8df5a8a8961bd9e16be385fef28c2f2">ALLOC</a></div><div class="ttdeci">#define ALLOC(type)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01224">ruby.h:1224</a></div></div> <div class="ttc" id="win32ole_8c_html_a6f226d1adae4b7b9897502c69e03520a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6f226d1adae4b7b9897502c69e03520a">add_event_call_back</a></div><div class="ttdeci">static void add_event_call_back(VALUE obj, VALUE event, VALUE data)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08395">win32ole.c:8395</a></div></div> <div class="ttc" id="structolevariabledata_html_afa76c31341bcc8319a596875a73bb2be"><div class="ttname"><a href="../../d2/d9a/structolevariabledata.html#afa76c31341bcc8319a596875a73bb2be">olevariabledata::index</a></div><div class="ttdeci">UINT index</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00274">win32ole.c:274</a></div></div> <div class="ttc" id="win32ole_8c_html_a148e50845bce10ef3e8ab273feb2e302"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a148e50845bce10ef3e8ab273feb2e302">STDMETHODIMP_</a></div><div class="ttdeci">STDMETHODIMP_(ULONG)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07608">win32ole.c:7608</a></div></div> <div class="ttc" id="win32ole_8c_html_a8bc9e5d97cd25261219ffa5642187da8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a8bc9e5d97cd25261219ffa5642187da8">folevariant_ary_aset</a></div><div class="ttdeci">static VALUE folevariant_ary_aset(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08940">win32ole.c:8940</a></div></div> <div class="ttc" id="win32ole_8c_html_a6c0faebe3e31e28f7202288a1ec72573"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6c0faebe3e31e28f7202288a1ec72573">folemethod_name</a></div><div class="ttdeci">static VALUE folemethod_name(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06597">win32ole.c:6597</a></div></div> <div class="ttc" id="win32ole_8c_html_ad311a3e3d6c8963c86da0c0738d2035e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad311a3e3d6c8963c86da0c0738d2035e">ole_raise</a></div><div class="ttdeci">static void ole_raise(HRESULT hr, VALUE ecs, const char *fmt,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01193">win32ole.c:1193</a></div></div> <div class="ttc" id="win32ole_8c_html_a1335e192faf93015dc32985436d60f7e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1335e192faf93015dc32985436d60f7e">set_ole_codepage</a></div><div class="ttdeci">static void set_ole_codepage(UINT cp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00961">win32ole.c:961</a></div></div> <div class="ttc" id="win32ole_8c_html_a7946b47acb9022d6a5bc20e728ed5013"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7946b47acb9022d6a5bc20e728ed5013">dimension</a></div><div class="ttdeci">static long dimension(VALUE val)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01523">win32ole.c:1523</a></div></div> <div class="ttc" id="win32ole_8c_html_a0fc97ff3ba5a68010e19aac6920897cc"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a0fc97ff3ba5a68010e19aac6920897cc">folevariable_variable_kind</a></div><div class="ttdeci">static VALUE folevariable_variable_kind(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06455">win32ole.c:6455</a></div></div> <div class="ttc" id="win32ole_8c_html_a5a3aa5d1d651d476ac780e098b058f49"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5a3aa5d1d651d476ac780e098b058f49">ole_cp2encoding</a></div><div class="ttdeci">static rb_encoding * ole_cp2encoding(UINT cp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01013">win32ole.c:1013</a></div></div> <div class="ttc" id="win32ole_8c_html_a1a1d911e7d192419a0bc563c1134e1f1"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1a1d911e7d192419a0bc563c1134e1f1">fole_put_methods</a></div><div class="ttdeci">static VALUE fole_put_methods(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04334">win32ole.c:4334</a></div></div> <div class="ttc" id="win32ole_8c_html_ac2cadf7c61871ef6c7d630762d3ca09d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac2cadf7c61871ef6c7d630762d3ca09d">fole_s_set_code_page</a></div><div class="ttdeci">static VALUE fole_s_set_code_page(VALUE self, VALUE vcp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03052">win32ole.c:3052</a></div></div> <div class="ttc" id="intern_8h_html_a17a81c1a7d754e5ab49fc4b4369b6c8c"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a17a81c1a7d754e5ab49fc4b4369b6c8c">rb_const_get</a></div><div class="ttdeci">VALUE rb_const_get(VALUE, ID)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/d2a/variable_8c_source.html#l01876">variable.c:1876</a></div></div> <div class="ttc" id="win32ole_8c_html_ae384ff6b7496bc19a6cc419461cf61f5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae384ff6b7496bc19a6cc419461cf61f5">fev_set_handler</a></div><div class="ttdeci">static VALUE fev_set_handler(VALUE self, VALUE val)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08618">win32ole.c:8618</a></div></div> <div class="ttc" id="group__defmethod_html_ga9ee2c97671d010bcb7a27614ab28bba7"><div class="ttname"><a href="../../d7/d19/group__defmethod.html#ga9ee2c97671d010bcb7a27614ab28bba7">rb_define_alias</a></div><div class="ttdeci">void rb_define_alias(VALUE klass, const char *name1, const char *name2)</div><div class="ttdoc">Defines an alias of a method. </div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d0c/class_8c_source.html#l01539">class.c:1539</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a0d1c6e4431397f8bd285073af0d98d77"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a0d1c6e4431397f8bd285073af0d98d77">RSTRING_LEN</a></div><div class="ttdeci">#define RSTRING_LEN(str)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00862">ruby.h:862</a></div></div> <div class="ttc" id="structmy_c_p_i_n_f_o_e_x_html_a8e704040d664147757f082f19c19d409"><div class="ttname"><a href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#a8e704040d664147757f082f19c19d409">myCPINFOEX::DefaultChar</a></div><div class="ttdeci">BYTE DefaultChar[2]</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01005">win32ole.c:1005</a></div></div> <div class="ttc" id="win32ole_8c_html_a632f2bcf05d41fa60f4c4369849ddd1c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a632f2bcf05d41fa60f4c4369849ddd1c">ary_len_of_dim</a></div><div class="ttdeci">static long ary_len_of_dim(VALUE ary, long dim)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01542">win32ole.c:1542</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ae6bd0c4ea4db971ebd569ca8f05c6b4a"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ae6bd0c4ea4db971ebd569ca8f05c6b4a">rb_yield</a></div><div class="ttdeci">VALUE rb_yield(VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d80/vm__eval_8c_source.html#l00933">vm_eval.c:933</a></div></div> <div class="ttc" id="win32ole_8c_html_aadf36ab75f655cbc860c9e88e37db822"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aadf36ab75f655cbc860c9e88e37db822">folevariant_value</a></div><div class="ttdeci">static VALUE folevariant_value(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08989">win32ole.c:8989</a></div></div> <div class="ttc" id="win32ole_8c_html_a593b161d7b4621b0e6b31434cec8d8cc"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a593b161d7b4621b0e6b31434cec8d8cc">fev_s_msg_loop</a></div><div class="ttdeci">static VALUE fev_s_msg_loop(VALUE klass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08387">win32ole.c:8387</a></div></div> <div class="ttc" id="win32ole_8c_html_a3e39523be2bde7adc51ab796000cdec9"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3e39523be2bde7adc51ab796000cdec9">folevariant_s_allocate</a></div><div class="ttdeci">static VALUE folevariant_s_allocate(VALUE klass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08645">win32ole.c:8645</a></div></div> <div class="ttc" id="gc_8c_html_a481b1446700e95e49f9531c653543c85"><div class="ttname"><a href="../../d8/d16/gc_8c.html#a481b1446700e95e49f9531c653543c85">rb_during_gc</a></div><div class="ttdeci">int rb_during_gc(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d16/gc_8c_source.html#l03119">gc.c:3119</a></div></div> <div class="ttc" id="win32ole_8c_html_a9a574ecfa512cc905e0c882fe0413b43"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9a574ecfa512cc905e0c882fe0413b43">foletypelib_major_version</a></div><div class="ttdeci">static VALUE foletypelib_major_version(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05323">win32ole.c:5323</a></div></div> <div class="ttc" id="nkf_8h_html_aa8cecfc5c5c054d2875c03e77b7be15d"><div class="ttname"><a href="../../d1/d5c/nkf_8h.html#aa8cecfc5c5c054d2875c03e77b7be15d">TRUE</a></div><div class="ttdeci">#define TRUE</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d5c/nkf_8h_source.html#l00175">nkf.h:175</a></div></div> <div class="ttc" id="win32ole_8c_html_a536bbe39f587ff60fd0cee5db26dc333"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a536bbe39f587ff60fd0cee5db26dc333">foletype_helpstring</a></div><div class="ttdeci">static VALUE foletype_helpstring(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05876">win32ole.c:5876</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_adafa8fd17636821445380e7e1881355e"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#adafa8fd17636821445380e7e1881355e">rb_funcall2</a></div><div class="ttdeci">VALUE rb_funcall2(VALUE, ID, int, const VALUE *)</div><div class="ttdoc">Calls a method. </div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d80/vm__eval_8c_source.html#l00804">vm_eval.c:804</a></div></div> <div class="ttc" id="sprintf_8c_html_a05c34a91ab36c6a463c861df47808fae"><div class="ttname"><a href="../../d9/d2d/sprintf_8c.html#a05c34a91ab36c6a463c861df47808fae">rb_sprintf</a></div><div class="ttdeci">VALUE rb_sprintf(const char *format,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d2d/sprintf_8c_source.html#l01275">sprintf.c:1275</a></div></div> <div class="ttc" id="win32ole_8c_html_ad369fee2d0d724ef2fe3535240b981c7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad369fee2d0d724ef2fe3535240b981c7">evs_length</a></div><div class="ttdeci">static VALUE evs_length(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08573">win32ole.c:8573</a></div></div> <div class="ttc" id="win32ole_8c_html_ae55d84a8797460e9279316d18ed42e37"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae55d84a8797460e9279316d18ed42e37">enc2cp_table</a></div><div class="ttdeci">static st_table * enc2cp_table</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00241">win32ole.c:241</a></div></div> <div class="ttc" id="win32ole_8c_html_ac6ec24a19ac346216e24b0033d8bd202"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac6ec24a19ac346216e24b0033d8bd202">foleparam_retval</a></div><div class="ttdeci">static VALUE foleparam_retval(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07482">win32ole.c:7482</a></div></div> <div class="ttc" id="encoding_8h_html_a69d59d898802726787a168ef2e0dc92c"><div class="ttname"><a href="../../d5/de3/encoding_8h.html#a69d59d898802726787a168ef2e0dc92c">rb_enc_name</a></div><div class="ttdeci">#define rb_enc_name(enc)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/de3/encoding_8h_source.html#l00124">encoding.h:124</a></div></div> <div class="ttc" id="win32ole_8c_html_a17da1c9035e9e51a82318d5bc6511c04"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a17da1c9035e9e51a82318d5bc6511c04">ole_val_ary2variant_ary</a></div><div class="ttdeci">static HRESULT ole_val_ary2variant_ary(VALUE val, VARIANT *var, VARTYPE vt)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01568">win32ole.c:1568</a></div></div> <div class="ttc" id="win32ole_8c_html_a6f887102a87a5c6e8f1155ea69bd02a1"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6f887102a87a5c6e8f1155ea69bd02a1">foletype_progid</a></div><div class="ttdeci">static VALUE foletype_progid(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05722">win32ole.c:5722</a></div></div> <div class="ttc" id="win32ole_8c_html_a9eb9e2c430bab21f13d1a2ff462142be"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9eb9e2c430bab21f13d1a2ff462142be">reg_get_val2</a></div><div class="ttdeci">static VALUE reg_get_val2(HKEY hkey, const char *subkey)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02385">win32ole.c:2385</a></div></div> <div class="ttc" id="win32ole_8c_html_a2d695e7b75d0ffd71513ceebaa6b0d3e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2d695e7b75d0ffd71513ceebaa6b0d3e">ole_type_major_version</a></div><div class="ttdeci">static VALUE ole_type_major_version(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05765">win32ole.c:5765</a></div></div> <div class="ttc" id="hash_8c_html_af1da586524a3a1739fd5b91272037815"><div class="ttname"><a href="../../d1/d04/hash_8c.html#af1da586524a3a1739fd5b91272037815">rb_hash_new</a></div><div class="ttdeci">VALUE rb_hash_new(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d04/hash_8c_source.html#l00234">hash.c:234</a></div></div> <div class="ttc" id="structoletypelibdata_html_a3e801cfa37d6bb51915e8710b366d7f2"><div class="ttname"><a href="../../d6/dd4/structoletypelibdata.html#a3e801cfa37d6bb51915e8710b366d7f2">oletypelibdata::pTypeLib</a></div><div class="ttdeci">ITypeLib * pTypeLib</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00259">win32ole.c:259</a></div></div> <div class="ttc" id="win32ole_8c_html_ad5c0e2057baa6beedb3bdd8a58010abf"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad5c0e2057baa6beedb3bdd8a58010abf">OLE_RELEASE_TYPEATTR</a></div><div class="ttdeci">#define OLE_RELEASE_TYPEATTR(X, Y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00114">win32ole.c:114</a></div></div> <div class="ttc" id="win32ole_8c_html_aefb50e0a803b13434dbaac16c8373aec"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aefb50e0a803b13434dbaac16c8373aec">ole_propertyput</a></div><div class="ttdeci">static VALUE ole_propertyput(VALUE self, VALUE property, VALUE value)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03895">win32ole.c:3895</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a4d78945bdd704e09ebaa6a5d4f10c88a"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a4d78945bdd704e09ebaa6a5d4f10c88a">NUM2CHR</a></div><div class="ttdeci">#define NUM2CHR(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01219">ruby.h:1219</a></div></div> <div class="ttc" id="win32ole_8c_html_aaff897843a1cf2bfb5857b77f78bd7f2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aaff897843a1cf2bfb5857b77f78bd7f2">fole_get_methods</a></div><div class="ttdeci">static VALUE fole_get_methods(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04318">win32ole.c:4318</a></div></div> <div class="ttc" id="group__defmethod_html_gaa7bed88640f01bee619f85fda09d28d7"><div class="ttname"><a href="../../d7/d19/group__defmethod.html#gaa7bed88640f01bee619f85fda09d28d7">rb_scan_args</a></div><div class="ttdeci">int rb_scan_args(int argc, const VALUE *argv, const char *fmt,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d0c/class_8c_source.html#l01570">class.c:1570</a></div></div> <div class="ttc" id="win32ole_8c_html_a65bbad5ba8794f7e9bab852ee27deb65"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a65bbad5ba8794f7e9bab852ee27deb65">typelib_file_from_clsid</a></div><div class="ttdeci">static VALUE typelib_file_from_clsid(VALUE ole)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02418">win32ole.c:2418</a></div></div> <div class="ttc" id="intern_8h_html_acee88ad0375c8a9080e2283db494d257"><div class="ttname"><a href="../../db/d2e/intern_8h.html#acee88ad0375c8a9080e2283db494d257">rb_ivar_set</a></div><div class="ttdeci">VALUE rb_ivar_set(VALUE, ID, VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/d2a/variable_8c_source.html#l01128">variable.c:1128</a></div></div> <div class="ttc" id="nkf-utf8_2nkf_8c_html_ac37f17a60c8b5533aac4840c681f62b8"><div class="ttname"><a href="../../d6/da0/nkf-utf8_2nkf_8c.html#ac37f17a60c8b5533aac4840c681f62b8">buf</a></div><div class="ttdeci">unsigned char buf[MIME_BUF_SIZE]</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/da0/nkf-utf8_2nkf_8c_source.html#l04308">nkf.c:4308</a></div></div> <div class="ttc" id="win32ole_8c_html_a28a014fe0e5748d97ce5df5aca42ae00"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a28a014fe0e5748d97ce5df5aca42ae00">foleparam_initialize</a></div><div class="ttdeci">static VALUE foleparam_initialize(VALUE self, VALUE olemethod, VALUE n)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07299">win32ole.c:7299</a></div></div> <div class="ttc" id="debug_8h_html_a0f3a87f7fe46934bc85e4cd076f754ce"><div class="ttname"><a href="../../db/d16/debug_8h.html#a0f3a87f7fe46934bc85e4cd076f754ce">rb_add_event_hook</a></div><div class="ttdeci">void rb_add_event_hook(rb_event_hook_func_t func, rb_event_flag_t events, VALUE data)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/d80/vm__trace_8c_source.html#l00135">vm_trace.c:135</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_afa5b9137f051ac26d7ccc8824f178233"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#afa5b9137f051ac26d7ccc8824f178233">ID</a></div><div class="ttdeci">unsigned long ID</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00105">ruby.h:105</a></div></div> <div class="ttc" id="win32ole_8c_html_ae41de633323c960996403584ec558f81"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae41de633323c960996403584ec558f81">oletypelib_search_registry2</a></div><div class="ttdeci">static VALUE oletypelib_search_registry2(VALUE self, VALUE args)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05034">win32ole.c:5034</a></div></div> <div class="ttc" id="win32ole_8c_html_ac8860b58d270355634f963913731566a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac8860b58d270355634f963913731566a">ole_invoke</a></div><div class="ttdeci">static VALUE ole_invoke(int argc, VALUE *argv, VALUE self, USHORT wFlags, BOOL is_bracket)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03334">win32ole.c:3334</a></div></div> <div class="ttc" id="win32ole_8c_html_a77ca308cb6a605690e4b3e07afd18ce8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a77ca308cb6a605690e4b3e07afd18ce8">gole32</a></div><div class="ttdeci">static HINSTANCE gole32</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00231">win32ole.c:231</a></div></div> <div class="ttc" id="win32ole_8c_html_ab23a842ced22241faa160ec00ae03eea"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab23a842ced22241faa160ec00ae03eea">ole_method_size_params</a></div><div class="ttdeci">static VALUE ole_method_size_params(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07098">win32ole.c:7098</a></div></div> <div class="ttc" id="win32ole_8c_html_ab216bc0c636cf9153535e420079e4e8e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab216bc0c636cf9153535e420079e4e8e">cWIN32OLE_TYPELIB</a></div><div class="ttdeci">VALUE cWIN32OLE_TYPELIB</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00204">win32ole.c:204</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_aba03c3c4ff187bbda6c4459e2dc9f6c6"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#aba03c3c4ff187bbda6c4459e2dc9f6c6">Qnil</a></div><div class="ttdeci">#define Qnil</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00435">ruby.h:435</a></div></div> <div class="ttc" id="tcltklib_8c_html_ac765329451135abec74c45e1897abf26"><div class="ttname"><a href="../../d5/d9d/tcltklib_8c.html#ac765329451135abec74c45e1897abf26">type</a></div><div class="ttdeci">int type</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d9d/tcltklib_8c_source.html#l00111">tcltklib.c:111</a></div></div> <div class="ttc" id="encoding_8c_html_a873f1c2ba114f13f45b84990a5a595b7"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#a873f1c2ba114f13f45b84990a5a595b7">rb_define_dummy_encoding</a></div><div class="ttdeci">int rb_define_dummy_encoding(const char *name)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l00400">encoding.c:400</a></div></div> <div class="ttc" id="win32ole_8c_html_a6d457f96e6144f1981999a6c5e6d07e1"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6d457f96e6144f1981999a6c5e6d07e1">dwPendingType</a></div><div class="ttdeci">static HTASK DWORD DWORD dwPendingType</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00682">win32ole.c:682</a></div></div> <div class="ttc" id="win32ole_8c_html_a17949113bb77a6cf53c1efe7bdc878b6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a17949113bb77a6cf53c1efe7bdc878b6">ole_method_size_opt_params</a></div><div class="ttdeci">static VALUE ole_method_size_opt_params(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07130">win32ole.c:7130</a></div></div> <div class="ttc" id="win32ole_8c_html_a0b0961ddd6591968e023b883d9a08c33"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a0b0961ddd6591968e023b883d9a08c33">failed_load_conv51932</a></div><div class="ttdeci">static void failed_load_conv51932(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00929">win32ole.c:929</a></div></div> <div class="ttc" id="win32ole_8c_html_a5a5a2fee3e635b885a209374da3f640d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5a5a2fee3e635b885a209374da3f640d">ole_method_sub</a></div><div class="ttdeci">static VALUE ole_method_sub(VALUE self, ITypeInfo *pOwnerTypeInfo, ITypeInfo *pTypeInfo, VALUE name)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04096">win32ole.c:4096</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a3c1d4bfc6a81af60bdcb48744c35f760"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="ttdeci">unsigned long VALUE</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00104">ruby.h:104</a></div></div> <div class="ttc" id="win32ole_8c_html_adb38101dbbf87cca73e5c61248472e32"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#adb38101dbbf87cca73e5c61248472e32">lcid</a></div><div class="ttdeci">static UINT LCID lcid</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00304">win32ole.c:304</a></div></div> <div class="ttc" id="nkf_8c_html_a5ea5ac7abf5cce39283e422add1067d5"><div class="ttname"><a href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a></div><div class="ttdeci">static VALUE result</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d90/nkf_8c_source.html#l00040">nkf.c:40</a></div></div> <div class="ttc" id="struct_i_event_sink_html_a3fb191019af6c5d374f02cead13abd4b"><div class="ttname"><a href="../../dc/d91/struct_i_event_sink.html#a3fb191019af6c5d374f02cead13abd4b">IEventSink::lpVtbl</a></div><div class="ttdeci">struct IEventSinkVtbl * lpVtbl</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00155">win32ole.c:155</a></div></div> <div class="ttc" id="win32ole_8c_html_ac443cf13c84997231c8cf7e81e682015"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac443cf13c84997231c8cf7e81e682015">vtdate2rbtime</a></div><div class="ttdeci">static VALUE vtdate2rbtime(double date)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00842">win32ole.c:842</a></div></div> <div class="ttc" id="win32ole_8c_html_a2f7320fdc7ec16f02bffe3ad3d996024"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2f7320fdc7ec16f02bffe3ad3d996024">free_enc2cp</a></div><div class="ttdeci">static void free_enc2cp(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l09071">win32ole.c:9071</a></div></div> <div class="ttc" id="win32ole_8c_html_a3aca3c33d649f21caec07ab0fac207ae"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3aca3c33d649f21caec07ab0fac207ae">folemethod_size_params</a></div><div class="ttdeci">static VALUE folemethod_size_params(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07122">win32ole.c:7122</a></div></div> <div class="ttc" id="win32ole_8c_html_a3e5e3cd75e1b8e8ca190dc84b7a232e4"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3e5e3cd75e1b8e8ca190dc84b7a232e4">ole_uninitialize</a></div><div class="ttdeci">void ole_uninitialize(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01211">win32ole.c:1211</a></div></div> <div class="ttc" id="win32ole_8c_html_a5a8802dcd54607ff45396c36e32da6f3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5a8802dcd54607ff45396c36e32da6f3">ENC_MACHING_CP</a></div><div class="ttdeci">#define ENC_MACHING_CP(enc, encname, cp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00861">win32ole.c:861</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a9444c431b3cb1184e7523fc572f2c758"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a9444c431b3cb1184e7523fc572f2c758">FIX2INT</a></div><div class="ttdeci">#define FIX2INT(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00624">ruby.h:624</a></div></div> <div class="ttc" id="win32ole_8c_html_a7c2765e64d70089c2227aa6fb7dc1eb0"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7c2765e64d70089c2227aa6fb7dc1eb0">g_nil_to</a></div><div class="ttdeci">static VARTYPE g_nil_to</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00240">win32ole.c:240</a></div></div> <div class="ttc" id="win32ole_8c_html_aee60a56e4ca92f2f597dbc14483ccfeb"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aee60a56e4ca92f2f597dbc14483ccfeb">fev_get_handler</a></div><div class="ttdeci">static VALUE fev_get_handler(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08631">win32ole.c:8631</a></div></div> <div class="ttc" id="win32ole_8c_html_a038baf72fddd2f2f0317efe9f0b4c2ad"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a038baf72fddd2f2f0317efe9f0b4c2ad">foletypelib_s_allocate</a></div><div class="ttdeci">static VALUE foletypelib_s_allocate(VALUE klass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05157">win32ole.c:5157</a></div></div> <div class="ttc" id="win32ole_8c_html_a9b6b7a1648ea3f09e2572eaa5ee4ca94"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9b6b7a1648ea3f09e2572eaa5ee4ca94">oletypelib_set_member</a></div><div class="ttdeci">static VALUE oletypelib_set_member(VALUE self, ITypeLib *pTypeLib)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04935">win32ole.c:4935</a></div></div> <div class="ttc" id="win32ole_8c_html_ac06e7f99025c41080bc6127bed3a933c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac06e7f99025c41080bc6127bed3a933c">dwRejectType</a></div><div class="ttdeci">static HTASK DWORD DWORD dwRejectType</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00666">win32ole.c:666</a></div></div> <div class="ttc" id="win32ole_8c_html_aa5d777648e7f6a6be4e3f2a2cb51f0d0"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa5d777648e7f6a6be4e3f2a2cb51f0d0">conv_51932</a></div><div class="ttdeci">#define conv_51932(cp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00958">win32ole.c:958</a></div></div> <div class="ttc" id="win32ole_8c_html_a3a0d9cd7ac70636cff4bfc3a398f9349"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3a0d9cd7ac70636cff4bfc3a398f9349">fole_s_get_locale</a></div><div class="ttdeci">static VALUE fole_s_get_locale(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03072">win32ole.c:3072</a></div></div> <div class="ttc" id="win32ole_8c_html_a63f5b3e6a1512326da04e41b6b0e5b78"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a63f5b3e6a1512326da04e41b6b0e5b78">ole_param_default</a></div><div class="ttdeci">static VALUE ole_param_default(ITypeInfo *pTypeInfo, UINT method_index, UINT index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07491">win32ole.c:7491</a></div></div> <div class="ttc" id="win32ole_8c_html_ae4836afb8566d0ed610b9360d6f50990"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae4836afb8566d0ed610b9360d6f50990">folemethod_return_vtype</a></div><div class="ttdeci">static VALUE folemethod_return_vtype(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06663">win32ole.c:6663</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_af86a62661fef3c00f697b8a1d37fd92a"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#af86a62661fef3c00f697b8a1d37fd92a">rb_call_super</a></div><div class="ttdeci">VALUE rb_call_super(int, const VALUE *)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d80/vm__eval_8c_source.html#l00273">vm_eval.c:273</a></div></div> <div class="ttc" id="structmy_c_p_i_n_f_o_e_x_html_ad1f4b72dcf5155a59ee238622798bf1c"><div class="ttname"><a href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html#ad1f4b72dcf5155a59ee238622798bf1c">myCPINFOEX::UnicodeDefaultChar</a></div><div class="ttdeci">WCHAR UnicodeDefaultChar</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01007">win32ole.c:1007</a></div></div> <div class="ttc" id="win32ole_8c_html_a19cdf5ad474e3d5a5e1eb768bc1863ab"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a19cdf5ad474e3d5a5e1eb768bc1863ab">ole_variable_ole_type_detail</a></div><div class="ttdeci">static VALUE ole_variable_ole_type_detail(ITypeInfo *pTypeInfo, UINT var_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06283">win32ole.c:6283</a></div></div> <div class="ttc" id="win32ole_8c_html_a434cf8ff2ac0a88549687089a80ffb01"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a434cf8ff2ac0a88549687089a80ffb01">fole_setproperty</a></div><div class="ttdeci">static VALUE fole_setproperty(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03867">win32ole.c:3867</a></div></div> <div class="ttc" id="eval_8c_html_a8061198378fb16adeb931f90540b2839"><div class="ttname"><a href="../../d3/d57/eval_8c.html#a8061198378fb16adeb931f90540b2839">rb_ensure</a></div><div class="ttdeci">VALUE rb_ensure(VALUE(*b_proc)(ANYARGS), VALUE data1, VALUE(*e_proc)(ANYARGS), VALUE data2)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d57/eval_8c_source.html#l00804">eval.c:804</a></div></div> <div class="ttc" id="win32ole_8c_html_aaf29c43a083c4cb50d8e2e24bdde16b6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aaf29c43a083c4cb50d8e2e24bdde16b6">foleparam_name</a></div><div class="ttdeci">static VALUE foleparam_name(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07320">win32ole.c:7320</a></div></div> <div class="ttc" id="win32ole_8c_html_a39508fb2e2d971ed2197b2df7e282e29"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a39508fb2e2d971ed2197b2df7e282e29">ole_method_helpcontext</a></div><div class="ttdeci">static VALUE ole_method_helpcontext(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07007">win32ole.c:7007</a></div></div> <div class="ttc" id="win32ole_8c_html_acf83d71ee993025e217320481f0c146d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#acf83d71ee993025e217320481f0c146d">ole_type_helpstring</a></div><div class="ttdeci">static VALUE ole_type_helpstring(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05856">win32ole.c:5856</a></div></div> <div class="ttc" id="win32ole_8c_html_a7262dc332f64e74ef33ab4f1c804f6d6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7262dc332f64e74ef33ab4f1c804f6d6">ole_variables</a></div><div class="ttdeci">static VALUE ole_variables(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06119">win32ole.c:6119</a></div></div> <div class="ttc" id="st_8h_html_a955c6e936b9681649ab9ffa4aa741949"><div class="ttname"><a href="../../dd/d24/st_8h.html#a955c6e936b9681649ab9ffa4aa741949">st_init_numtable</a></div><div class="ttdeci">st_table * st_init_numtable(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d4/d71/st_8c_source.html#l00272">st.c:272</a></div></div> <div class="ttc" id="win32ole_8c_html_ab6512944bd0c38ea0e27d10a7b44a4d5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab6512944bd0c38ea0e27d10a7b44a4d5">OLE_ADDREF</a></div><div class="ttdeci">#define OLE_ADDREF(X)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00111">win32ole.c:111</a></div></div> <div class="ttc" id="win32ole_8c_html_add636780fc2c908c73df7810de7f2ec3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#add636780fc2c908c73df7810de7f2ec3">ole_method_docinfo_from_type</a></div><div class="ttdeci">static VALUE ole_method_docinfo_from_type(ITypeInfo *pTypeInfo, UINT method_index, BSTR *name, BSTR *helpstr, DWORD *helpcontext, BSTR *helpfile)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06923">win32ole.c:6923</a></div></div> <div class="ttc" id="win32ole_8c_html_ac1a1bad5f7ad2818c0d660068ab44e8a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac1a1bad5f7ad2818c0d660068ab44e8a">foletypelib_s_typelibs</a></div><div class="ttdeci">static VALUE foletypelib_s_typelibs(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04973">win32ole.c:4973</a></div></div> <div class="ttc" id="win32ole_8c_html_ad2e1b59fa7e18c47b5de24b1a58b6ff7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad2e1b59fa7e18c47b5de24b1a58b6ff7">fev_s_allocate</a></div><div class="ttdeci">static VALUE fev_s_allocate(VALUE klass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08268">win32ole.c:8268</a></div></div> <div class="ttc" id="win32ole_8c_html_afb4c9ed3631f60150e25239a3a1a54e6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afb4c9ed3631f60150e25239a3a1a54e6">g_IsEventSinkVtblInitialized</a></div><div class="ttdeci">static BOOL g_IsEventSinkVtblInitialized</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07577">win32ole.c:7577</a></div></div> <div class="ttc" id="win32ole_8c_html_ab9a7923050876f53298475fba0ad03af"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab9a7923050876f53298475fba0ad03af">oleparam_ole_param_from_index</a></div><div class="ttdeci">static VALUE oleparam_ole_param_from_index(VALUE self, ITypeInfo *pTypeInfo, UINT method_index, int param_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07254">win32ole.c:7254</a></div></div> <div class="ttc" id="win32ole_8c_html_a9429c757d4fe15ece52d69edf0e094e2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9429c757d4fe15ece52d69edf0e094e2">foletypelib_initialize</a></div><div class="ttdeci">static VALUE foletypelib_initialize(VALUE self, VALUE args)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05194">win32ole.c:5194</a></div></div> <div class="ttc" id="win32ole_8c_html_a5032240cb2729bee87cc42cb5cc23695"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5032240cb2729bee87cc42cb5cc23695">fole_getproperty_with_bracket</a></div><div class="ttdeci">static VALUE fole_getproperty_with_bracket(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03889">win32ole.c:3889</a></div></div> <div class="ttc" id="win32ole_8c_html_a31f75b0afdb68143a0ea46798c10b413"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a31f75b0afdb68143a0ea46798c10b413">foletypelib_library_name</a></div><div class="ttdeci">static VALUE foletypelib_library_name(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05486">win32ole.c:5486</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ad80ce51081780f829134de0338821b76"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ad80ce51081780f829134de0338821b76">Data_Make_Struct</a></div><div class="ttdeci">#define Data_Make_Struct(klass, type, mark, free, sval)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01010">ruby.h:1010</a></div></div> <div class="ttc" id="intern_8h_html_a5c6c63c2619b8c03df2e173ef1e73846"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a5c6c63c2619b8c03df2e173ef1e73846">rb_respond_to</a></div><div class="ttdeci">int rb_respond_to(VALUE, ID)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/d63/vm__method_8c_source.html#l01598">vm_method.c:1598</a></div></div> <div class="ttc" id="win32ole_8c_html_aa277cd78a0fd28dcdbd08a2e93b36c34"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa277cd78a0fd28dcdbd08a2e93b36c34">oletype_free</a></div><div class="ttdeci">static void oletype_free(struct oletypedata *poletype)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01273">win32ole.c:1273</a></div></div> <div class="ttc" id="win32ole_8c_html_a75eb5195f049c793257cb535b69e3cf2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a75eb5195f049c793257cb535b69e3cf2">ole_each_sub</a></div><div class="ttdeci">static VALUE ole_each_sub(VALUE pEnumV)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03972">win32ole.c:3972</a></div></div> <div class="ttc" id="group__class_html_gad0eeed44f413060a2417852168747388"><div class="ttname"><a href="../../de/ddf/group__class.html#gad0eeed44f413060a2417852168747388">rb_define_module_under</a></div><div class="ttdeci">VALUE rb_define_module_under(VALUE outer, const char *name)</div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d0c/class_8c_source.html#l00626">class.c:626</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_afc32c1526ac6cb40ec33cad8782c0bae"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#afc32c1526ac6cb40ec33cad8782c0bae">StringValueCStr</a></div><div class="ttdeci">#define StringValueCStr(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00548">ruby.h:548</a></div></div> <div class="ttc" id="win32ole_8c_html_ab72c16ea0e701d5685275b1a9aed1585"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab72c16ea0e701d5685275b1a9aed1585">folemethod_offset_vtbl</a></div><div class="ttdeci">static VALUE folemethod_offset_vtbl(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07090">win32ole.c:7090</a></div></div> <div class="ttc" id="win32ole_8c_html_afb37c29e28b1f960fbf22b605993354d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afb37c29e28b1f960fbf22b605993354d">folemethod_s_allocate</a></div><div class="ttdeci">static VALUE folemethod_s_allocate(VALUE klass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06539">win32ole.c:6539</a></div></div> <div class="ttc" id="win32ole_8c_html_ac921f4ad75c62ef506c5d282bc39eb26"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac921f4ad75c62ef506c5d282bc39eb26">V_UNION1</a></div><div class="ttdeci">#define V_UNION1(X, Y)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00062">win32ole.c:62</a></div></div> <div class="ttc" id="structoletypedata_html_afee17d2dbf947f5d9c93f20dae00d07a"><div class="ttname"><a href="../../d9/d09/structoletypedata.html#afee17d2dbf947f5d9c93f20dae00d07a">oletypedata::pTypeInfo</a></div><div class="ttdeci">ITypeInfo * pTypeInfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00263">win32ole.c:263</a></div></div> <div class="ttc" id="structoleparam_html_a55c99892d6ede78495c4dc039d26b6ab"><div class="ttname"><a href="../../d2/d5d/structoleparam.html#a55c99892d6ede78495c4dc039d26b6ab">oleparam::dp</a></div><div class="ttdeci">DISPPARAMS dp</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00290">win32ole.c:290</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a3f0e4e2b6d073369cc1c2ddde00b13bb"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a3f0e4e2b6d073369cc1c2ddde00b13bb">RSTRING_PTR</a></div><div class="ttdeci">#define RSTRING_PTR(str)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00866">ruby.h:866</a></div></div> <div class="ttc" id="win32ole_8c_html_ae28d7243617fdad03119e7f82193726d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae28d7243617fdad03119e7f82193726d">V_INT</a></div><div class="ttdeci">#define V_INT(X)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00085">win32ole.c:85</a></div></div> <div class="ttc" id="win32ole_8c_html_aefa742f168b66b0f6f438656c8704e0a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aefa742f168b66b0f6f438656c8704e0a">find_coclass</a></div><div class="ttdeci">static HRESULT find_coclass(ITypeInfo *pTypeInfo, TYPEATTR *pTypeAttr, ITypeInfo **pTypeInfo2, TYPEATTR **pTypeAttr2)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08060">win32ole.c:8060</a></div></div> <div class="ttc" id="structolemethoddata_html"><div class="ttname"><a href="../../d4/df4/structolemethoddata.html">olemethoddata</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00266">win32ole.c:266</a></div></div> <div class="ttc" id="win32ole_8c_html_a2fdc77d63c0a1d101a2597e9d13da037"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2fdc77d63c0a1d101a2597e9d13da037">foletype_initialize</a></div><div class="ttdeci">static VALUE foletype_initialize(VALUE self, VALUE typelib, VALUE oleclass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05556">win32ole.c:5556</a></div></div> <div class="ttc" id="win32ole_8c_html_a83b4d0c7361c567ebe70479b937c3a7d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a83b4d0c7361c567ebe70479b937c3a7d">fole_each</a></div><div class="ttdeci">static VALUE fole_each(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04010">win32ole.c:4010</a></div></div> <div class="ttc" id="win32ole_8c_html_a2af0935d4ce085aa2320acd37d10cec5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2af0935d4ce085aa2320acd37d10cec5">ary_ole_event</a></div><div class="ttdeci">static VALUE ary_ole_event</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00215">win32ole.c:215</a></div></div> <div class="ttc" id="encoding_8c_html_ac21ed764f3b39453b6a848dd64a19585"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#ac21ed764f3b39453b6a848dd64a19585">rb_enc_get</a></div><div class="ttdeci">rb_encoding * rb_enc_get(VALUE obj)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l00772">encoding.c:772</a></div></div> <div class="ttc" id="structoleeventdata_html"><div class="ttname"><a href="../../d1/d5d/structoleeventdata.html">oleeventdata</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00283">win32ole.c:283</a></div></div> <div class="ttc" id="encoding_8c_html_a439227feff9d7f55384e8780cfc2eb82"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a></div><div class="ttdeci">int size</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l00052">encoding.c:52</a></div></div> <div class="ttc" id="structoletypedata_html"><div class="ttname"><a href="../../d9/d09/structoletypedata.html">oletypedata</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00262">win32ole.c:262</a></div></div> <div class="ttc" id="structoleeventdata_html_ae70fbdd278d71d8deb0ab81de2b82d82"><div class="ttname"><a href="../../d1/d5d/structoleeventdata.html#ae70fbdd278d71d8deb0ab81de2b82d82">oleeventdata::dwCookie</a></div><div class="ttdeci">DWORD dwCookie</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00284">win32ole.c:284</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ac55fae7f748afd3fc2533d0d7d06cf5a"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ac55fae7f748afd3fc2533d0d7d06cf5a">INT2FIX</a></div><div class="ttdeci">#define INT2FIX(i)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00241">ruby.h:241</a></div></div> <div class="ttc" id="win32ole_8c_html_ab09baffb3870e6f212e36f9b8e6709dc"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab09baffb3870e6f212e36f9b8e6709dc">ppvObject</a></div><div class="ttdeci">static REFIID void __RPC_FAR *__RPC_FAR * ppvObject</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00300">win32ole.c:300</a></div></div> <div class="ttc" id="win32ole_8c_html_aa950c6bbb9d7caab6d6a468386e07d0a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa950c6bbb9d7caab6d6a468386e07d0a">pIMultiLanguage</a></div><div class="ttdeci">#define pIMultiLanguage</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00251">win32ole.c:251</a></div></div> <div class="ttc" id="win32ole_8c_html_ac95137c8f13aece1fc5c9e6480062b68"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac95137c8f13aece1fc5c9e6480062b68">folemethod_params</a></div><div class="ttdeci">static VALUE folemethod_params(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07214">win32ole.c:7214</a></div></div> <div class="ttc" id="win32ole_8c_html_af8996048ad14314fa7aef6d4d775731b"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af8996048ad14314fa7aef6d4d775731b">fole_respond_to</a></div><div class="ttdeci">static VALUE fole_respond_to(VALUE self, VALUE method)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04519">win32ole.c:4519</a></div></div> <div class="ttc" id="error_8c_html_a4989eeb5742cad6359a2ed77859674de"><div class="ttname"><a href="../../db/dcc/error_8c.html#a4989eeb5742cad6359a2ed77859674de">rb_exc_new3</a></div><div class="ttdeci">VALUE rb_exc_new3(VALUE etype, VALUE str)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00553">error.c:553</a></div></div> <div class="ttc" id="win32ole_8c_html_a166bbd1a777de2ab0652286ee16e3268"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a166bbd1a777de2ab0652286ee16e3268">HWND</a></div><div class="ttdeci">IUnknown COSERVERINFO MULTI_QI *typedef HWND(WINAPI FNHTMLHELP)(HWND hwndCaller</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00151">win32ole.c:151</a></div></div> <div class="ttc" id="win32ole_8c_html_aaed28da1a2098bc9ce356c985343e7e2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aaed28da1a2098bc9ce356c985343e7e2">fole_s_free</a></div><div class="ttdeci">static VALUE fole_s_free(VALUE self, VALUE obj)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02930">win32ole.c:2930</a></div></div> <div class="ttc" id="intern_8h_html_a7b330d2905c5f0c9a68cef4ebba5c00f"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a7b330d2905c5f0c9a68cef4ebba5c00f">rb_block_proc</a></div><div class="ttdeci">VALUE rb_block_proc(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/dda/proc_8c_source.html#l00458">proc.c:458</a></div></div> <div class="ttc" id="structoledata_html_ac4911badab52db094040be4478478f19"><div class="ttname"><a href="../../d1/d03/structoledata.html#ac4911badab52db094040be4478478f19">oledata::pDispatch</a></div><div class="ttdeci">IDispatch * pDispatch</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00255">win32ole.c:255</a></div></div> <div class="ttc" id="win32ole_8c_html_a48d8b1cc07f16cca172b8d1396b023fb"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a48d8b1cc07f16cca172b8d1396b023fb">OLE_RELEASE</a></div><div class="ttdeci">#define OLE_RELEASE(X)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00109">win32ole.c:109</a></div></div> <div class="ttc" id="win32ole_8c_html_a7fc54792903a9ce527a0fb17cfdc73df"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7fc54792903a9ce527a0fb17cfdc73df">pDispParams</a></div><div class="ttdeci">static DISPID REFIID LCID WORD DISPPARAMS __RPC_FAR * pDispParams</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00306">win32ole.c:306</a></div></div> <div class="ttc" id="win32ole_8c_html_a3a1ed8da3d94576991195fd8e9e13760"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3a1ed8da3d94576991195fd8e9e13760">HRESULT</a></div><div class="ttdeci">typedef HRESULT(STDAPICALLTYPE FNCOCREATEINSTANCEEX)(REFCLSID</div></div> <div class="ttc" id="ruby_2ruby_8h_html_a76a842035af1200c4d9d124d0eba2b95"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a76a842035af1200c4d9d124d0eba2b95">rb_event_flag_t</a></div><div class="ttdeci">unsigned long rb_event_flag_t</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01603">ruby.h:1603</a></div></div> <div class="ttc" id="hash_8c_html_ab7063832c7ed02351e87922a78e35c32"><div class="ttname"><a href="../../d1/d04/hash_8c.html#ab7063832c7ed02351e87922a78e35c32">rb_hash_aref</a></div><div class="ttdeci">VALUE rb_hash_aref(VALUE hash, VALUE key)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d04/hash_8c_source.html#l00570">hash.c:570</a></div></div> <div class="ttc" id="win32ole_8c_html_a56ab313527b706f895cb18faf492cdf4"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a56ab313527b706f895cb18faf492cdf4">gCoCreateInstanceEx</a></div><div class="ttdeci">static FNCOCREATEINSTANCEEX * gCoCreateInstanceEx</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00232">win32ole.c:232</a></div></div> <div class="ttc" id="struct_i_event_sink_vtbl_html"><div class="ttname"><a href="../../de/d78/struct_i_event_sink_vtbl.html">IEventSinkVtbl</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00160">win32ole.c:160</a></div></div> <div class="ttc" id="win32ole_8c_html_a5c16d87bf1711b15fc92a2a26773a3ea"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5c16d87bf1711b15fc92a2a26773a3ea">folevariant_s_array</a></div><div class="ttdeci">static VALUE folevariant_s_array(VALUE klass, VALUE dims, VALUE vvt)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08673">win32ole.c:8673</a></div></div> <div class="ttc" id="random_8c_html_a742229490b6759a90ece7ba82ba129d5"><div class="ttname"><a href="../../dc/de5/random_8c.html#a742229490b6759a90ece7ba82ba129d5">key</a></div><div class="ttdeci">uint8_t key[16]</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/de5/random_8c_source.html#l01370">random.c:1370</a></div></div> <div class="ttc" id="win32ole_8c_html_a665b5523cc0e231007032717b03d1c50"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a665b5523cc0e231007032717b03d1c50">EVENTSINK_GetTypeInfo</a></div><div class="ttdeci">STDMETHODIMP EVENTSINK_GetTypeInfo(PEVENTSINK pEV, UINT info, LCID lcid, ITypeInfo **pInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07627">win32ole.c:7627</a></div></div> <div class="ttc" id="win32ole_8c_html_a43b0f9585d36ca61eb5ecd98fad874d7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a43b0f9585d36ca61eb5ecd98fad874d7">ary2ptr_dispparams</a></div><div class="ttdeci">static void ary2ptr_dispparams(VALUE ary, DISPPARAMS *pdispparams)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07771">win32ole.c:7771</a></div></div> <div class="ttc" id="nkf-utf8_2nkf_8c_html_a5ca52e6ec2d4e7b75c2799e4f500bd2a"><div class="ttname"><a href="../../d6/da0/nkf-utf8_2nkf_8c.html#a5ca52e6ec2d4e7b75c2799e4f500bd2a">ev</a></div><div class="ttdeci">static const unsigned char ev[]</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/da0/nkf-utf8_2nkf_8c_source.html#l00607">nkf.c:607</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a22a8c2a4bbaae9b68f65c9bb92fd4e39"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a22a8c2a4bbaae9b68f65c9bb92fd4e39">T_STRING</a></div><div class="ttdeci">#define T_STRING</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00490">ruby.h:490</a></div></div> <div class="ttc" id="win32ole_8c_html_a3c5d3561abdd51b3a85d88c44603876b"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a3c5d3561abdd51b3a85d88c44603876b">exec_callback</a></div><div class="ttdeci">static VALUE exec_callback(VALUE arg)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07784">win32ole.c:7784</a></div></div> <div class="ttc" id="win32ole_8c_html_a31a904a59156f31da8443d0d06ad1154"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a31a904a59156f31da8443d0d06ad1154">find_iid</a></div><div class="ttdeci">static HRESULT find_iid(VALUE ole, char *pitf, IID *piid, ITypeInfo **ppTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07949">win32ole.c:7949</a></div></div> <div class="ttc" id="win32ole_8c_html_a2e6e042a244e5434dd410a469ed351c9"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2e6e042a244e5434dd410a469ed351c9">folevariable_name</a></div><div class="ttdeci">static VALUE folevariable_name(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06235">win32ole.c:6235</a></div></div> <div class="ttc" id="win32ole_8c_html_a5f5d58cfaa0e32882b5533677620dd93"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a5f5d58cfaa0e32882b5533677620dd93">ole_bind_obj</a></div><div class="ttdeci">static VALUE ole_bind_obj(VALUE moniker, int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02663">win32ole.c:2663</a></div></div> <div class="ttc" id="win32ole_8c_html_aa01105060883846e72031eed6131b7d7"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa01105060883846e72031eed6131b7d7">foletypelib_inspect</a></div><div class="ttdeci">static VALUE foletypelib_inspect(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05533">win32ole.c:5533</a></div></div> <div class="ttc" id="win32ole_8c_html_ac4055e3a20b6b3af3d10590ea446ef6c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac4055e3a20b6b3af3d10590ea446ef6c">v</a></div><div class="ttdeci">v</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00798">win32ole.c:798</a></div></div> <div class="ttc" id="win32ole_8c_html_a1c2427bf2f78d7dc92d556bea85123ce"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1c2427bf2f78d7dc92d556bea85123ce">fole_query_interface</a></div><div class="ttdeci">static VALUE fole_query_interface(VALUE self, VALUE str_iid)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04474">win32ole.c:4474</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a9ab816c37c9173898ff256b7be9e5ea9"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a9ab816c37c9173898ff256b7be9e5ea9">T_FALSE</a></div><div class="ttdeci">#define T_FALSE</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00499">ruby.h:499</a></div></div> <div class="ttc" id="win32ole_8c_html_a6cb22e9353278e4211435ac709a92a66"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6cb22e9353278e4211435ac709a92a66">reference_count</a></div><div class="ttdeci">static ULONG reference_count(struct oledata *pole)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02894">win32ole.c:2894</a></div></div> <div class="ttc" id="win32ole_8c_html_a93abd4f6b8ab587be4f474c40cc630f1"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a93abd4f6b8ab587be4f474c40cc630f1">ole_event_free</a></div><div class="ttdeci">static void ole_event_free(struct oleeventdata *poleev)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08257">win32ole.c:8257</a></div></div> <div class="ttc" id="win32ole_8c_html_ae383fe3eb9655495e30cac84b29e6168"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae383fe3eb9655495e30cac84b29e6168">foletype_ole_typelib</a></div><div class="ttdeci">static VALUE foletype_ole_typelib(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05985">win32ole.c:5985</a></div></div> <div class="ttc" id="win32ole_8c_html_adf669ce09db7c38c26c9a1ee0e8e85d8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#adf669ce09db7c38c26c9a1ee0e8e85d8">hash2result</a></div><div class="ttdeci">static VALUE hash2result(VALUE hash)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07761">win32ole.c:7761</a></div></div> <div class="ttc" id="win32ole_8c_html_ac55a53518c2466ce34726828649d10bc"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac55a53518c2466ce34726828649d10bc">ole_method_helpstring</a></div><div class="ttdeci">static VALUE ole_method_helpstring(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06945">win32ole.c:6945</a></div></div> <div class="ttc" id="win32ole_8c_html_a4b75e2f9c1ab1d0efeae3781011c699a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4b75e2f9c1ab1d0efeae3781011c699a">rescue_callback</a></div><div class="ttdeci">static VALUE rescue_callback(VALUE arg)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07794">win32ole.c:7794</a></div></div> <div class="ttc" id="win32ole_8c_html_af476ba7b3bb2b432ef6e7e772ec7a6f8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#af476ba7b3bb2b432ef6e7e772ec7a6f8">folemethod_helpstring</a></div><div class="ttdeci">static VALUE folemethod_helpstring(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06968">win32ole.c:6968</a></div></div> <div class="ttc" id="win32ole_8c_html_adf6ebc9719fb08963aa1e8bc253e7f33"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#adf6ebc9719fb08963aa1e8bc253e7f33">ole_method_return_type</a></div><div class="ttdeci">static VALUE ole_method_return_type(ITypeInfo *pTypeInfo, UINT method_index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06603">win32ole.c:6603</a></div></div> <div class="ttc" id="st_8h_html"><div class="ttname"><a href="../../dd/d24/st_8h.html">st.h</a></div></div> <div class="ttc" id="array_8c_html_a9569be4d3661f4ce54bf56b12a2d98a8"><div class="ttname"><a href="../../dc/dcc/array_8c.html#a9569be4d3661f4ce54bf56b12a2d98a8">rb_ary_concat</a></div><div class="ttdeci">VALUE rb_ary_concat(VALUE x, VALUE y)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/dcc/array_8c_source.html#l03370">array.c:3370</a></div></div> <div class="ttc" id="win32ole_8c_html_a404f0efd20319871321d1ef285d37ecc"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a404f0efd20319871321d1ef285d37ecc">cWIN32OLE_METHOD</a></div><div class="ttdeci">VALUE cWIN32OLE_METHOD</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00207">win32ole.c:207</a></div></div> <div class="ttc" id="structolemethoddata_html_a03fa433605c2b3eefa11a58d8ef1586e"><div class="ttname"><a href="../../d4/df4/structolemethoddata.html#a03fa433605c2b3eefa11a58d8ef1586e">olemethoddata::index</a></div><div class="ttdeci">UINT index</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00269">win32ole.c:269</a></div></div> <div class="ttc" id="win32ole_8c_html_aa1d0781d2d7caceef543c9e4d584c614"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa1d0781d2d7caceef543c9e4d584c614">ole_type_src_type</a></div><div class="ttdeci">static VALUE ole_type_src_type(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05884">win32ole.c:5884</a></div></div> <div class="ttc" id="lex_8c_html_a5541f85ce416df233cce93949f0eeeca"><div class="ttname"><a href="../../d3/deb/lex_8c.html#a5541f85ce416df233cce93949f0eeeca">hash</a></div><div class="ttdeci">static unsigned int hash(const char *str, unsigned int len)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/deb/lex_8c_source.html#l00056">lex.c:56</a></div></div> <div class="ttc" id="win32ole_8c_html_ac7331f65815deaeea30dc7a834594148"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac7331f65815deaeea30dc7a834594148">WIN32OLE_VERSION</a></div><div class="ttdeci">#define WIN32OLE_VERSION</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00146">win32ole.c:146</a></div></div> <div class="ttc" id="intern_8h_html_ad174dd963d99ac27a67c8ef9cfa1eb58"><div class="ttname"><a href="../../db/d2e/intern_8h.html#ad174dd963d99ac27a67c8ef9cfa1eb58">RETURN_ENUMERATOR</a></div><div class="ttdeci">#define RETURN_ENUMERATOR(obj, argc, argv)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d2e/intern_8h_source.html#l00220">intern.h:220</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a0381640e2905c1b3e104194f91697ca4"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a0381640e2905c1b3e104194f91697ca4">SafeStringValue</a></div><div class="ttdeci">#define SafeStringValue(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00552">ruby.h:552</a></div></div> <div class="ttc" id="win32ole_8c_html_a8c70df438e210da751d123ceed590ed3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a8c70df438e210da751d123ceed590ed3">ole_ienum_free</a></div><div class="ttdeci">static VALUE ole_ienum_free(VALUE pEnumV)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03988">win32ole.c:3988</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_ad04c63d175774c6d6e7dfaf0f0a982c9"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ad04c63d175774c6d6e7dfaf0f0a982c9">T_CLASS</a></div><div class="ttdeci">#define T_CLASS</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00486">ruby.h:486</a></div></div> <div class="ttc" id="encoding_8h_html_a6707b730597e0e614213beb11670aca2"><div class="ttname"><a href="../../d5/de3/encoding_8h.html#a6707b730597e0e614213beb11670aca2">rb_enc_str_new</a></div><div class="ttdeci">VALUE rb_enc_str_new(const char *, long, rb_encoding *)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l00439">string.c:439</a></div></div> <div class="ttc" id="tcltklib_8c_html_a6f520624fabb8332dc98fd223491bf8d"><div class="ttname"><a href="../../d5/d9d/tcltklib_8c.html#a6f520624fabb8332dc98fd223491bf8d">rb_safe_level</a></div><div class="ttdeci">#define rb_safe_level()</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d9d/tcltklib_8c_source.html#l00094">tcltklib.c:94</a></div></div> <div class="ttc" id="win32ole_8c_html_a11c9249c3a3713391907080d3e9d9d9b"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a11c9249c3a3713391907080d3e9d9d9b">foletypelib_version</a></div><div class="ttdeci">static VALUE foletypelib_version(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05298">win32ole.c:5298</a></div></div> <div class="ttc" id="win32ole_8c_html_a168b5a800d629d56514b2a19d39cb4a0"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a168b5a800d629d56514b2a19d39cb4a0">ole_freeexceptinfo</a></div><div class="ttdeci">static void ole_freeexceptinfo(EXCEPINFO *pExInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01143">win32ole.c:1143</a></div></div> <div class="ttc" id="nkf-utf8_2nkf_8c_html_a8f8f80d37794cde9472343e4487ba3eb"><div class="ttname"><a href="../../d6/da0/nkf-utf8_2nkf_8c.html#a8f8f80d37794cde9472343e4487ba3eb">name</a></div><div class="ttdeci">const char * name</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/da0/nkf-utf8_2nkf_8c_source.html#l00208">nkf.c:208</a></div></div> <div class="ttc" id="structoleparam_html"><div class="ttname"><a href="../../d2/d5d/structoleparam.html">oleparam</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00289">win32ole.c:289</a></div></div> <div class="ttc" id="win32ole_8c_html_a0ce01fae8d4199ffd5f3df63cf0796f8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a0ce01fae8d4199ffd5f3df63cf0796f8">id_events</a></div><div class="ttdeci">static ID id_events</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00216">win32ole.c:216</a></div></div> <div class="ttc" id="ripper_8c_html_a877bc58c495643fcf49dc64c44631e72"><div class="ttname"><a href="../../d5/d11/ripper_8c.html#a877bc58c495643fcf49dc64c44631e72">rb_id2name</a></div><div class="ttdeci">const char * rb_id2name(ID id)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d11/ripper_8c_source.html#l17012">ripper.c:17012</a></div></div> <div class="ttc" id="tcltklib_8c_html_a89cd18829599d193ee75073219cc42c4"><div class="ttname"><a href="../../d5/d9d/tcltklib_8c.html#a89cd18829599d193ee75073219cc42c4">rb_errinfo</a></div><div class="ttdeci">#define rb_errinfo()</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d9d/tcltklib_8c_source.html#l00089">tcltklib.c:89</a></div></div> <div class="ttc" id="win32ole_8c_html_ad29426bf12565d8dea6e3f00828e8aa8"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad29426bf12565d8dea6e3f00828e8aa8">g_cp_installed</a></div><div class="ttdeci">static BOOL g_cp_installed</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00228">win32ole.c:228</a></div></div> <div class="ttc" id="st_8h_html_a1c527e6d80aae369aeda64b1080e5feb"><div class="ttname"><a href="../../dd/d24/st_8h.html#a1c527e6d80aae369aeda64b1080e5feb">st_data_t</a></div><div class="ttdeci">unsigned long st_data_t</div><div class="ttdef"><b>Definition:</b> <a href="../../dd/d24/st_8h_source.html#l00035">st.h:35</a></div></div> <div class="ttc" id="win32ole_8c_html_ae417975d2b4b01e9dc4e53b1da0a0725"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae417975d2b4b01e9dc4e53b1da0a0725">puArgErr</a></div><div class="ttdeci">static DISPID REFIID LCID WORD DISPPARAMS __RPC_FAR VARIANT __RPC_FAR EXCEPINFO __RPC_FAR UINT __RPC_FAR * puArgErr</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00306">win32ole.c:306</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a2665a51abbd5b49c15abff3df00fa9db"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a2665a51abbd5b49c15abff3df00fa9db">StringValuePtr</a></div><div class="ttdeci">#define StringValuePtr(v)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00547">ruby.h:547</a></div></div> <div class="ttc" id="win32ole_8c_html_ad362e99b0e786cf59de8ca21b1509d9e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad362e99b0e786cf59de8ca21b1509d9e">folevariable_visible</a></div><div class="ttdeci">static VALUE folevariable_visible(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06399">win32ole.c:6399</a></div></div> <div class="ttc" id="win32ole_8c_html_ad1e2b29b5891bd4a824d39829ad426b4"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ad1e2b29b5891bd4a824d39829ad426b4">pszFile</a></div><div class="ttdeci">IUnknown COSERVERINFO MULTI_QI *typedef LPCSTR pszFile</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00151">win32ole.c:151</a></div></div> <div class="ttc" id="win32ole_8c_html_ab92641d2d72c638085831df508b86b3f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab92641d2d72c638085831df508b86b3f">make_version_str</a></div><div class="ttdeci">static VALUE make_version_str(VALUE major, VALUE minor)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05017">win32ole.c:5017</a></div></div> <div class="ttc" id="win32ole_8c_html_a36c9f535c0f4434cb2e2fea56e393384"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a36c9f535c0f4434cb2e2fea56e393384">V_I1REF</a></div><div class="ttdeci">#define V_I1REF(X)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00077">win32ole.c:77</a></div></div> <div class="ttc" id="win32ole_8c_html_a9cea82cbb2a01224a9e29ffe96527062"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9cea82cbb2a01224a9e29ffe96527062">ppTInfo</a></div><div class="ttdeci">static UINT LCID ITypeInfo __RPC_FAR *__RPC_FAR * ppTInfo</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00304">win32ole.c:304</a></div></div> <div class="ttc" id="win32ole_8c_html_aa5ae74eca026324684e8f1dbf7628000"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa5ae74eca026324684e8f1dbf7628000">cWIN32OLE_VARIANT</a></div><div class="ttdeci">VALUE cWIN32OLE_VARIANT</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00210">win32ole.c:210</a></div></div> <div class="ttc" id="win32ole_8c_html_ac0c506b36e89c160b8d9bb7b5877a103"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac0c506b36e89c160b8d9bb7b5877a103">ole_type_minor_version</a></div><div class="ttdeci">static VALUE ole_type_minor_version(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05795">win32ole.c:5795</a></div></div> <div class="ttc" id="win32ole_8c_html_a7f8945d4358f512f72dcfc6a0298bd1c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7f8945d4358f512f72dcfc6a0298bd1c">fole_initialize</a></div><div class="ttdeci">static VALUE fole_initialize(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03226">win32ole.c:3226</a></div></div> <div class="ttc" id="win32ole_8c_html_a2e4070a13ab6ee3c4453a57d34362a91"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2e4070a13ab6ee3c4453a57d34362a91">oletypelib_from_guid</a></div><div class="ttdeci">static HRESULT oletypelib_from_guid(VALUE guid, VALUE version, ITypeLib **ppTypeLib)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05392">win32ole.c:5392</a></div></div> <div class="ttc" id="win32ole_8c_html_ae43f1fc4a286d2f2a50d541a8ece113e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae43f1fc4a286d2f2a50d541a8ece113e">cWIN32OLE_VARIABLE</a></div><div class="ttdeci">VALUE cWIN32OLE_VARIABLE</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00206">win32ole.c:206</a></div></div> <div class="ttc" id="win32ole_8c_html_a8b4f3db715ec27ff1b90d5a594e17556"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a8b4f3db715ec27ff1b90d5a594e17556">foletype_typekind</a></div><div class="ttdeci">static VALUE foletype_typekind(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05848">win32ole.c:5848</a></div></div> <div class="ttc" id="win32ole_8c_html_a1da4b972b6e7529b70cadb6077838ad2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1da4b972b6e7529b70cadb6077838ad2">V_UINT</a></div><div class="ttdeci">#define V_UINT(X)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00093">win32ole.c:93</a></div></div> <div class="ttc" id="encoding_8c_html_adeb5f5b97ea43528a55d717add8f64c5"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#adeb5f5b97ea43528a55d717add8f64c5">rb_enc_find_index</a></div><div class="ttdeci">int rb_enc_find_index(const char *name)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l00635">encoding.c:635</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a5133348f689646af76f8fe8e0af547f5"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a5133348f689646af76f8fe8e0af547f5">RSTRING_LENINT</a></div><div class="ttdeci">#define RSTRING_LENINT(str)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00874">ruby.h:874</a></div></div> <div class="ttc" id="win32ole_8c_html_a9db8ac32bad3c759b157b41456e1c32a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9db8ac32bad3c759b157b41456e1c32a">ole_free</a></div><div class="ttdeci">static void ole_free(struct oledata *pole)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01259">win32ole.c:1259</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a98b91af598acb64fe8497413ce498766"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a98b91af598acb64fe8497413ce498766">rb_secure</a></div><div class="ttdeci">void rb_secure(int)</div><div class="ttdef"><b>Definition:</b> <a href="../../da/d2d/safe_8c_source.html#l00079">safe.c:79</a></div></div> <div class="ttc" id="win32ole_8c_html_a23d7c602c87c1e61b5495de603979936"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a23d7c602c87c1e61b5495de603979936">folevariant_vartype</a></div><div class="ttdeci">static VALUE folevariant_vartype(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l09028">win32ole.c:9028</a></div></div> <div class="ttc" id="win32ole_8c_html_a9ac8207bb0ee9c5e02c8a012cc00d4e2"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9ac8207bb0ee9c5e02c8a012cc00d4e2">fole_s_create_guid</a></div><div class="ttdeci">static VALUE fole_s_create_guid(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03133">win32ole.c:3133</a></div></div> <div class="ttc" id="win32ole_8c_html_a7601c0e4082bdf69b36e4b712c71d849"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a7601c0e4082bdf69b36e4b712c71d849">foletype_variables</a></div><div class="ttdeci">static VALUE foletype_variables(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06181">win32ole.c:6181</a></div></div> <div class="ttc" id="nkf-utf8_2nkf_8c_html_a4fbbbc8d035c85ce83c6f270a2e56012"><div class="ttname"><a href="../../d6/da0/nkf-utf8_2nkf_8c.html#a4fbbbc8d035c85ce83c6f270a2e56012">version</a></div><div class="ttdeci">static void version(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/da0/nkf-utf8_2nkf_8c_source.html#l00898">nkf.c:898</a></div></div> <div class="ttc" id="intern_8h_html_abee4398ccf077c9cab2d51c5d2d25c22"><div class="ttname"><a href="../../db/d2e/intern_8h.html#abee4398ccf077c9cab2d51c5d2d25c22">rb_str_intern</a></div><div class="ttdeci">VALUE rb_str_intern(VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l07229">string.c:7229</a></div></div> <div class="ttc" id="win32ole_8c_html_a71135dca3dcc348b7732333f34ef4bf3"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a71135dca3dcc348b7732333f34ef4bf3">ole_param_ole_type</a></div><div class="ttdeci">static VALUE ole_param_ole_type(ITypeInfo *pTypeInfo, UINT method_index, UINT index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07326">win32ole.c:7326</a></div></div> <div class="ttc" id="tcltklib_8c_html_ac8947941479c38403a09c14a60b03f01"><div class="ttname"><a href="../../d5/d9d/tcltklib_8c.html#ac8947941479c38403a09c14a60b03f01">major</a></div><div class="ttdeci">int major</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d9d/tcltklib_8c_source.html#l00109">tcltklib.c:109</a></div></div> <div class="ttc" id="win32ole_8c_html_afe5e741ee07fdc09159777facba855b5"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#afe5e741ee07fdc09159777facba855b5">ole_init_cp</a></div><div class="ttdeci">static UINT ole_init_cp(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00990">win32ole.c:990</a></div></div> <div class="ttc" id="win32ole_8c_html_a4c2d586120bd8d98112b6be60e4f8294"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4c2d586120bd8d98112b6be60e4f8294">foleparam_optional</a></div><div class="ttdeci">static VALUE foleparam_optional(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07463">win32ole.c:7463</a></div></div> <div class="ttc" id="win32ole_8c_html_a251af5930d14dc9c03f0ec689aaae38f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a251af5930d14dc9c03f0ec689aaae38f">ary2safe_array_index</a></div><div class="ttdeci">static long * ary2safe_array_index(int ary_size, VALUE *ary, SAFEARRAY *psa)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08810">win32ole.c:8810</a></div></div> <div class="ttc" id="win32ole_8c_html_a2f15f8ec2d25451fb0a2d74f0f2a1b7f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2f15f8ec2d25451fb0a2d74f0f2a1b7f">folemethod_visible</a></div><div class="ttdeci">static VALUE folemethod_visible(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06805">win32ole.c:6805</a></div></div> <div class="ttc" id="win32ole_8c_html_a1c8f62bc38a50376a62d4dad41a5e2aa"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1c8f62bc38a50376a62d4dad41a5e2aa">S_OK</a></div><div class="ttdeci">return S_OK</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00769">win32ole.c:769</a></div></div> <div class="ttc" id="win32ole_8c_html_a14cb47d02a4ed02a22e79f9bcde90278"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a14cb47d02a4ed02a22e79f9bcde90278">dispIdMember</a></div><div class="ttdeci">static DISPID dispIdMember</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00306">win32ole.c:306</a></div></div> <div class="ttc" id="win32ole_8c_html_a706315e5584d6b78f05590053987b134"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a706315e5584d6b78f05590053987b134">previous_filter</a></div><div class="ttdeci">static IMessageFilter * previous_filter</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00244">win32ole.c:244</a></div></div> <div class="ttc" id="gc_8c_html_a5489730b418f25891238cfea5cdaa531"><div class="ttname"><a href="../../d8/d16/gc_8c.html#a5489730b418f25891238cfea5cdaa531">rb_mark_hash</a></div><div class="ttdeci">void rb_mark_hash(st_table *tbl)</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d16/gc_8c_source.html#l02413">gc.c:2413</a></div></div> <div class="ttc" id="array_8c_html_a9cfa42d4b79c89d68c53be8b2150a503"><div class="ttname"><a href="../../dc/dcc/array_8c.html#a9cfa42d4b79c89d68c53be8b2150a503">rb_intern</a></div><div class="ttdeci">#define rb_intern(str)</div></div> <div class="ttc" id="structolevariabledata_html"><div class="ttname"><a href="../../d2/d9a/structolevariabledata.html">olevariabledata</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00272">win32ole.c:272</a></div></div> <div class="ttc" id="win32ole_8c_html_ac4baf3ffd7d85c0541bb0313f6da9b5d"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac4baf3ffd7d85c0541bb0313f6da9b5d">val2variant_ptr</a></div><div class="ttdeci">static VOID * val2variant_ptr(VALUE val, VARIANT *var, VARTYPE vt)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08895">win32ole.c:8895</a></div></div> <div class="ttc" id="win32ole_8c_html_a1132f433eef2a0ab23bdf4d990799dc4"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1132f433eef2a0ab23bdf4d990799dc4">oletypelib_path</a></div><div class="ttdeci">static VALUE oletypelib_path(VALUE guid, VALUE version)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05359">win32ole.c:5359</a></div></div> <div class="ttc" id="intern_8h_html_a13e29e5637f1d2fdf778399849da0d34"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a13e29e5637f1d2fdf778399849da0d34">rb_vsprintf</a></div><div class="ttdeci">VALUE rb_vsprintf(const char *, va_list)</div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d2d/sprintf_8c_source.html#l01269">sprintf.c:1269</a></div></div> <div class="ttc" id="win32ole_8c_html_aa3eea8970bbdd932344cbf86e9bbe95c"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aa3eea8970bbdd932344cbf86e9bbe95c">ole_msg_loop</a></div><div class="ttdeci">static void ole_msg_loop(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01250">win32ole.c:1250</a></div></div> <div class="ttc" id="__sdbm_8c_html_a070d2ce7b6bb7e5c05602aa8c308d0c4"><div class="ttname"><a href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a></div><div class="ttdeci">#define NULL</div><div class="ttdef"><b>Definition:</b> <a href="../../d4/db0/__sdbm_8c_source.html#l00102">_sdbm.c:102</a></div></div> <div class="ttc" id="intern_8h_html_ad5e50a405c25d3df6ce1efc754478529"><div class="ttname"><a href="../../db/d2e/intern_8h.html#ad5e50a405c25d3df6ce1efc754478529">rb_hash_aset</a></div><div class="ttdeci">VALUE rb_hash_aset(VALUE, VALUE, VALUE)</div></div> <div class="ttc" id="win32ole_8c_html_ada8d032e43fda83f47fc1dc5d67b7e42"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ada8d032e43fda83f47fc1dc5d67b7e42">foleparam_s_allocate</a></div><div class="ttdeci">static VALUE foleparam_s_allocate(VALUE klass)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07240">win32ole.c:7240</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_a66f2d68e8b195fed5d03f60cb42ba31b"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a66f2d68e8b195fed5d03f60cb42ba31b">rb_cTime</a></div><div class="ttdeci">RUBY_EXTERN VALUE rb_cTime</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01460">ruby.h:1460</a></div></div> <div class="ttc" id="win32ole_8c_html_a71d23fe98f21177991723bbbd03b6875"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a71d23fe98f21177991723bbbd03b6875">fole_s_show_help</a></div><div class="ttdeci">static VALUE fole_s_show_help(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02976">win32ole.c:2976</a></div></div> <div class="ttc" id="win32ole_8c_html_a742e80085d039b7877e50611a81e9dda"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a742e80085d039b7877e50611a81e9dda">ole_type_typekind</a></div><div class="ttdeci">static VALUE ole_type_typekind(ITypeInfo *pTypeInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l05825">win32ole.c:5825</a></div></div> <div class="ttc" id="group__defmethod_html_ga118dc7abcdb97f56fe35727ac0ff6eb8"><div class="ttname"><a href="../../d7/d19/group__defmethod.html#ga118dc7abcdb97f56fe35727ac0ff6eb8">rb_define_method</a></div><div class="ttdeci">void rb_define_method(VALUE klass, const char *name, VALUE(*func)(ANYARGS), int argc)</div><div class="ttdef"><b>Definition:</b> <a href="../../d9/d0c/class_8c_source.html#l01344">class.c:1344</a></div></div> <div class="ttc" id="intern_8h_html_ab592dcd9e193dea76fb0ff58b5d907e4"><div class="ttname"><a href="../../db/d2e/intern_8h.html#ab592dcd9e193dea76fb0ff58b5d907e4">rb_str_append</a></div><div class="ttdeci">VALUE rb_str_append(VALUE, VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l02125">string.c:2125</a></div></div> <div class="ttc" id="win32ole_8c_html_a516d92a41f815ad3c448380a9aa3e4d0"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a516d92a41f815ad3c448380a9aa3e4d0">ULONG</a></div><div class="ttdeci">static ULONG(STDMETHODCALLTYPE AddRef)(IDispatch __RPC_FAR *This)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00614">win32ole.c:614</a></div></div> <div class="ttc" id="intern_8h_html_ada1577ce4242b06ff5c1c52f37f5e679"><div class="ttname"><a href="../../db/d2e/intern_8h.html#ada1577ce4242b06ff5c1c52f37f5e679">rb_str_new2</a></div><div class="ttdeci">VALUE rb_str_new2(const char *)</div></div> <div class="ttc" id="win32ole_8c_html_a35aba07c890c79964cd4b15d29589917"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a35aba07c890c79964cd4b15d29589917">olemethod_from_typeinfo</a></div><div class="ttdeci">static VALUE olemethod_from_typeinfo(VALUE self, ITypeInfo *pTypeInfo, VALUE name)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04133">win32ole.c:4133</a></div></div> <div class="ttc" id="win32ole_8c_html_a4d49078fb540aae74273a6b66d3d9f34"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4d49078fb540aae74273a6b66d3d9f34">installed_code_page_proc</a></div><div class="ttdeci">static BOOL CALLBACK installed_code_page_proc(LPTSTR str)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03021">win32ole.c:3021</a></div></div> <div class="ttc" id="win32ole_8c_html_ab7382ba089455a36bd5000ff84aa861f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ab7382ba089455a36bd5000ff84aa861f">ole_excepinfo2msg</a></div><div class="ttdeci">static VALUE ole_excepinfo2msg(EXCEPINFO *pExInfo)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01151">win32ole.c:1151</a></div></div> <div class="ttc" id="win32ole_8c_html_a18100522f0b19b5e9b9875f5737a9386"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a></div><div class="ttdeci">free(psz)</div></div> <div class="ttc" id="win32ole_8c_html_a1da595a8d1f22377435d6bd4fa5150d1"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1da595a8d1f22377435d6bd4fa5150d1">default_inspect</a></div><div class="ttdeci">static VALUE default_inspect(VALUE self, const char *class_name)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02002">win32ole.c:2002</a></div></div> <div class="ttc" id="win32ole_8c_html_a2fe63f55350b20cc7532caf5ad0e7ccc"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a2fe63f55350b20cc7532caf5ad0e7ccc">fev_off_event</a></div><div class="ttdeci">static VALUE fev_off_event(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08500">win32ole.c:8500</a></div></div> <div class="ttc" id="win32ole_8c_html_a881beba93359a06773ac33febfdd1429"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a881beba93359a06773ac33febfdd1429">riid</a></div><div class="ttdeci">static REFIID riid</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00300">win32ole.c:300</a></div></div> <div class="ttc" id="ruby_2ruby_8h_html_afe85fbdbbfefb46b9c12e725c9a04970"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#afe85fbdbbfefb46b9c12e725c9a04970">rb_to_id</a></div><div class="ttdeci">ID rb_to_id(VALUE)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/db0/string_8c_source.html#l08172">string.c:8172</a></div></div> <div class="ttc" id="win32ole_8c_html_a20fb23da064c1347bccf49c1e676ddbb"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a20fb23da064c1347bccf49c1e676ddbb">folevariable_ole_type</a></div><div class="ttdeci">static VALUE folevariable_ole_type(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06275">win32ole.c:6275</a></div></div> <div class="ttc" id="error_8c_html_ab5e2a9fec766c75176fbb262bfe6a596"><div class="ttname"><a href="../../db/dcc/error_8c.html#ab5e2a9fec766c75176fbb262bfe6a596">rb_eArgError</a></div><div class="ttdeci">VALUE rb_eArgError</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00517">error.c:517</a></div></div> <div class="ttc" id="win32ole_8c_html_a1d906af605a6180e2e90b662b1932879"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a1d906af605a6180e2e90b662b1932879">foleparam_ole_type</a></div><div class="ttdeci">static VALUE foleparam_ole_type(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l07351">win32ole.c:7351</a></div></div> <div class="ttc" id="win32ole_8c_html_a6a2bfa6c8da64466fb5babc49837e561"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a6a2bfa6c8da64466fb5babc49837e561">foletype_source_ole_types</a></div><div class="ttdeci">static VALUE foletype_source_ole_types(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06061">win32ole.c:6061</a></div></div> <div class="ttc" id="win32ole_8c_html_a9aba4875e432f5a9e6108c4ea95e04fc"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9aba4875e432f5a9e6108c4ea95e04fc">V_UI2REF</a></div><div class="ttdeci">#define V_UI2REF(X)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00081">win32ole.c:81</a></div></div> <div class="ttc" id="structtag_i_e_v_e_n_t_s_i_n_k_o_b_j_html_a43748b00fee8549ca149ced8bc12d0b9"><div class="ttname"><a href="../../d2/d10/structtag_i_e_v_e_n_t_s_i_n_k_o_b_j.html#a43748b00fee8549ca149ced8bc12d0b9">tagIEVENTSINKOBJ::m_iid</a></div><div class="ttdeci">IID m_iid</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00198">win32ole.c:198</a></div></div> <div class="ttc" id="win32ole_8c_html_a711bebed75d5dbef9317d46792aa8255"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a711bebed75d5dbef9317d46792aa8255">fole_s_ole_initialize</a></div><div class="ttdeci">static VALUE fole_s_ole_initialize(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l03158">win32ole.c:3158</a></div></div> <div class="ttc" id="structmy_c_p_i_n_f_o_e_x_html"><div class="ttname"><a href="../../d4/d99/structmy_c_p_i_n_f_o_e_x.html">myCPINFOEX</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l01003">win32ole.c:1003</a></div></div> <div class="ttc" id="win32ole_8c_html_a9f2d2aeab774970ad953b6541ee96dcf"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a9f2d2aeab774970ad953b6541ee96dcf">fole_missing</a></div><div class="ttdeci">static VALUE fole_missing(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l04073">win32ole.c:4073</a></div></div> <div class="ttc" id="win32ole_8c_html_a0a03211c46ec9c69d5d0ee5187e5b295"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a0a03211c46ec9c69d5d0ee5187e5b295">pVarResult</a></div><div class="ttdeci">static DISPID REFIID LCID WORD DISPPARAMS __RPC_FAR VARIANT __RPC_FAR * pVarResult</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00306">win32ole.c:306</a></div></div> <div class="ttc" id="ruby_8c_html_af2efa898e9eed6fe6715279cb1ec35b0"><div class="ttname"><a href="../../df/d77/ruby_8c.html#af2efa898e9eed6fe6715279cb1ec35b0">argv</a></div><div class="ttdeci">char ** argv</div><div class="ttdef"><b>Definition:</b> <a href="../../df/d77/ruby_8c_source.html#l00131">ruby.c:131</a></div></div> <div class="ttc" id="win32ole_8c_html_a346c72c59d36f92c4b7e1271dd966734"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a346c72c59d36f92c4b7e1271dd966734">reg_open_vkey</a></div><div class="ttdeci">static LONG reg_open_vkey(HKEY hkey, VALUE key, HKEY *phkey)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02336">win32ole.c:2336</a></div></div> <div class="ttc" id="win32ole_8c_html_a109f95c06b2a46aede695fbec7ab46ef"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a109f95c06b2a46aede695fbec7ab46ef">parg</a></div><div class="ttdeci">VALUE * parg</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00787">win32ole.c:787</a></div></div> <div class="ttc" id="encoding_8c_html_aef9c377b2d9d78b9f88e890b77593109"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#aef9c377b2d9d78b9f88e890b77593109">rb_enc_from_index</a></div><div class="ttdeci">rb_encoding * rb_enc_from_index(int index)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l00548">encoding.c:548</a></div></div> <div class="ttc" id="struct_onig_encoding_type_s_t_html"><div class="ttname"><a href="../../d1/d7b/struct_onig_encoding_type_s_t.html">OnigEncodingTypeST</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d8/db3/oniguruma_8h_source.html#l00160">oniguruma.h:160</a></div></div> <div class="ttc" id="win32ole_8c_html_ae1c3462eddb17b0ff24cd63f2a5c0ca6"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ae1c3462eddb17b0ff24cd63f2a5c0ca6">NUM2UI8</a></div><div class="ttdeci">#define NUM2UI8</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00141">win32ole.c:141</a></div></div> <div class="ttc" id="win32ole_8c_html_aece2e35f468147b6d40f99a14c3c7f6a"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aece2e35f468147b6d40f99a14c3c7f6a">fole_s_const_load</a></div><div class="ttdeci">static VALUE fole_s_const_load(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02796">win32ole.c:2796</a></div></div> <div class="ttc" id="win32ole_8c_html_ac00113a6af189ae37896dc351916f83f"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#ac00113a6af189ae37896dc351916f83f">Init_win32ole</a></div><div class="ttdeci">void Init_win32ole(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l09077">win32ole.c:9077</a></div></div> <div class="ttc" id="win32ole_8c_html_a18cd37ee21efc5c422b2a6f0a1720a53"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a18cd37ee21efc5c422b2a6f0a1720a53">reg_open_key</a></div><div class="ttdeci">static LONG reg_open_key(HKEY hkey, const char *name, HKEY *phkey)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02330">win32ole.c:2330</a></div></div> <div class="ttc" id="win32ole_8c_html_a80ab193b9c367a2c3582c7b8513d0ccf"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a80ab193b9c367a2c3582c7b8513d0ccf">foletype_methods</a></div><div class="ttdeci">static VALUE foletype_methods(VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l06201">win32ole.c:6201</a></div></div> <div class="ttc" id="win32ole_8c_html_aaac85a21f4e352281fef326427354f95"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#aaac85a21f4e352281fef326427354f95">evs_push</a></div><div class="ttdeci">static VALUE evs_push(VALUE ev)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l08554">win32ole.c:8554</a></div></div> <div class="ttc" id="win32ole_8c_html_a41b6cce0ceb88f59521f6a9b5cbc903e"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a41b6cce0ceb88f59521f6a9b5cbc903e">fole_s_connect</a></div><div class="ttdeci">static VALUE fole_s_connect(int argc, VALUE *argv, VALUE self)</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l02714">win32ole.c:2714</a></div></div> </div><!-- fragment --></div><!-- contents --> <!-- start footer part --> <hr class="footer"/><address class="footer"><small> Generated by  <a href="http://www.doxygen.org/index.html"> <img class="footer" src="../../doxygen.png" alt="doxygen"/> </a> 1.8.14 </small></address> </body> </html>