win32ole 1.8.9 → 1.9.0

Sign up to get free protection for your applications and to get access to all the features.
Files changed (42) hide show
  1. checksums.yaml +4 -4
  2. data/.document +4 -0
  3. data/{LICENSE.txt → BSDL} +3 -3
  4. data/COPYING +56 -0
  5. data/ext/win32ole/.document +1 -0
  6. data/ext/win32ole/win32ole.c +70 -134
  7. data/ext/win32ole/win32ole_error.c +13 -4
  8. data/ext/win32ole/win32ole_event.c +26 -25
  9. data/ext/win32ole/win32ole_method.c +64 -63
  10. data/ext/win32ole/win32ole_param.c +57 -56
  11. data/ext/win32ole/win32ole_record.c +26 -25
  12. data/ext/win32ole/win32ole_type.c +73 -69
  13. data/ext/win32ole/win32ole_typelib.c +38 -37
  14. data/ext/win32ole/win32ole_variable.c +19 -18
  15. data/ext/win32ole/win32ole_variant.c +34 -33
  16. data/ext/win32ole/win32ole_variant_m.c +7 -5
  17. data/lib/win32ole/property.rb +15 -3
  18. data/lib/win32ole.rb +1 -2
  19. data/{ext/win32ole/sample → sample/win32ole}/olegen.rb +2 -2
  20. metadata +22 -31
  21. data/.git-blame-ignore-revs +0 -7
  22. data/.github/dependabot.yml +0 -6
  23. data/.github/workflows/windows.yml +0 -24
  24. data/.gitignore +0 -8
  25. data/Gemfile +0 -7
  26. data/Rakefile +0 -19
  27. data/bin/console +0 -14
  28. data/bin/setup +0 -8
  29. data/rakelib/changelogs.rake +0 -34
  30. data/rakelib/epoch.rake +0 -5
  31. data/rakelib/sync_tool.rake +0 -6
  32. data/rakelib/version.rake +0 -45
  33. data/win32ole.gemspec +0 -22
  34. /data/{ext/win32ole/sample → sample/win32ole}/excel1.rb +0 -0
  35. /data/{ext/win32ole/sample → sample/win32ole}/excel2.rb +0 -0
  36. /data/{ext/win32ole/sample → sample/win32ole}/excel3.rb +0 -0
  37. /data/{ext/win32ole/sample → sample/win32ole}/ie.rb +0 -0
  38. /data/{ext/win32ole/sample → sample/win32ole}/ieconst.rb +0 -0
  39. /data/{ext/win32ole/sample → sample/win32ole}/ienavi.rb +0 -0
  40. /data/{ext/win32ole/sample → sample/win32ole}/ienavi2.rb +0 -0
  41. /data/{ext/win32ole/sample → sample/win32ole}/oledirs.rb +0 -0
  42. /data/{ext/win32ole/sample → sample/win32ole}/xml.rb +0 -0
@@ -54,9 +54,9 @@ static const rb_data_type_t oletype_datatype = {
54
54
  };
55
55
 
56
56
  /*
57
- * Document-class: WIN32OLE_TYPE
57
+ * Document-class: WIN32OLE::Type
58
58
  *
59
- * <code>WIN32OLE_TYPE</code> objects represent OLE type library information.
59
+ * +WIN32OLE::Type+ objects represent OLE type library information.
60
60
  */
61
61
 
62
62
  static void
@@ -106,10 +106,12 @@ ole_type_from_itypeinfo(ITypeInfo *pTypeInfo)
106
106
 
107
107
  /*
108
108
  * call-seq:
109
- * WIN32OLE_TYPE.ole_classes(typelib)
109
+ * ole_classes(typelib)
110
110
  *
111
- * Returns array of WIN32OLE_TYPE objects defined by the <i>typelib</i> type library.
112
- * This method will be OBSOLETE. Use WIN32OLE_TYPELIB.new(typelib).ole_classes instead.
111
+ * Returns array of WIN32OLE::Type objects defined by the <i>typelib</i> type library.
112
+ *
113
+ * This method will be OBSOLETE.
114
+ * Use <code>WIN32OLE::TypeLib.new(typelib).ole_classes</code> instead.
113
115
  */
114
116
  static VALUE
115
117
  foletype_s_ole_classes(VALUE self, VALUE typelib)
@@ -118,8 +120,8 @@ foletype_s_ole_classes(VALUE self, VALUE typelib)
118
120
 
119
121
  /*
120
122
  rb_warn("%s is obsolete; use %s instead.",
121
- "WIN32OLE_TYPE.ole_classes",
122
- "WIN32OLE_TYPELIB.new(typelib).ole_types");
123
+ "WIN32OLE::Type.ole_classes",
124
+ "WIN32OLE::TypeLib.new(typelib).ole_types");
123
125
  */
124
126
  obj = rb_funcall(cWIN32OLE_TYPELIB, rb_intern("new"), 1, typelib);
125
127
  return rb_funcall(obj, rb_intern("ole_types"), 0);
@@ -127,10 +129,12 @@ foletype_s_ole_classes(VALUE self, VALUE typelib)
127
129
 
128
130
  /*
129
131
  * call-seq:
130
- * WIN32OLE_TYPE.typelibs
132
+ * typelibs
131
133
  *
132
134
  * Returns array of type libraries.
133
- * This method will be OBSOLETE. Use WIN32OLE_TYPELIB.typelibs.collect{|t| t.name} instead.
135
+ *
136
+ * This method will be OBSOLETE.
137
+ * Use <code>WIN32OLE::TypeLib.typelibs.collect{|t| t.name}</code> instead.
134
138
  *
135
139
  */
136
140
  static VALUE
@@ -138,15 +142,15 @@ foletype_s_typelibs(VALUE self)
138
142
  {
139
143
  /*
140
144
  rb_warn("%s is obsolete. use %s instead.",
141
- "WIN32OLE_TYPE.typelibs",
142
- "WIN32OLE_TYPELIB.typelibs.collect{t|t.name}");
145
+ "WIN32OLE::Type.typelibs",
146
+ "WIN32OLE::TypeLib.typelibs.collect{t|t.name}");
143
147
  */
144
- return rb_eval_string("WIN32OLE_TYPELIB.typelibs.collect{|t|t.name}");
148
+ return rb_eval_string("WIN32OLE::TypeLib.typelibs.collect{|t|t.name}");
145
149
  }
146
150
 
147
151
  /*
148
152
  * call-seq:
149
- * WIN32OLE_TYPE.progids
153
+ * progids
150
154
  *
151
155
  * Returns array of ProgID.
152
156
  */
@@ -214,7 +218,6 @@ create_win32ole_type(ITypeInfo *pTypeInfo, VALUE name)
214
218
  static VALUE
215
219
  oleclass_from_typelib(VALUE self, ITypeLib *pTypeLib, VALUE oleclass)
216
220
  {
217
-
218
221
  long count;
219
222
  int i;
220
223
  HRESULT hr;
@@ -245,14 +248,14 @@ oleclass_from_typelib(VALUE self, ITypeLib *pTypeLib, VALUE oleclass)
245
248
 
246
249
  /*
247
250
  * call-seq:
248
- * WIN32OLE_TYPE.new(typelib, ole_class) -> WIN32OLE_TYPE object
251
+ * new(typelib, ole_class) -> WIN32OLE::Type object
249
252
  *
250
- * Returns a new WIN32OLE_TYPE object.
253
+ * Returns a new WIN32OLE::Type object.
251
254
  * The first argument <i>typelib</i> specifies OLE type library name.
252
255
  * The second argument specifies OLE class name.
253
256
  *
254
- * WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')
255
- * # => WIN32OLE_TYPE object of Application class of Excel.
257
+ * WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Application')
258
+ * # => WIN32OLE::Type object of Application class of Excel.
256
259
  */
257
260
  static VALUE
258
261
  foletype_initialize(VALUE self, VALUE typelib, VALUE oleclass)
@@ -284,10 +287,10 @@ foletype_initialize(VALUE self, VALUE typelib, VALUE oleclass)
284
287
 
285
288
  /*
286
289
  * call-seq:
287
- * WIN32OLE_TYPE#name #=> OLE type name
290
+ * name #=> OLE type name
288
291
  *
289
292
  * Returns OLE type name.
290
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')
293
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Application')
291
294
  * puts tobj.name # => Application
292
295
  */
293
296
  static VALUE
@@ -344,10 +347,10 @@ ole_ole_type(ITypeInfo *pTypeInfo)
344
347
 
345
348
  /*
346
349
  * call-seq:
347
- * WIN32OLE_TYPE#ole_type #=> OLE type string.
350
+ * ole_type #=> OLE type string.
348
351
  *
349
352
  * returns type of OLE class.
350
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')
353
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Application')
351
354
  * puts tobj.ole_type # => Class
352
355
  */
353
356
  static VALUE
@@ -378,10 +381,10 @@ ole_type_guid(ITypeInfo *pTypeInfo)
378
381
 
379
382
  /*
380
383
  * call-seq:
381
- * WIN32OLE_TYPE#guid #=> GUID
384
+ * guid #=> GUID
382
385
  *
383
386
  * Returns GUID.
384
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')
387
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Application')
385
388
  * puts tobj.guid # => {00024500-0000-0000-C000-000000000046}
386
389
  */
387
390
  static VALUE
@@ -412,10 +415,10 @@ ole_type_progid(ITypeInfo *pTypeInfo)
412
415
 
413
416
  /*
414
417
  * call-seq:
415
- * WIN32OLE_TYPE#progid #=> ProgID
418
+ * progid #=> ProgID
416
419
  *
417
420
  * Returns ProgID if it exists. If not found, then returns nil.
418
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')
421
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Application')
419
422
  * puts tobj.progid # => Excel.Application.9
420
423
  */
421
424
  static VALUE
@@ -446,10 +449,10 @@ ole_type_visible(ITypeInfo *pTypeInfo)
446
449
 
447
450
  /*
448
451
  * call-seq:
449
- * WIN32OLE_TYPE#visible? #=> true or false
452
+ * visible? #=> true or false
450
453
  *
451
454
  * Returns true if the OLE class is public.
452
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Application')
455
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Application')
453
456
  * puts tobj.visible # => true
454
457
  */
455
458
  static VALUE
@@ -475,10 +478,10 @@ ole_type_major_version(ITypeInfo *pTypeInfo)
475
478
 
476
479
  /*
477
480
  * call-seq:
478
- * WIN32OLE_TYPE#major_version
481
+ * major_version
479
482
  *
480
483
  * Returns major version.
481
- * tobj = WIN32OLE_TYPE.new('Microsoft Word 10.0 Object Library', 'Documents')
484
+ * tobj = WIN32OLE::Type.new('Microsoft Word 10.0 Object Library', 'Documents')
482
485
  * puts tobj.major_version # => 8
483
486
  */
484
487
  static VALUE
@@ -504,10 +507,10 @@ ole_type_minor_version(ITypeInfo *pTypeInfo)
504
507
 
505
508
  /*
506
509
  * call-seq:
507
- * WIN32OLE_TYPE#minor_version #=> OLE minor version
510
+ * minor_version #=> OLE minor version
508
511
  *
509
512
  * Returns minor version.
510
- * tobj = WIN32OLE_TYPE.new('Microsoft Word 10.0 Object Library', 'Documents')
513
+ * tobj = WIN32OLE::Type.new('Microsoft Word 10.0 Object Library', 'Documents')
511
514
  * puts tobj.minor_version # => 2
512
515
  */
513
516
  static VALUE
@@ -533,10 +536,10 @@ ole_type_typekind(ITypeInfo *pTypeInfo)
533
536
 
534
537
  /*
535
538
  * call-seq:
536
- * WIN32OLE_TYPE#typekind #=> number of type.
539
+ * typekind #=> number of type.
537
540
  *
538
541
  * Returns number which represents type.
539
- * tobj = WIN32OLE_TYPE.new('Microsoft Word 10.0 Object Library', 'Documents')
542
+ * tobj = WIN32OLE::Type.new('Microsoft Word 10.0 Object Library', 'Documents')
540
543
  * puts tobj.typekind # => 4
541
544
  *
542
545
  */
@@ -561,10 +564,10 @@ ole_type_helpstring(ITypeInfo *pTypeInfo)
561
564
 
562
565
  /*
563
566
  * call-seq:
564
- * WIN32OLE_TYPE#helpstring #=> help string.
567
+ * helpstring #=> help string.
565
568
  *
566
569
  * Returns help string.
567
- * tobj = WIN32OLE_TYPE.new('Microsoft Internet Controls', 'IWebBrowser')
570
+ * tobj = WIN32OLE::Type.new('Microsoft Internet Controls', 'IWebBrowser')
568
571
  * puts tobj.helpstring # => Web Browser interface
569
572
  */
570
573
  static VALUE
@@ -594,10 +597,10 @@ ole_type_src_type(ITypeInfo *pTypeInfo)
594
597
 
595
598
  /*
596
599
  * call-seq:
597
- * WIN32OLE_TYPE#src_type #=> OLE source class
600
+ * src_type #=> OLE source class
598
601
  *
599
602
  * Returns source class when the OLE class is 'Alias'.
600
- * tobj = WIN32OLE_TYPE.new('Microsoft Office 9.0 Object Library', 'MsoRGBType')
603
+ * tobj = WIN32OLE::Type.new('Microsoft Office 9.0 Object Library', 'MsoRGBType')
601
604
  * puts tobj.src_type # => I4
602
605
  *
603
606
  */
@@ -622,10 +625,10 @@ ole_type_helpfile(ITypeInfo *pTypeInfo)
622
625
 
623
626
  /*
624
627
  * call-seq:
625
- * WIN32OLE_TYPE#helpfile
628
+ * helpfile
626
629
  *
627
630
  * Returns helpfile path. If helpfile is not found, then returns nil.
628
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Worksheet')
631
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Worksheet')
629
632
  * puts tobj.helpfile # => C:\...\VBAXL9.CHM
630
633
  *
631
634
  */
@@ -650,10 +653,10 @@ ole_type_helpcontext(ITypeInfo *pTypeInfo)
650
653
 
651
654
  /*
652
655
  * call-seq:
653
- * WIN32OLE_TYPE#helpcontext
656
+ * helpcontext
654
657
  *
655
658
  * Returns helpcontext. If helpcontext is not found, then returns nil.
656
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Worksheet')
659
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Worksheet')
657
660
  * puts tobj.helpfile # => 131185
658
661
  */
659
662
  static VALUE
@@ -701,11 +704,11 @@ ole_variables(ITypeInfo *pTypeInfo)
701
704
 
702
705
  /*
703
706
  * call-seq:
704
- * WIN32OLE_TYPE#variables
707
+ * variables
705
708
  *
706
- * Returns array of WIN32OLE_VARIABLE objects which represent variables
709
+ * Returns array of WIN32OLE::Variable objects which represent variables
707
710
  * defined in OLE class.
708
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'XlSheetType')
711
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'XlSheetType')
709
712
  * vars = tobj.variables
710
713
  * vars.each do |v|
711
714
  * puts "#{v.name} = #{v.value}"
@@ -728,11 +731,11 @@ foletype_variables(VALUE self)
728
731
 
729
732
  /*
730
733
  * call-seq:
731
- * WIN32OLE_TYPE#ole_methods # the array of WIN32OLE_METHOD objects.
734
+ * ole_methods # the array of WIN32OLE::Method objects.
732
735
  *
733
- * Returns array of WIN32OLE_METHOD objects which represent OLE method defined in
736
+ * Returns array of WIN32OLE::Method objects which represent OLE method defined in
734
737
  * OLE type library.
735
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Worksheet')
738
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Worksheet')
736
739
  * methods = tobj.ole_methods.collect{|m|
737
740
  * m.name
738
741
  * }
@@ -747,11 +750,11 @@ foletype_methods(VALUE self)
747
750
 
748
751
  /*
749
752
  * call-seq:
750
- * WIN32OLE_TYPE#ole_typelib
753
+ * ole_typelib
751
754
  *
752
- * Returns the WIN32OLE_TYPELIB object which is including the WIN32OLE_TYPE
755
+ * Returns the WIN32OLE::TypeLib object which is including the WIN32OLE::Type
753
756
  * object. If it is not found, then returns nil.
754
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Worksheet')
757
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Worksheet')
755
758
  * puts tobj.ole_typelib # => 'Microsoft Excel 9.0 Object Library'
756
759
  */
757
760
  static VALUE
@@ -804,11 +807,11 @@ ole_type_impl_ole_types(ITypeInfo *pTypeInfo, int implflags)
804
807
 
805
808
  /*
806
809
  * call-seq:
807
- * WIN32OLE_TYPE#implemented_ole_types
810
+ * implemented_ole_types
808
811
  *
809
- * Returns the array of WIN32OLE_TYPE object which is implemented by the WIN32OLE_TYPE
812
+ * Returns the array of WIN32OLE::Type object which is implemented by the WIN32OLE::Type
810
813
  * object.
811
- * tobj = WIN32OLE_TYPE.new('Microsoft Excel 9.0 Object Library', 'Worksheet')
814
+ * tobj = WIN32OLE::Type.new('Microsoft Excel 9.0 Object Library', 'Worksheet')
812
815
  * p tobj.implemented_ole_types # => [_Worksheet, DocEvents]
813
816
  */
814
817
  static VALUE
@@ -820,13 +823,13 @@ foletype_impl_ole_types(VALUE self)
820
823
 
821
824
  /*
822
825
  * call-seq:
823
- * WIN32OLE_TYPE#source_ole_types
826
+ * source_ole_types
824
827
  *
825
- * Returns the array of WIN32OLE_TYPE object which is implemented by the WIN32OLE_TYPE
828
+ * Returns the array of WIN32OLE::Type object which is implemented by the WIN32OLE::Type
826
829
  * object and having IMPLTYPEFLAG_FSOURCE.
827
- * tobj = WIN32OLE_TYPE.new('Microsoft Internet Controls', "InternetExplorer")
830
+ * tobj = WIN32OLE::Type.new('Microsoft Internet Controls', "InternetExplorer")
828
831
  * p tobj.source_ole_types
829
- * # => [#<WIN32OLE_TYPE:DWebBrowserEvents2>, #<WIN32OLE_TYPE:DWebBrowserEvents>]
832
+ * # => [#<WIN32OLE::Type:DWebBrowserEvents2>, #<WIN32OLE::Type:DWebBrowserEvents>]
830
833
  */
831
834
  static VALUE
832
835
  foletype_source_ole_types(VALUE self)
@@ -837,12 +840,12 @@ foletype_source_ole_types(VALUE self)
837
840
 
838
841
  /*
839
842
  * call-seq:
840
- * WIN32OLE_TYPE#default_event_sources
843
+ * default_event_sources
841
844
  *
842
- * Returns the array of WIN32OLE_TYPE object which is implemented by the WIN32OLE_TYPE
845
+ * Returns the array of WIN32OLE::Type object which is implemented by the WIN32OLE::Type
843
846
  * object and having IMPLTYPEFLAG_FSOURCE and IMPLTYPEFLAG_FDEFAULT.
844
- * tobj = WIN32OLE_TYPE.new('Microsoft Internet Controls', "InternetExplorer")
845
- * p tobj.default_event_sources # => [#<WIN32OLE_TYPE:DWebBrowserEvents2>]
847
+ * tobj = WIN32OLE::Type.new('Microsoft Internet Controls', "InternetExplorer")
848
+ * p tobj.default_event_sources # => [#<WIN32OLE::Type:DWebBrowserEvents2>]
846
849
  */
847
850
  static VALUE
848
851
  foletype_default_event_sources(VALUE self)
@@ -853,13 +856,13 @@ foletype_default_event_sources(VALUE self)
853
856
 
854
857
  /*
855
858
  * call-seq:
856
- * WIN32OLE_TYPE#default_ole_types
859
+ * default_ole_types
857
860
  *
858
- * Returns the array of WIN32OLE_TYPE object which is implemented by the WIN32OLE_TYPE
861
+ * Returns the array of WIN32OLE::Type object which is implemented by the WIN32OLE::Type
859
862
  * object and having IMPLTYPEFLAG_FDEFAULT.
860
- * tobj = WIN32OLE_TYPE.new('Microsoft Internet Controls', "InternetExplorer")
863
+ * tobj = WIN32OLE::Type.new('Microsoft Internet Controls', "InternetExplorer")
861
864
  * p tobj.default_ole_types
862
- * # => [#<WIN32OLE_TYPE:IWebBrowser2>, #<WIN32OLE_TYPE:DWebBrowserEvents2>]
865
+ * # => [#<WIN32OLE::Type:IWebBrowser2>, #<WIN32OLE::Type:DWebBrowserEvents2>]
863
866
  */
864
867
  static VALUE
865
868
  foletype_default_ole_types(VALUE self)
@@ -870,17 +873,17 @@ foletype_default_ole_types(VALUE self)
870
873
 
871
874
  /*
872
875
  * call-seq:
873
- * WIN32OLE_TYPE#inspect -> String
876
+ * inspect -> String
874
877
  *
875
878
  * Returns the type name with class name.
876
879
  *
877
880
  * ie = WIN32OLE.new('InternetExplorer.Application')
878
- * ie.ole_type.inspect => #<WIN32OLE_TYPE:IWebBrowser2>
881
+ * ie.ole_type.inspect => #<WIN32OLE::Type:IWebBrowser2>
879
882
  */
880
883
  static VALUE
881
884
  foletype_inspect(VALUE self)
882
885
  {
883
- return default_inspect(self, "WIN32OLE_TYPE");
886
+ return default_inspect(self, "WIN32OLE::Type");
884
887
  }
885
888
 
886
889
  VALUE cWIN32OLE_TYPE;
@@ -888,6 +891,7 @@ VALUE cWIN32OLE_TYPE;
888
891
  void Init_win32ole_type(void)
889
892
  {
890
893
  cWIN32OLE_TYPE = rb_define_class_under(cWIN32OLE, "Type", rb_cObject);
894
+ /* Alias of WIN32OLE::Type, for the backward compatibility */
891
895
  rb_define_const(rb_cObject, "WIN32OLE_TYPE", cWIN32OLE_TYPE);
892
896
  rb_define_singleton_method(cWIN32OLE_TYPE, "ole_classes", foletype_s_ole_classes, 1);
893
897
  rb_define_singleton_method(cWIN32OLE_TYPE, "typelibs", foletype_s_typelibs, 0);
@@ -127,19 +127,19 @@ ole_typelib_from_itypeinfo(ITypeInfo *pTypeInfo)
127
127
  }
128
128
 
129
129
  /*
130
- * Document-class: WIN32OLE_TYPELIB
130
+ * Document-class: WIN32OLE::TypeLib
131
131
  *
132
- * <code>WIN32OLE_TYPELIB</code> objects represent OLE tyblib information.
132
+ * +WIN32OLE::TypeLib+ objects represent OLE tyblib information.
133
133
  */
134
134
 
135
135
  /*
136
136
  * call-seq:
137
137
  *
138
- * WIN32OLE_TYPELIB.typelibs
138
+ * typelibs
139
139
  *
140
- * Returns the array of WIN32OLE_TYPELIB object.
140
+ * Returns the array of WIN32OLE::TypeLib object.
141
141
  *
142
- * tlibs = WIN32OLE_TYPELIB.typelibs
142
+ * tlibs = WIN32OLE::TypeLib.typelibs
143
143
  *
144
144
  */
145
145
  static VALUE
@@ -364,9 +364,9 @@ oletypelib_search_registry2(VALUE self, VALUE args)
364
364
 
365
365
  /*
366
366
  * call-seq:
367
- * WIN32OLE_TYPELIB.new(typelib [, version1, version2]) -> WIN32OLE_TYPELIB object
367
+ * new(typelib [, version1, version2]) -> WIN32OLE::TypeLib object
368
368
  *
369
- * Returns a new WIN32OLE_TYPELIB object.
369
+ * Returns a new WIN32OLE::TypeLib object.
370
370
  *
371
371
  * The first argument <i>typelib</i> specifies OLE type library name or GUID or
372
372
  * OLE library file.
@@ -376,11 +376,11 @@ oletypelib_search_registry2(VALUE self, VALUE args)
376
376
  * If the first argument is type library name, then the second and third argument
377
377
  * are ignored.
378
378
  *
379
- * tlib1 = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
380
- * tlib2 = WIN32OLE_TYPELIB.new('{00020813-0000-0000-C000-000000000046}')
381
- * tlib3 = WIN32OLE_TYPELIB.new('{00020813-0000-0000-C000-000000000046}', 1.3)
382
- * tlib4 = WIN32OLE_TYPELIB.new('{00020813-0000-0000-C000-000000000046}', 1, 3)
383
- * tlib5 = WIN32OLE_TYPELIB.new("C:\\WINNT\\SYSTEM32\\SHELL32.DLL")
379
+ * tlib1 = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
380
+ * tlib2 = WIN32OLE::TypeLib.new('{00020813-0000-0000-C000-000000000046}')
381
+ * tlib3 = WIN32OLE::TypeLib.new('{00020813-0000-0000-C000-000000000046}', 1.3)
382
+ * tlib4 = WIN32OLE::TypeLib.new('{00020813-0000-0000-C000-000000000046}', 1, 3)
383
+ * tlib5 = WIN32OLE::TypeLib.new("C:\\WINNT\\SYSTEM32\\SHELL32.DLL")
384
384
  * puts tlib1.name # -> 'Microsoft Excel 9.0 Object Library'
385
385
  * puts tlib2.name # -> 'Microsoft Excel 9.0 Object Library'
386
386
  * puts tlib3.name # -> 'Microsoft Excel 9.0 Object Library'
@@ -428,11 +428,11 @@ foletypelib_initialize(VALUE self, VALUE args)
428
428
 
429
429
  /*
430
430
  * call-seq:
431
- * WIN32OLE_TYPELIB#guid -> The guid string.
431
+ * guid -> The guid string.
432
432
  *
433
433
  * Returns guid string which specifies type library.
434
434
  *
435
- * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
435
+ * tlib = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
436
436
  * guid = tlib.guid # -> '{00020813-0000-0000-C000-000000000046}'
437
437
  */
438
438
  static VALUE
@@ -456,11 +456,11 @@ foletypelib_guid(VALUE self)
456
456
 
457
457
  /*
458
458
  * call-seq:
459
- * WIN32OLE_TYPELIB#name -> The type library name
459
+ * name -> The type library name
460
460
  *
461
461
  * Returns the type library name.
462
462
  *
463
- * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
463
+ * tlib = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
464
464
  * name = tlib.name # -> 'Microsoft Excel 9.0 Object Library'
465
465
  */
466
466
  static VALUE
@@ -500,11 +500,11 @@ make_version_str(VALUE major, VALUE minor)
500
500
 
501
501
  /*
502
502
  * call-seq:
503
- * WIN32OLE_TYPELIB#version -> The type library version String object.
503
+ * version -> The type library version String object.
504
504
  *
505
505
  * Returns the type library version.
506
506
  *
507
- * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
507
+ * tlib = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
508
508
  * puts tlib.version #-> "1.3"
509
509
  */
510
510
  static VALUE
@@ -523,11 +523,11 @@ foletypelib_version(VALUE self)
523
523
 
524
524
  /*
525
525
  * call-seq:
526
- * WIN32OLE_TYPELIB#major_version -> The type library major version.
526
+ * major_version -> The type library major version.
527
527
  *
528
528
  * Returns the type library major version.
529
529
  *
530
- * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
530
+ * tlib = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
531
531
  * puts tlib.major_version # -> 1
532
532
  */
533
533
  static VALUE
@@ -546,11 +546,11 @@ foletypelib_major_version(VALUE self)
546
546
 
547
547
  /*
548
548
  * call-seq:
549
- * WIN32OLE_TYPELIB#minor_version -> The type library minor version.
549
+ * minor_version -> The type library minor version.
550
550
  *
551
551
  * Returns the type library minor version.
552
552
  *
553
- * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
553
+ * tlib = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
554
554
  * puts tlib.minor_version # -> 3
555
555
  */
556
556
  static VALUE
@@ -568,11 +568,11 @@ foletypelib_minor_version(VALUE self)
568
568
 
569
569
  /*
570
570
  * call-seq:
571
- * WIN32OLE_TYPELIB#path -> The type library file path.
571
+ * path -> The type library file path.
572
572
  *
573
573
  * Returns the type library file path.
574
574
  *
575
- * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
575
+ * tlib = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
576
576
  * puts tlib.path #-> 'C:\...\EXCEL9.OLB'
577
577
  */
578
578
  static VALUE
@@ -604,15 +604,15 @@ foletypelib_path(VALUE self)
604
604
 
605
605
  /*
606
606
  * call-seq:
607
- * WIN32OLE_TYPELIB#visible?
607
+ * visible?
608
608
  *
609
609
  * Returns true if the type library information is not hidden.
610
610
  * If wLibFlags of TLIBATTR is 0 or LIBFLAG_FRESTRICTED or LIBFLAG_FHIDDEN,
611
611
  * the method returns false, otherwise, returns true.
612
612
  * If the method fails to access the TLIBATTR information, then
613
- * WIN32OLERuntimeError is raised.
613
+ * WIN32OLE::RuntimeError is raised.
614
614
  *
615
- * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
615
+ * tlib = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
616
616
  * tlib.visible? # => true
617
617
  */
618
618
  static VALUE
@@ -636,12 +636,12 @@ foletypelib_visible(VALUE self)
636
636
 
637
637
  /*
638
638
  * call-seq:
639
- * WIN32OLE_TYPELIB#library_name
639
+ * library_name
640
640
  *
641
641
  * Returns library name.
642
- * If the method fails to access library name, WIN32OLERuntimeError is raised.
642
+ * If the method fails to access library name, WIN32OLE::RuntimeError is raised.
643
643
  *
644
- * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
644
+ * tlib = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
645
645
  * tlib.library_name # => Excel
646
646
  */
647
647
  static VALUE
@@ -790,11 +790,11 @@ typelib_file(VALUE ole)
790
790
 
791
791
  /*
792
792
  * call-seq:
793
- * WIN32OLE_TYPELIB#ole_types -> The array of WIN32OLE_TYPE object included the type library.
793
+ * ole_types -> The array of WIN32OLE::Type object included the type library.
794
794
  *
795
795
  * Returns the type library file path.
796
796
  *
797
- * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
797
+ * tlib = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
798
798
  * classes = tlib.ole_types.collect{|k| k.name} # -> ['AddIn', 'AddIns' ...]
799
799
  */
800
800
  static VALUE
@@ -809,17 +809,17 @@ foletypelib_ole_types(VALUE self)
809
809
 
810
810
  /*
811
811
  * call-seq:
812
- * WIN32OLE_TYPELIB#inspect -> String
812
+ * inspect -> String
813
813
  *
814
814
  * Returns the type library name with class name.
815
815
  *
816
- * tlib = WIN32OLE_TYPELIB.new('Microsoft Excel 9.0 Object Library')
817
- * tlib.inspect # => "<#WIN32OLE_TYPELIB:Microsoft Excel 9.0 Object Library>"
816
+ * tlib = WIN32OLE::TypeLib.new('Microsoft Excel 9.0 Object Library')
817
+ * tlib.inspect # => "<#WIN32OLE::TypeLib:Microsoft Excel 9.0 Object Library>"
818
818
  */
819
819
  static VALUE
820
820
  foletypelib_inspect(VALUE self)
821
821
  {
822
- return default_inspect(self, "WIN32OLE_TYPELIB");
822
+ return default_inspect(self, "WIN32OLE::TypeLib");
823
823
  }
824
824
 
825
825
  VALUE cWIN32OLE_TYPELIB;
@@ -827,7 +827,8 @@ VALUE cWIN32OLE_TYPELIB;
827
827
  void
828
828
  Init_win32ole_typelib(void)
829
829
  {
830
- cWIN32OLE_TYPELIB = rb_define_class_under(cWIN32OLE, "Typelib", rb_cObject);
830
+ cWIN32OLE_TYPELIB = rb_define_class_under(cWIN32OLE, "TypeLib", rb_cObject);
831
+ /* Alias of WIN32OLE::TypeLib, for the backward compatibility */
831
832
  rb_define_const(rb_cObject, "WIN32OLE_TYPELIB", cWIN32OLE_TYPELIB);
832
833
  rb_define_singleton_method(cWIN32OLE_TYPELIB, "typelibs", foletypelib_s_typelibs, 0);
833
834
  rb_define_alloc_func(cWIN32OLE_TYPELIB, foletypelib_s_allocate);