home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 May / Pcwk5b98.iso / Borland / Cplus45 / BC45 / EXPERT.PAK / HADDPROP.SNP < prev    next >
Text File  |  1995-08-29  |  3KB  |  79 lines
  1. ##--BEGIN-- GetGlobal() == FALSE
  2. ##      "//{{[[ClassName]]AUTO_PROP_END}}" [[ClassTMarker]]
  3. ##      \\ClassTMarker [[ClassMarker]]
  4. ##      :^BOF
  5. ##      --BEGIN-- ? ClassMarker [[Search]]
  6. ##          :Search == FALSE
  7. ##          :{HAddAPro.SNP}
  8. ##          :^BOF
  9. ##          :? ClassMarker [[Search]]
  10. ##*
  11. ##      --END-- ? ClassMarker [[Search]]
  12. ##      :^BOL
  13. ##      :GetProperty == TRUE
  14.     [[CPPType]] [[GetName]] ();
  15. ##      :SetProperty == TRUE
  16.     void [[SetName]] ([[CPPType]]);
  17. ##--END-- GetGlobal() == FALSE
  18. ##"//{{[[ClassName]]AUTO_TBL_END}}" [[ClassTMarker]]
  19. ##\\ClassTMarker [[ClassMarker]]
  20. ##^BOF
  21. ##--BEGIN-- ? ClassMarker [[Search]]
  22. ##Search == FALSE
  23. ##      :{HAddAuto.SNP}
  24. ##      :^BOF
  25. ##      :? ClassMarker [[Search]]
  26. ##*
  27. ##--END-- ? ClassMarker [[Search]]
  28. ##"" [[XlateOLEProp]]
  29. ##"" [[Comment]]
  30. ##--BEGIN-- "" [[OLEAutoProp]]
  31. ##      OLEType == "TAutoBool"
  32. ##          :"TAutoBool" CPPType
  33. ##*
  34. ##      ^BOL
  35. ##      (OLEType == CPPType) && (OLEType != "TAutoCurrency") && (OLEType != "TAutoDate") && (OLEType != "TAutoBool")
  36. ##      --BEGIN-- StripPtrRef(CPPType, [[StripCPPType]]) [[AnyStripping]]
  37. ##          !AnyStripping
  38. ##              :\\"TAutoObject<[[CPPType]]>" OLEAutoProp
  39. ##              :"    // Change to TAutoObjectDelete if owned by automation." Comment
  40. ##*
  41. ##          AnyStripping
  42. ##              :\\"TAutoObject<[[StripCPPType]]>" OLEAutoProp
  43. ##              :"    // Change to TAutoObjectDelete if owned by automation." Comment
  44. ##*
  45. ##      --END-- StripPtrRef(CPPType, [[StripCPPType]]) [[AnyStripping]]
  46. ##      (OLEType != CPPType) && (OLEType != "TAutoString")
  47. ##          :"[[CPPType]]" OLEAutoProp
  48. ##*
  49. ##      (OLEType == CPPType) && ((OLEType == "TAutoCurrency") || (OLEType == "TAutoDate") || (OLEType == "TAutoBool"))
  50. ##          :"[[CPPType]]" OLEAutoProp
  51. ##*
  52. ##      (OLEType == "TAutoString") && (CPPType != "string")
  53. ##          :"TAutoString" OLEAutoProp
  54. ##*
  55. ##      (OLEType == "TAutoString") && (CPPType == "string")
  56. ##          :"string" OLEAutoProp
  57. ##*
  58. ##      \\OLEAutoProp XlateOLEProp
  59. ##      (GetProperty == TRUE) && (SetProperty == TRUE)
  60. AUTOPROP([[InternalName]], [[GetName]], [[SetName]], [[XlateOLEProp]],)[[Comment]]
  61. ##      (GetProperty == TRUE) && (SetProperty == FALSE)
  62. AUTOPROPRO([[InternalName]], [[GetName]], [[XlateOLEProp]], )[[Comment]]
  63. ##      (GetProperty == FALSE) && (SetProperty == TRUE)
  64. AUTOPROPWO([[InternalName]], [[SetName]], [[XlateOLEProp]], )[[Comment]]
  65. ##--END-- "" [[OLEAutoProp]]
  66. ##FALSE [[IncludeSearch]]
  67. ##^BOF
  68. ##StripPtrRef(CPPType, [[StripCPPType]]) [[AnyStripping]]
  69. ##<<*StripCPPType QUERY_FILE_H [[IncludeFile]]
  70. ##IncludeFile != ""
  71. ##   :\\"#include \"[[IncludeFile]]\"" IncludeFile
  72. ##   :^BOF
  73. ##   :? IncludeFile IncludeSearch
  74. ##   :IncludeSearch == FALSE
  75. ##       : ^BOF
  76. ##       : ?\\"#include \""
  77. ##       : ^BOL
  78. [[IncludeFile]]     
  79.