home *** CD-ROM | disk | FTP | other *** search
/ PC Direct 1996 May / PCDMAY.ISO / software / clarion / cw15 / libsrc15.z / EQUATES.CLW < prev    next >
Encoding:
Text File  |  1995-08-28  |  10.5 KB  |  310 lines
  1. ! Event numbers
  2.  
  3. ! Field-specific events (FIELD() returns field number)
  4.  
  5. EVENT:Accepted      EQUATE (01H)
  6. EVENT:NewSelection  EQUATE (02H)
  7. EVENT:ScrollUp      EQUATE (03H)
  8. EVENT:ScrollDown    EQUATE (04H)
  9. EVENT:PageUp        EQUATE (05H)
  10. EVENT:PageDown      EQUATE (06H)
  11. EVENT:ScrollTop     EQUATE (07H)
  12. EVENT:ScrollBottom  EQUATE (08H)
  13. EVENT:Locate        EQUATE (09H)
  14.  
  15. EVENT:MouseDown     EQUATE (01H)
  16. EVENT:MouseUp       EQUATE (0aH)
  17. EVENT:MouseIn       EQUATE (0bH)
  18. EVENT:MouseOut      EQUATE (0cH)
  19. EVENT:MouseMove     EQUATE (0dH)
  20. EVENT:VBXevent      EQUATE (0eH)
  21. EVENT:AlertKey      EQUATE (0fH)
  22. EVENT:PreAlertKey   EQUATE (10H)
  23. EVENT:Dragging      EQUATE (11H)
  24. EVENT:Drag          EQUATE (12H)
  25. EVENT:Drop          EQUATE (13H)
  26. EVENT:ScrollDrag    EQUATE (14H)
  27. EVENT:TabChanging   EQUATE (15H)
  28. EVENT:Expanding     EQUATE (16H)
  29. EVENT:Contracting   EQUATE (17H)
  30. EVENT:Expanded      EQUATE (18H)
  31. EVENT:Contracted    EQUATE (19H)
  32. EVENT:Rejected      EQUATE (1AH)
  33. EVENT:DroppingDown  EQUATE (1BH)
  34. EVENT:DroppedDown   EQUATE (1CH)
  35.  
  36. EVENT:Selected      EQUATE (101H)
  37.  
  38. ! Field-independent events (FIELD() returns 0)
  39.  
  40. EVENT:CloseWindow   EQUATE (201H)
  41. EVENT:CloseDown     EQUATE (202H)
  42. EVENT:OpenWindow    EQUATE (203H)
  43. EVENT:OpenFailed    EQUATE (204H)
  44. EVENT:LoseFocus     EQUATE (205H)
  45. EVENT:GainFocus     EQUATE (206H)
  46.  
  47. EVENT:Suspend       EQUATE (208H)
  48. EVENT:Resume        EQUATE (209H)
  49.  
  50. EVENT:Timer         EQUATE (20BH)
  51. EVENT:DDErequest    EQUATE (20CH)
  52. EVENT:DDEadvise     EQUATE (20DH)
  53. EVENT:DDEdata       EQUATE (20EH)
  54. EVENT:DDEcommand    EQUATE (20FH)    ! same as DDEexecute
  55. EVENT:DDEexecute    EQUATE (20FH)
  56. EVENT:DDEpoke       EQUATE (210H)
  57. EVENT:DDEclosed     EQUATE (211H)
  58.  
  59. EVENT:Move          EQUATE (220H)
  60. EVENT:Size          EQUATE (221H)
  61. EVENT:Restore       EQUATE (222H)
  62. EVENT:Maximize      EQUATE (223H)
  63. EVENT:Iconize       EQUATE (224H)
  64. EVENT:Completed     EQUATE (225H)
  65. EVENT:Moved         EQUATE (230H)
  66. EVENT:Sized         EQUATE (231H)
  67. EVENT:Restored      EQUATE (232H)
  68. EVENT:Maximized     EQUATE (233H)
  69. EVENT:Iconized      EQUATE (234H)
  70.  
  71. ! User-definable events
  72.  
  73. EVENT:User          EQUATE (400H)
  74. EVENT:Last          EQUATE (0FFFH)
  75.  
  76. STD:WindowList    EQUATE (1)
  77. STD:TileWindow    EQUATE (2)
  78. STD:CascadeWindow EQUATE (3)
  79. STD:ArrangeIcons  EQUATE (4)
  80. STD:HelpIndex     EQUATE (5)
  81. STD:HelpOnHelp    EQUATE (6)
  82. STD:HelpSearch    EQUATE (7)
  83. STD:Help          EQUATE (8)
  84. STD:Cut           EQUATE (10)
  85. STD:Copy          EQUATE (11)
  86. STD:Paste         EQUATE (12)
  87. STD:Clear         EQUATE (13)
  88. STD:Undo          EQUATE (14)
  89. STD:Close         EQUATE (15)
  90. STD:PrintSetup    EQUATE (16)
  91. STD:TileHorizontal EQUATE (17)
  92. STD:TileVertical   EQUATE (18)
  93.  
  94. CURSOR:None       EQUATE ('<0FFH,01H,00H,00H>')
  95. CURSOR:Arrow      EQUATE ('<0FFH,01H,01H,7FH>')
  96. CURSOR:IBeam      EQUATE ('<0FFH,01H,02H,7FH>')
  97. CURSOR:Wait       EQUATE ('<0FFH,01H,03H,7FH>')
  98. CURSOR:Cross      EQUATE ('<0FFH,01H,04H,7FH>')
  99. CURSOR:UpArrow    EQUATE ('<0FFH,01H,05H,7FH>')
  100. CURSOR:Size       EQUATE ('<0FFH,01H,81H,7FH>')
  101. CURSOR:Icon       EQUATE ('<0FFH,01H,82H,7FH>')
  102. CURSOR:SizeNWSE   EQUATE ('<0FFH,01H,83H,7FH>')
  103. CURSOR:SizeNESW   EQUATE ('<0FFH,01H,84H,7FH>')
  104. CURSOR:SizeWE     EQUATE ('<0FFH,01H,85H,7FH>')
  105. CURSOR:SizeNS     EQUATE ('<0FFH,01H,86H,7FH>')
  106. CURSOR:DragWE     EQUATE ('<0FFH,02H,01H,7FH>')
  107.  
  108. ICON:None         EQUATE ('<0FFH,01H,00H,00H>')
  109. ICON:Application  EQUATE ('<0FFH,01H,01H,7FH>')
  110. ICON:Hand         EQUATE ('<0FFH,01H,02H,7FH>')
  111. ICON:Question     EQUATE ('<0FFH,01H,03H,7FH>')
  112. ICON:Exclamation  EQUATE ('<0FFH,01H,04H,7FH>')
  113. ICON:Asterisk     EQUATE ('<0FFH,01H,05H,7FH>')
  114. ICON:Pick         EQUATE ('<0FFH,02H,01H,7FH>')
  115. ICON:Save         EQUATE ('<0FFH,02H,02H,7FH>')
  116. ICON:Print        EQUATE ('<0FFH,02H,03H,7FH>')
  117. ICON:Paste        EQUATE ('<0FFH,02H,04H,7FH>')
  118. ICON:Open         EQUATE ('<0FFH,02H,05H,7FH>')
  119. ICON:New          EQUATE ('<0FFH,02H,06H,7FH>')
  120. ICON:Help         EQUATE ('<0FFH,02H,07H,7FH>')
  121. ICON:Cut          EQUATE ('<0FFH,02H,08H,7FH>')
  122. ICON:Copy         EQUATE ('<0FFH,02H,09H,7FH>')
  123. ICON:Child        EQUATE ('<0FFH,02H,0AH,7FH>')
  124. ICON:Frame        EQUATE ('<0FFH,02H,0BH,7FH>')
  125. ICON:Clarion      EQUATE ('<0FFH,02H,0CH,7FH>')
  126.  
  127. ICON:VCRtop         EQUATE ('<0FFH,02H,81H,7FH>')
  128. ICON:VCRrewind      EQUATE ('<0FFH,02H,82H,7FH>')
  129. ICON:VCRback        EQUATE ('<0FFH,02H,83H,7FH>')
  130. ICON:VCRplay        EQUATE ('<0FFH,02H,84H,7FH>')
  131. ICON:VCRfastforward EQUATE ('<0FFH,02H,85H,7FH>')
  132. ICON:VCRbottom      EQUATE ('<0FFH,02H,86H,7FH>')
  133. ICON:VCRlocate      EQUATE ('<0FFH,02H,87H,7FH>')
  134.  
  135.  
  136. BEEP:SystemDefault      EQUATE (0000H)
  137. BEEP:SystemHand         EQUATE (0010H)
  138. BEEP:SystemQuestion     EQUATE (0020H)
  139. BEEP:SystemExclamation  EQUATE (0030H)
  140. BEEP:SystemAsterisk     EQUATE (0040H)
  141.  
  142. REJECT:RangeHigh        EQUATE(1)  ! Above top range on SPIN
  143. REJECT:RangeLow         EQUATE(2)  ! below bottom range ditto
  144. REJECT:Range            EQUATE(3)  ! Other range error
  145. REJECT:Invalid          EQUATE(4)  ! Invalid input
  146.  
  147. INCLUDE 'property.clw'
  148.  
  149. COLOR:NONE              EQUATE (-1)
  150. COLOR:SCROLLBAR         EQUATE (80000000H)
  151. COLOR:BACKGROUND        EQUATE (80000001H)
  152. COLOR:ACTIVECAPTION     EQUATE (80000002H)
  153. COLOR:INACTIVECAPTION   EQUATE (80000003H)
  154. COLOR:MENU              EQUATE (80000004H)
  155. COLOR:WINDOW            EQUATE (80000005H)
  156. COLOR:WINDOWFRAME       EQUATE (80000006H)
  157. COLOR:MENUTEXT          EQUATE (80000007H)
  158. COLOR:WINDOWTEXT        EQUATE (80000008H)
  159. COLOR:CAPTIONTEXT       EQUATE (80000009H)
  160. COLOR:ACTIVEBORDER      EQUATE (8000000AH)
  161. COLOR:INACTIVEBORDER    EQUATE (8000000BH)
  162. COLOR:APPWORKSPACE      EQUATE (8000000CH)
  163. COLOR:HIGHLIGHT         EQUATE (8000000DH)
  164. COLOR:HIGHLIGHTTEXT     EQUATE (8000000EH)
  165. COLOR:BTNFACE           EQUATE (8000000FH)
  166. COLOR:BTNSHADOW         EQUATE (80000010H)
  167. COLOR:GRAYTEXT          EQUATE (80000011H)
  168. COLOR:BTNTEXT           EQUATE (80000012H)
  169. COLOR:INACTIVECAPTIONTEXT EQUATE (80000013H)
  170. COLOR:BTNHIGHLIGHT        EQUATE (80000014H)
  171.  
  172. COLOR:Black             EQUATE (0000000H)
  173. COLOR:Maroon            EQUATE (0000080H)
  174. COLOR:Green             EQUATE (0008000H)
  175. COLOR:Olive             EQUATE (0008080H)
  176. COLOR:Navy              EQUATE (0800000H)
  177. COLOR:Purple            EQUATE (0800080H)
  178. COLOR:Teal              EQUATE (0808000H)
  179. COLOR:Gray              EQUATE (0808080H)
  180. COLOR:Silver            EQUATE (0C0C0C0H)
  181. COLOR:Red               EQUATE (00000FFH)
  182. COLOR:Lime              EQUATE (000FF00H)
  183. COLOR:Yellow            EQUATE (000FFFFH)
  184. COLOR:Blue              EQUATE (0FF0000H)
  185. COLOR:Fuschia           EQUATE (0FF00FFH)
  186. COLOR:Aqua              EQUATE (0FFFF00H)
  187. COLOR:White             EQUATE (0FFFFFFH)
  188.  
  189. ! Parameter to CREATE / Return value from PROP:type
  190.  
  191. CREATE:sstring          EQUATE (1)
  192. CREATE:string           EQUATE (2)
  193. CREATE:image            EQUATE (3)
  194. CREATE:region           EQUATE (4)
  195. CREATE:line             EQUATE (5)
  196. CREATE:box              EQUATE (6)
  197. CREATE:ellipse          EQUATE (7)
  198. CREATE:entry            EQUATE (8)
  199. CREATE:button           EQUATE (9)
  200. CREATE:prompt           EQUATE (10)
  201. CREATE:option           EQUATE (11)
  202. CREATE:check            EQUATE (12)
  203. CREATE:group            EQUATE (13)
  204. CREATE:list             EQUATE (14)
  205. CREATE:combo            EQUATE (15)
  206. CREATE:spin             EQUATE (16)
  207. CREATE:text             EQUATE (17)
  208. CREATE:custom           EQUATE (18)
  209. CREATE:menu             EQUATE (19)
  210. CREATE:item             EQUATE (20)
  211. CREATE:radio            EQUATE (21)
  212. CREATE:application      EQUATE (24)    ! return value only
  213. CREATE:window           EQUATE (25)    ! return value only
  214. CREATE:report           EQUATE (26)    ! return value only
  215. CREATE:header           EQUATE (27)    ! return value only
  216. CREATE:footer           EQUATE (28)    ! return value only
  217. CREATE:break            EQUATE (29)    ! return value only
  218. CREATE:form             EQUATE (30)    ! return value only
  219. CREATE:detail           EQUATE (31)    ! return value only
  220. CREATE:droplist         EQUATE (33)
  221. CREATE:dropcombo        EQUATE (34)
  222. CREATE:progress         EQUATE (35)
  223. CREATE:slider           EQUATE (36)
  224. CREATE:sheet            EQUATE (37)
  225. CREATE:tab              EQUATE (38)
  226.  
  227. CREATE:TOOLBAR          EQUATE (128)
  228.  
  229. FONT:thin               EQUATE (100)
  230. FONT:regular            EQUATE (400)
  231. FONT:bold               EQUATE (700)
  232. FONT:fixed              EQUATE (0800H)
  233. FONT:italic             EQUATE (01000H)
  234. FONT:underline          EQUATE (02000H)
  235. FONT:strikeout          EQUATE (04000H)
  236.  
  237. PEN:solid           EQUATE (0)
  238. PEN:dash                EQUATE (1)
  239. PEN:dot                 EQUATE (2)
  240. PEN:dashdot             EQUATE (3)
  241. PEN:dashdotdot          EQUATE (4)
  242. PEN:null                EQUATE (5)
  243. PEN:insideframe         EQUATE (6)
  244.  
  245. FALSE                   EQUATE (0)
  246. TRUE                    EQUATE (1)
  247.  
  248. LISTZONE:field          EQUATE(0)
  249. LISTZONE:right          EQUATE(1)
  250. LISTZONE:header         EQUATE(2)
  251. LISTZONE:expandbox      EQUATE(3)
  252. LISTZONE:tree           EQUATE(4)
  253. LISTZONE:icon           EQUATE(5)
  254. LISTZONE:nowhere        EQUATE(6)
  255.  
  256. VBXEVENT:Click          EQUATE (0)
  257. VBXEVENT:DblClick       EQUATE (1)
  258. VBXEVENT:GotFocus       EQUATE (4)
  259. VBXEVENT:KeyDown        EQUATE (5)
  260. VBXEVENT:KeyPress       EQUATE (6)
  261. VBXEVENT:KeyUp          EQUATE (7)
  262. VBXEVENT:LostFocus      EQUATE (8)
  263. VBXEVENT:MouseDown      EQUATE (9)
  264. VBXEVENT:MouseMove      EQUATE (10)
  265. VBXEVENT:MouseUp        EQUATE (11)
  266.  
  267. BUTTON:OK               EQUATE (01H)
  268. BUTTON:YES              EQUATE (02H)
  269. BUTTON:NO               EQUATE (04H)
  270. BUTTON:ABORT            EQUATE (08H)
  271. BUTTON:RETRY            EQUATE (10H)
  272. BUTTON:IGNORE           EQUATE (20H)
  273. BUTTON:CANCEL           EQUATE (40H)
  274. BUTTON:HELP             EQUATE (80H)
  275.  
  276. !DDE link types
  277.  
  278. DDE:auto                EQUATE (0)
  279. DDE:manual              EQUATE (-1)
  280. DDE:remove              EQUATE (-2)
  281.  
  282. ! Types
  283.   OMIT('***',_WIDTH32_)
  284. SIGNED                  EQUATE(SHORT)
  285. UNSIGNED                EQUATE(USHORT)
  286. _nopos                  EQUATE(08000H)
  287.   ***
  288.   COMPILE('***',_WIDTH32_)
  289. SIGNED                  EQUATE(LONG)
  290. UNSIGNED                EQUATE(LONG)
  291. _nopos                  EQUATE(080000000H)
  292.   ***
  293. BOOL                    EQUATE(SIGNED)
  294.  
  295. !DIRECTORY equates & TYPEs
  296.  
  297. ff_:NORMAL              EQUATE(0)
  298. ff_:READONLY            EQUATE(1)
  299. ff_:HIDDEN              EQUATE(2)
  300. ff_:SYSTEM              EQUATE(4)
  301. ff_:DIRECTORY           EQUATE(10H)
  302. ff_:ARCHIVE             EQUATE(20H)      ! NOT Chicago compatible
  303.  
  304. ff_:queue    QUEUE,PRE(ff_),TYPE
  305. name           string(13)
  306. date           long
  307. time           long
  308. size           long
  309. attrib         byte
  310.              END