home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / BC_502 / APPEXPRT.PAK / NAVAUTO.SNP < prev    next >
Encoding:
Text File  |  1997-05-06  |  2.3 KB  |  71 lines
  1. <<[CPP]
  2. ##QUERY_SNP_AUTO_KIND [[Kind]]
  3. ##QUERY_SNP_AUTO_NAME [[InternalName]]
  4. ##QUERY_SNP_AUTO_GETNAME [[GetName]]
  5. ##QUERY_SNP_AUTO_SETNAME [[SetName]]
  6. ##QUERY_SNP_AUTO_CPPTYPE [[CPPType]]
  7. ##QUERY_SNP_AUTO_OLETYPE [[OLEType]]
  8. ##QUERY_SNP_AUTO_DESCR [[Description]]
  9. ##QUERY_SNP_AUTO_GETPROPERTY [[GetProperty]]
  10. ##QUERY_SNP_AUTO_SETPROPERTY [[SetProperty]]
  11. ##QUERY_SNP_AUTO_CPPARGS [[CPPArguments]]
  12. ##QUERY_SNP_AUTO_OLEARGS [[OLEArguments]]
  13. ##QUERY_SNP_AUTO_VALIDATOR [[Validator]]
  14. ##"" [[FunctionName]]
  15. ##"" [[FunctionResult]]
  16. ##"" [[FunctionDefParam]]
  17. ##"" [[FindFunction]]
  18. ##--BEGIN-- QUERY_CLASS_NAME [[ClassName]]
  19. ##--BEGIN--Kind == VALUE_DATA
  20. ##    :\\"EXPOSE_PROPRW([[InternalName]], [[OLEType]], \"[[InternalName]]\"," FindFunction
  21. ##    :^BOF
  22. ##    :? FindFunction
  23. ##*
  24. ##    :^BOL
  25. ##    :^SCROLL
  26. ##    :^^
  27. ##--END--Kind == VALUE_DATA
  28. ##--BEGIN-- ((Kind == VALUE_PROPERTY) || (Kind == VALUE_METHOD))
  29. ##      --BEGIN-- Kind == VALUE_PROPERTY
  30. ##          :GetProperty == TRUE
  31. ##              :CPPType FunctionResult
  32. ##              :GetName FunctionName
  33. ##              :\\"[[ClassName]]::[[GetName]]" FindFunction
  34. ##*
  35. ##          :((GetProperty == FALSE) && (SetProperty == TRUE))
  36. ##              :"void" FunctionResult
  37. ##              :SetName FunctionName
  38. ##              :\\"[[ClassName]]::[[SetName]]" FindFunction
  39. ##*
  40. ##      --END-- Kind == VALUE_PROPERTY
  41. ##      --BEGIN-- Kind == VALUE_METHOD
  42. ##          :CPPType FunctionResult
  43. ##          :InternalName FunctionName
  44. ##          :CPPArguments FunctionDefParam
  45. ##          :\\"[[ClassName]]::[[InternalName]]" FindFunction
  46. ##*
  47. ##      --END-- Kind == VALUE_METHOD
  48. ##      :^BOF
  49. ##      :FALSE [[Search]]
  50. ##      :0 [[YPosition]]
  51. ##      --BEGIN-- TRUE
  52. ##          :{FindFunc.SNP}
  53. ##          --BEGIN-- Search == -1
  54. ##              :^BOF
  55. ##              :? FindFunction Search
  56. ##              :YPos() YPosition
  57. ##          --END-- Search == -1
  58. ##          --BEGIN-- Search == 0
  59. ##              :QUERY_FILE_CPP [[FileName]]
  60. ##              :%\\"Unable to locate function [[FunctionName]] implementation in [[FileName]].  "
  61. ##          --END-- Search == 0
  62. ##      --END-- TRUE
  63. ##^@YPosition
  64. ##^BOL
  65. ##^SCROLL
  66. ##^^
  67. ##--END-- ((Kind == VALUE_PROPERTY) || (Kind == VALUE_METHOD))
  68. ##--END-- QUERY_CLASS_NAME [[ClassName]]
  69. ##*
  70. >>[CPP]
  71.