开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Delphi控件源码 > 查看源码
ToDoShll_TLB.pas
资源名称：delphi.rar　[点击查看]
上传用户：fh681027
上传日期：2022-07-23
资源大小：1959k
文件大小：2k
源码类别：

Delphi控件源码

开发平台：

Delphi

ToDoShll_TLB.pas：源码内容
  1. unit ToDoShll_TLB;
  3. // ************************************************************************ //
  4. // WARNING                                                                    
  5. // -------                                                                    
  6. // The types declared in this file were generated from data read from a       
  7. // Type Library. If this type library is explicitly or indirectly (via        
  8. // another type library referring to this type library) re-imported, or the   
  9. // 'Refresh' command of the Type Library Editor activated while editing the   
  10. // Type Library, the contents of this file will be regenerated and all        
  11. // manual modifications will be lost.                                         
  12. // ************************************************************************ //
  14. // PASTLWTR : $Revision:   1.106  $
  15. // File generated on 4/14/2001 4:43:07 PM from Type Library described below.
  17. // ************************************************************************  //
  18. // Type Lib: C:md6code19ToDoFileToDoShll.tlb (1)
  19. // LIBID: {282992C9-49D6-402F-BAC1-6E07BA68212D}
  20. // LCID: 0
  21. // Helpfile: 
  22. // DepndLst: 
  23. //   (1) v2.0 stdole, (C:WINDOWSSystem32stdole2.tlb)
  24. //   (2) v4.0 StdVCL, (C:WINDOWSsystem32stdvcl40.dll)
  25. // ************************************************************************ //
  26. {$WARN SYMBOL_PLATFORM OFF}
  27. {$TYPEDADDRESS OFF} // Unit must be compiled without type-checked pointers. 
  28. interface
  30. uses Windows, ActiveX, Variants, Classes, Graphics, StdVCL;
  32. // *********************************************************************//
  33. // GUIDS declared in the TypeLibrary. Following prefixes are used:        
  34. //   Type Libraries     : LIBID_xxxx                                      
  35. //   CoClasses          : CLASS_xxxx                                      
  36. //   DISPInterfaces     : DIID_xxxx                                       
  37. //   Non-DISP interfaces: IID_xxxx                                        
  38. // *********************************************************************//
  39. const
  40.   // TypeLibrary Major and minor versions
  41.   ToDoShllMajorVersion = 1;
  42.   ToDoShllMinorVersion = 0;
  44.   LIBID_ToDoShll: TGUID = '{282992C9-49D6-402F-BAC1-6E07BA68212D}';
  47. implementation
  49. uses ComObj;
  51. end.