gdktypes.pp 28 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096
  1. {
  2. $Id$
  3. }
  4. {****************************************************************************
  5. Interface
  6. ****************************************************************************}
  7. {$ifdef read_interface}
  8. type
  9. PPPChar = ^PPchar;
  10. PPguchar = Pguchar;
  11. PPgchar = ^Pgchar;
  12. PPPgchar = ^PPgchar;
  13. PPgint = ^Pgint;
  14. PGdkWChar = ^TGdkWChar;
  15. TGdkWChar = guint32;
  16. TGdkIC = pointer;
  17. PGdkIc = ^TGdkIC;
  18. TGdkAtom = gulong;
  19. PTGdkAtom = ^TGdkAtom;
  20. PPGdkWindow = ^PGdkWindow;
  21. PGdkWindow = ^TGdkWindow;
  22. TGdkWindow = record
  23. user_data : gpointer;
  24. end;
  25. TGdkPixmap = TGdkWindow;
  26. PGdkPixmap = ^TGdkWindow;
  27. PPGdkPixmap = ^PGdkPixmap;
  28. TGdkBitmap = TGdkWindow;
  29. PGdkBitMap = ^TGdkBitMap;
  30. PPGdkBitMap = ^PGdkBitMap;
  31. TGdkDrawable = TGdkWindow;
  32. PGdkDrawable = ^TGdkDrawable;
  33. type
  34. PGdkWindowType = ^TGdkWindowType;
  35. TGdkWindowType = Longint;
  36. Const
  37. GDK_WINDOW_ROOT = 0;
  38. GDK_WINDOW_TOPLEVEL = 1;
  39. GDK_WINDOW_CHILD = 2;
  40. GDK_WINDOW_DIALOG = 3;
  41. GDK_WINDOW_TEMP = 4;
  42. GDK_WINDOW_PIXMAP = 5;
  43. GDK_WINDOW_FOREIGN = 6;
  44. type
  45. PGdkWindowClass = ^TGdkWindowClass;
  46. TGdkWindowClass = Longint;
  47. Const
  48. GDK_INPUT_OUTPUT = 0;
  49. GDK_INPUT_ONLY = 1;
  50. type
  51. PGdkImageType = ^TGdkImageType;
  52. TGdkImageType = Longint;
  53. Const
  54. GDK_IMAGE_NORMAL = 0;
  55. GDK_IMAGE_SHARED = 1;
  56. GDK_IMAGE_FASTEST = 2;
  57. type
  58. PGdkVisualType = ^TGdkVisualType;
  59. TGdkVisualType = Longint;
  60. Const
  61. GDK_VISUAL_STATIC_GRAY = 0;
  62. GDK_VISUAL_GRAYSCALE = 1;
  63. GDK_VISUAL_STATIC_COLOR = 2;
  64. GDK_VISUAL_PSEUDO_COLOR = 3;
  65. GDK_VISUAL_TRUE_COLOR = 4;
  66. GDK_VISUAL_DIRECT_COLOR = 5;
  67. type
  68. PGdkFontType = ^TGdkFontType;
  69. TGdkFontType = Longint;
  70. Const
  71. GDK_FONT_FONT = 0;
  72. GDK_FONT_FONTSET = 1;
  73. type
  74. PGdkWindowAttributesType = ^TGdkWindowAttributesType;
  75. TGdkWindowAttributesType = Longint;
  76. Const
  77. GDK_WA_TITLE = (1) shl (1);
  78. GDK_WA_X = (1) shl (2);
  79. GDK_WA_Y = (1) shl (3);
  80. GDK_WA_CURSOR = (1) shl (4);
  81. GDK_WA_COLORMAP = (1) shl (5);
  82. GDK_WA_VISUAL = (1) shl (6);
  83. GDK_WA_WMCLASS = (1) shl (7);
  84. GDK_WA_NOREDIR = (1) shl (8);
  85. type
  86. PGdkWindowHints = ^TGdkWindowHints;
  87. TGdkWindowHints = Longint;
  88. Const
  89. GDK_HINT_POS = 1 shl 0;
  90. GDK_HINT_MIN_SIZE = 1 shl 1;
  91. GDK_HINT_MAX_SIZE = 1 shl 2;
  92. GDK_HINT_BASE_SIZE = 1 shl 3;
  93. GDK_HINT_ASPECT = 1 shl 4;
  94. GDK_HINT_RESIZE_INC = 1 shl 5;
  95. type
  96. PGdkfunction = ^TGdkfunction;
  97. TGdkfunction = Longint;
  98. Const
  99. GDK_COPY = 0;
  100. GDK_INVERT = 1;
  101. GDK_XOR = 2;
  102. GDK_CLEAR = 4;
  103. GDK_AND = 5;
  104. GDK_AND_REVERSE = 6;
  105. GDK_AND_INVERT = 7;
  106. GDK_NOOP = 8;
  107. GDK_OR = 9;
  108. GDK_EQUIV = 10;
  109. GDK_OR_REVERSE = 11;
  110. GDK_COPY_INVERT = 12;
  111. GDK_OR_INVERT = 13;
  112. GDK_NAND = 14;
  113. GDK_SET = 15;
  114. type
  115. PGdkFill = ^TGdkFill;
  116. TGdkFill = Longint;
  117. Const
  118. GDK_SOLID = 0;
  119. GDK_TILED = 1;
  120. GDK_STIPPLED = 2;
  121. GDK_OPAQUE_STIPPLED = 3;
  122. type
  123. PGdkFillRule = ^TGdkFillRule;
  124. TGdkFillRule = Longint;
  125. Const
  126. GDK_EVEN_ODD_RULE = 0;
  127. GDK_WINDING_RULE = 1;
  128. type
  129. PGdkLineStyle = ^TGdkLineStyle;
  130. TGdkLineStyle = Longint;
  131. Const
  132. GDK_LINE_SOLID = 0;
  133. GDK_LINE_ON_OFF_DASH = 1;
  134. GDK_LINE_DOUBLE_DASH = 2;
  135. type
  136. PGdkCapStyle = ^TGdkCapStyle;
  137. TGdkCapStyle = Longint;
  138. Const
  139. GDK_CAP_NOT_LAST = 0;
  140. GDK_CAP_BUTT = 1;
  141. GDK_CAP_ROUND = 2;
  142. GDK_CAP_PROJECTING = 3;
  143. type
  144. PGdkJoinStyle = ^TGdkJoinStyle;
  145. TGdkJoinStyle = Longint;
  146. Const
  147. GDK_JOIN_MITER = 0;
  148. GDK_JOIN_ROUND = 1;
  149. GDK_JOIN_BEVEL = 2;
  150. type
  151. PGdkCursorType = ^TGdkCursorType;
  152. TGdkCursorType = Longint;
  153. Const
  154. GDK_CURSOR_IS_PIXMAP = -1;
  155. GDK_X_CURSOR = 0;
  156. GDK_ARROW = 2;
  157. GDK_BASED_ARROW_DOWN = 4;
  158. GDK_BASED_ARROW_UP = 6;
  159. GDK_BOAT = 8;
  160. GDK_BOGOSITY = 10;
  161. GDK_BOTTOM_LEFT_CORNER = 12;
  162. GDK_BOTTOM_RIGHT_CORNER = 14;
  163. GDK_BOTTOM_SIDE = 16;
  164. GDK_BOTTOM_TEE = 18;
  165. GDK_BOX_SPIRAL = 20;
  166. GDK_CENTER_PTR = 22;
  167. GDK_CIRCLE = 24;
  168. GDK_CLOCK = 26;
  169. GDK_COFFEE_MUG = 28;
  170. GDK_CROSS = 30;
  171. GDK_CROSS_REVERSE = 32;
  172. GDK_CROSSHAIR = 34;
  173. GDK_DIAMOND_CROSS = 36;
  174. GDK_DOT = 38;
  175. GDK_DOTBOX = 40;
  176. GDK_DOUBLE_ARROW = 42;
  177. GDK_DRAFT_LARGE = 44;
  178. GDK_DRAFT_SMALL = 46;
  179. GDK_DRAPED_BOX = 48;
  180. GDK_EXCHANGE = 50;
  181. GDK_FLEUR = 52;
  182. GDK_GOBBLER = 54;
  183. GDK_GUMBY = 56;
  184. GDK_HAND1 = 58;
  185. GDK_HAND2 = 60;
  186. GDK_HEART = 62;
  187. GDK_ICON = 64;
  188. GDK_IRON_CROSS = 66;
  189. GDK_LEFT_PTR = 68;
  190. GDK_LEFT_SIDE = 70;
  191. GDK_LEFT_TEE = 72;
  192. GDK_LEFTBUTTON = 74;
  193. GDK_LL_ANGLE = 76;
  194. GDK_LR_ANGLE = 78;
  195. GDK_MAN = 80;
  196. GDK_MIDDLEBUTTON = 82;
  197. GDK_MOUSE = 84;
  198. GDK_PENCIL = 86;
  199. GDK_PIRATE = 88;
  200. GDK_PLUS = 90;
  201. GDK_QUESTION_ARROW = 92;
  202. GDK_RIGHT_PTR = 94;
  203. GDK_RIGHT_SIDE = 96;
  204. GDK_RIGHT_TEE = 98;
  205. GDK_RIGHTBUTTON = 100;
  206. GDK_RTL_LOGO = 102;
  207. GDK_SAILBOAT = 104;
  208. GDK_SB_DOWN_ARROW = 106;
  209. GDK_SB_H_DOUBLE_ARROW = 108;
  210. GDK_SB_LEFT_ARROW = 110;
  211. GDK_SB_RIGHT_ARROW = 112;
  212. GDK_SB_UP_ARROW = 114;
  213. GDK_SB_V_DOUBLE_ARROW = 116;
  214. GDK_SHUTTLE = 118;
  215. GDK_SIZING = 120;
  216. GDK_SPIDER = 122;
  217. GDK_SPRAYCAN = 124;
  218. GDK_STAR = 126;
  219. GDK_TARGET = 128;
  220. GDK_TCROSS = 130;
  221. GDK_TOP_LEFT_ARROW = 132;
  222. GDK_TOP_LEFT_CORNER = 134;
  223. GDK_TOP_RIGHT_CORNER = 136;
  224. GDK_TOP_SIDE = 138;
  225. GDK_TOP_TEE = 140;
  226. GDK_TREK = 142;
  227. GDK_UL_ANGLE = 144;
  228. GDK_UMBRELLA = 146;
  229. GDK_UR_ANGLE = 148;
  230. GDK_WATCH = 150;
  231. GDK_XTERM = 152;
  232. GDK_LAST_CURSOR = 153;
  233. GDK_NUM_GLYPHS = 154;
  234. type
  235. PGdkFilterReturn = ^TGdkFilterReturn;
  236. TGdkFilterReturn = Longint;
  237. Const
  238. GDK_FILTER_CONTINUE = 0;
  239. GDK_FILTER_TRANSLATE = 1;
  240. GDK_FILTER_REMOVE = 2;
  241. type
  242. PGdkVisibilityState = ^TGdkVisibilityState;
  243. TGdkVisibilityState = Longint;
  244. Const
  245. GDK_VISIBILITY_UNOBSCURED = 0;
  246. GDK_VISIBILITY_PARTIAL = 1;
  247. GDK_VISIBILITY_FULLY_OBSCURED = 2;
  248. type
  249. PGdkEventType = ^TGdkEventType;
  250. TGdkEventType = Longint;
  251. Const
  252. GDK_NOTHING = -1;
  253. GDK_DELETE = 0;
  254. GDK_DESTROY = 1;
  255. GDK_EXPOSE = 2;
  256. GDK_MOTION_NOTIFY = 3;
  257. GDK_BUTTON_PRESS = 4;
  258. GDK_2BUTTON_PRESS = 5;
  259. GDK_3BUTTON_PRESS = 6;
  260. GDK_BUTTON_RELEASE = 7;
  261. GDK_KEY_PRESS = 8;
  262. GDK_KEY_RELEASE = 9;
  263. GDK_ENTER_NOTIFY = 10;
  264. GDK_LEAVE_NOTIFY = 11;
  265. GDK_FOCUS_CHANGE = 12;
  266. GDK_CONFIGURE = 13;
  267. GDK_MAP = 14;
  268. GDK_UNMAP = 15;
  269. GDK_PROPERTY_NOTIFY = 16;
  270. GDK_SELECTION_CLEAR = 17;
  271. GDK_SELECTION_REQUEST = 18;
  272. GDK_SELECTION_NOTIFY = 19;
  273. GDK_PROXIMITY_IN = 20;
  274. GDK_PROXIMITY_OUT = 21;
  275. GDK_DRAG_ENTER = 22;
  276. GDK_DRAG_LEAVE = 23;
  277. GDK_DRAG_MOTION_EVENT = 24;
  278. GDK_DRAG_STATUS_EVENT = 25;
  279. GDK_DROP_START = 26;
  280. GDK_DROP_FINISHED = 27;
  281. GDK_CLIENT_EVENT = 28;
  282. GDK_VISIBILITY_NOTIFY = 29;
  283. GDK_NO_EXPOSE = 30;
  284. type
  285. PGdkEventMask = ^TGdkEventMask;
  286. TGdkEventMask = Longint;
  287. Const
  288. GDK_EXPOSURE_MASK = (1) shl (1);
  289. GDK_POINTER_MOTION_MASK = (1) shl (2);
  290. GDK_POINTER_MOTION_HINT_MASK = (1) shl (3);
  291. GDK_BUTTON_MOTION_MASK = (1) shl (4);
  292. GDK_BUTTON1_MOTION_MASK = (1) shl (5);
  293. GDK_BUTTON2_MOTION_MASK = (1) shl (6);
  294. GDK_BUTTON3_MOTION_MASK = (1) shl (7);
  295. GDK_BUTTON_PRESS_MASK = (1) shl (8);
  296. GDK_BUTTON_RELEASE_MASK = (1) shl (9);
  297. GDK_KEY_PRESS_MASK = (1) shl (10);
  298. GDK_KEY_RELEASE_MASK = (1) shl (11);
  299. GDK_ENTER_NOTIFY_MASK = (1) shl (12);
  300. GDK_LEAVE_NOTIFY_MASK = (1) shl (13);
  301. GDK_FOCUS_CHANGE_MASK = (1) shl (14);
  302. GDK_STRUCTURE_MASK = (1) shl (15);
  303. GDK_PROPERTY_CHANGE_MASK = (1) shl (16);
  304. GDK_VISIBILITY_NOTIFY_MASK = (1) shl (17);
  305. GDK_PROXIMITY_IN_MASK = (1) shl (18);
  306. GDK_PROXIMITY_OUT_MASK = (1) shl (19);
  307. GDK_SUBSTRUCTURE_MASK = 1 shl 20;
  308. GDK_ALL_EVENTS_MASK = $0FFFFF;
  309. type
  310. PGdkNotifyType = ^TGdkNotifyType;
  311. TGdkNotifyType = Longint;
  312. Const
  313. GDK_NOTIFY_ANCESTOR = 0;
  314. GDK_NOTIFY_VIRTUAL = 1;
  315. GDK_NOTIFY_INFERIOR = 2;
  316. GDK_NOTIFY_NONLINEAR = 3;
  317. GDK_NOTIFY_NONLINEAR_VIRTUAL = 4;
  318. GDK_NOTIFY_UNKNOWN = 5;
  319. type
  320. PGdkCrossingMode = ^TGdkCrossingMode;
  321. TGdkCrossingMode = longint;
  322. const
  323. GDK_CROSSING_NORMAL = 0;
  324. GDK_CROSSING_GRAB = 1;
  325. GDK_CROSSING_UNGRAB = 2;
  326. type
  327. PGdkModifierType = ^TGdkModifierType;
  328. TGdkModifierType = Longint;
  329. Const
  330. GDK_SHIFT_MASK = (1) shl (0);
  331. GDK_LOCK_MASK = (1) shl (1);
  332. GDK_CONTROL_MASK = (1) shl (2);
  333. GDK_MOD1_MASK = (1) shl (3);
  334. GDK_MOD2_MASK = (1) shl (4);
  335. GDK_MOD3_MASK = (1) shl (5);
  336. GDK_MOD4_MASK = (1) shl (6);
  337. GDK_MOD5_MASK = (1) shl (7);
  338. GDK_BUTTON1_MASK = (1) shl (8);
  339. GDK_BUTTON2_MASK = (1) shl (9);
  340. GDK_BUTTON3_MASK = (1) shl (10);
  341. GDK_BUTTON4_MASK = (1) shl (11);
  342. GDK_BUTTON5_MASK = (1) shl (12);
  343. GDK_RELEASE_MASK = 1 shl 13;
  344. GDK_MODIFIER_MASK = $3fff;
  345. type
  346. PGdkSubwindowMode = ^TGdkSubwindowMode;
  347. TGdkSubwindowMode = Longint;
  348. Const
  349. GDK_CLIP_BY_CHILDREN = 0;
  350. GDK_INCLUDE_INFERIORS = 1;
  351. type
  352. PGdkInputCondition = ^TGdkInputCondition;
  353. TGdkInputCondition = Longint;
  354. Const
  355. GDK_INPUT_READ = (1) shl (0);
  356. GDK_INPUT_WRITE = (1) shl (1);
  357. GDK_INPUT_EXCEPTION = (1) shl (2);
  358. type
  359. PGdkStatus = ^TGdkStatus;
  360. TGdkStatus = Longint;
  361. Const
  362. GDK_OK = 0;
  363. GDK_ERROR = -1;
  364. GDK_ERROR_PARAM = -2;
  365. GDK_ERROR_FILE = -3;
  366. GDK_ERROR_MEM = -4;
  367. type
  368. PGdkByteOrder = ^TGdkByteOrder;
  369. TGdkByteOrder = Longint;
  370. Const
  371. GDK_LSB_FIRST = 0;
  372. GDK_MSB_FIRST = 1;
  373. type
  374. PGdkGCValuesMask = ^TGdkGCValuesMask;
  375. TGdkGCValuesMask = Longint;
  376. Const
  377. GDK_GC_FOREGROUND = (1) shl (0);
  378. GDK_GC_BACKGROUND = (1) shl (1);
  379. GDK_GC_FONT = (1) shl (2);
  380. GDK_GC_function = (1) shl (3);
  381. GDK_GC_FILL = (1) shl (4);
  382. GDK_GC_TILE = (1) shl (5);
  383. GDK_GC_STIPPLE = (1) shl (6);
  384. GDK_GC_CLIP_MASK = (1) shl (7);
  385. GDK_GC_SUBWINDOW = (1) shl (8);
  386. GDK_GC_TS_X_ORIGIN = (1) shl (9);
  387. GDK_GC_TS_Y_ORIGIN = (1) shl (10);
  388. GDK_GC_CLIP_X_ORIGIN = (1) shl (11);
  389. GDK_GC_CLIP_Y_ORIGIN = (1) shl (12);
  390. GDK_GC_EXPOSURES = (1) shl (13);
  391. GDK_GC_LINE_WIDTH = (1) shl (14);
  392. GDK_GC_LINE_STYLE = (1) shl (15);
  393. GDK_GC_CAP_STYLE = (1) shl (16);
  394. GDK_GC_JOIN_STYLE = (1) shl (17);
  395. type
  396. PGdkSelection = ^TGdkSelection;
  397. TGdkSelection = Longint;
  398. Const
  399. GDK_SELECTION_PRIMARY = 1;
  400. GDK_SELECTION_SECONDARY = 2;
  401. type
  402. PGdkPropertyState = ^TGdkPropertyState;
  403. TGdkPropertyState = Longint;
  404. Const
  405. GDK_PROPERTY_NEW_VALUE = 0;
  406. GDK_PROPERTY_DELETE_STATE = 1;
  407. type
  408. PGdkPropMode = ^TGdkPropMode;
  409. TGdkPropMode = Longint;
  410. Const
  411. GDK_PROP_MODE_REPLACE = 0;
  412. GDK_PROP_MODE_PREPEND = 1;
  413. GDK_PROP_MODE_APPEND = 2;
  414. type
  415. PGdkInputSource = ^TGdkInputSource;
  416. TGdkInputSource = Longint;
  417. Const
  418. GDK_SOURCE_MOUSE = 0;
  419. GDK_SOURCE_PEN = 1;
  420. GDK_SOURCE_ERASER = 2;
  421. GDK_SOURCE_CURSOR = 3;
  422. type
  423. PGdkInputMode = ^TGdkInputMode;
  424. TGdkInputMode = Longint;
  425. Const
  426. GDK_MODE_DISABLED = 0;
  427. GDK_MODE_SCREEN = 1;
  428. GDK_MODE_WINDOW = 2;
  429. type
  430. PGdkAxisUse = ^TGdkAxisUse;
  431. TGdkAxisUse = Longint;
  432. Const
  433. GDK_AXIS_IGNORE = 0;
  434. GDK_AXIS_X = 1;
  435. GDK_AXIS_Y = 2;
  436. GDK_AXIS_PRESSURE = 3;
  437. GDK_AXIS_XTILT = 4;
  438. GDK_AXIS_YTILT = 5;
  439. GDK_AXIS_LAST = 6;
  440. type
  441. PGdkTarget = ^TGdkTarget;
  442. TGdkTarget = Longint;
  443. Const
  444. GDK_TARGET_BITMAP = 5;
  445. GDK_TARGET_COLORMAP = 7;
  446. GDK_TARGET_DRAWABLE = 17;
  447. GDK_TARGET_PIXMAP = 20;
  448. GDK_TARGET_STRING = 31;
  449. type
  450. PGdkSelectionType = ^TGdkSelectionType;
  451. TGdkSelectionType = Longint;
  452. Const
  453. GDK_SELECTION_TYPE_ATOM = 4;
  454. GDK_SELECTION_TYPE_BITMAP = 5;
  455. GDK_SELECTION_TYPE_COLORMAP = 7;
  456. GDK_SELECTION_TYPE_DRAWABLE = 17;
  457. GDK_SELECTION_TYPE_INTEGER = 19;
  458. GDK_SELECTION_TYPE_PIXMAP = 20;
  459. GDK_SELECTION_TYPE_WINDOW = 33;
  460. GDK_SELECTION_TYPE_STRING = 31;
  461. type
  462. PGdkExtensionMode = ^TGdkExtensionMode;
  463. TGdkExtensionMode = Longint;
  464. Const
  465. GDK_EXTENSION_EVENTS_NONE = 0;
  466. GDK_EXTENSION_EVENTS_ALL = 1;
  467. GDK_EXTENSION_EVENTS_CURSOR = 2;
  468. type
  469. PGdkIMStyle = ^TGdkIMStyle;
  470. TGdkIMStyle = Longint;
  471. Const
  472. GDK_IM_PREEDIT_AREA = $0001;
  473. GDK_IM_PREEDIT_CALLBACKS = $0002;
  474. GDK_IM_PREEDIT_POSITION = $0004;
  475. GDK_IM_PREEDIT_NOTHING = $0008;
  476. GDK_IM_PREEDIT_NONE = $0010;
  477. GDK_IM_PREEDIT_MASK = $001f;
  478. GDK_IM_STATUS_AREA = $0100;
  479. GDK_IM_STATUS_CALLBACKS = $0200;
  480. GDK_IM_STATUS_NOTHING = $0400;
  481. GDK_IM_STATUS_NONE = $0800;
  482. GDK_IM_STATUS_MASK = $0f00;
  483. type
  484. PGdkICAttributesType = ^TGdkICAttributesType;
  485. TGdkICAttributesType = longint;
  486. const
  487. GDK_IC_STYLE = 1 shl 0;
  488. GDK_IC_CLIENT_WINDOW = 1 shl 1;
  489. GDK_IC_ALL_REQ = 1 shl 0 + 1 shl 1;
  490. GDK_IC_FOCUS_WINDOW = 1 shl 2;
  491. GDK_IC_FILTER_EVENTS = 1 shl 3;
  492. GDK_IC_SPOT_LOCATION = 1 shl 4;
  493. GDK_IC_LINE_SPACING = 1 shl 5;
  494. GDK_IC_CURSOR = 1 shl 6;
  495. GDK_IC_PREEDIT_FONTSET = 1 shl 10;
  496. GDK_IC_PREEDIT_AREA = 1 shl 11;
  497. GDK_IC_PREEDIT_AREA_NEEDED = 1 shl 12;
  498. GDK_IC_PREEDIT_FOREGROUND = 1 shl 13;
  499. GDK_IC_PREEDIT_BACKGROUND = 1 shl 14;
  500. GDK_IC_PREEDIT_PIXMAP = 1 shl 15;
  501. GDK_IC_PREEDIT_COLORMAP = 1 shl 16;
  502. GDK_IC_STATUS_FONTSET = 1 shl 21;
  503. GDK_IC_STATUS_AREA = 1 shl 22;
  504. GDK_IC_STATUS_AREA_NEEDED = 1 shl 23;
  505. GDK_IC_STATUS_FOREGROUND = 1 shl 24;
  506. GDK_IC_STATUS_BACKGROUND = 1 shl 25;
  507. GDK_IC_STATUS_PIXMAP = 1 shl 26;
  508. GDK_IC_STATUS_COLORMAP = 1 shl 27;
  509. GDK_IC_PREEDIT_AREA_REQ = ((1 shl 11) + (1 shl 10));
  510. GDK_IC_PREEDIT_POSITION_REQ = (1 shl 11 + 1 shl 4 + 1 shl 10);
  511. GDK_IC_STATUS_AREA_REQ = (1 shl 22 or 1 shl 21);
  512. type
  513. PGdkWMDecoration = ^TGdkWMDecoration;
  514. TGdkWMDecoration = Longint;
  515. Const
  516. GDK_DECOR_ALL = (1) shl (0);
  517. GDK_DECOR_BORDER = (1) shl (1);
  518. GDK_DECOR_RESIZEH = (1) shl (2);
  519. GDK_DECOR_TITLE = (1) shl (3);
  520. GDK_DECOR_MENU = (1) shl (4);
  521. GDK_DECOR_MINIMIZE = (1) shl (5);
  522. GDK_DECOR_MAXIMIZE = (1) shl (6);
  523. type
  524. PGdkWMfunction = ^TGdkWMfunction;
  525. TGdkWMfunction = Longint;
  526. Const
  527. GDK_FUNC_ALL = (1) shl (0);
  528. GDK_FUNC_RESIZE = (1) shl (1);
  529. GDK_FUNC_MOVE = (1) shl (2);
  530. GDK_FUNC_MINIMIZE = (1) shl (3);
  531. GDK_FUNC_MAXIMIZE = (1) shl (4);
  532. GDK_FUNC_CLOSE = (1) shl (5);
  533. type
  534. PGdkInputfunction = ^TGdkInputfunction;
  535. TGdkInputfunction = procedure (data:gpointer; source:gint; condition:TGdkInputCondition);cdecl;
  536. PGdkDestroyNotify = ^TGdkDestroyNotify;
  537. TGdkDestroyNotify = procedure (data:gpointer);cdecl;
  538. type
  539. PGdkColorContextMode = ^TGdkColorContextMode;
  540. TGdkColorContextMode = longint;
  541. Const
  542. GDK_CC_MODE_UNDEFINED = 0;
  543. GDK_CC_MODE_BW = 1;
  544. GDK_CC_MODE_STD_CMAP = 2;
  545. GDK_CC_MODE_TRUE = 3;
  546. GDK_CC_MODE_MY_GRAY = 4;
  547. GDK_CC_MODE_PALETTE = 5;
  548. type
  549. PGdkOverlapType = ^TGdkOverlapType;
  550. TGdkOverlapType = Longint;
  551. Const
  552. GDK_OVERLAP_RECTANGLE_IN = 0;
  553. GDK_OVERLAP_RECTANGLE_OUT = 1;
  554. GDK_OVERLAP_RECTANGLE_PART = 2;
  555. type
  556. PGdkDragAction = ^TGdkDragAction;
  557. TGdkDragAction = longint;
  558. const
  559. GDK_ACTION_DEFAULT = 1 shl 0;
  560. GDK_ACTION_COPY = 1 shl 1;
  561. GDK_ACTION_MOVE = 1 shl 2;
  562. GDK_ACTION_LINK = 1 shl 3;
  563. GDK_ACTION_PRIVATE = 1 shl 4;
  564. GDK_ACTION_ASK = 1 shl 5;
  565. type
  566. PGdkDragProtocol = ^TGdkDragProtocol;
  567. TGdkDragProtocol = longint;
  568. const
  569. GDK_DRAG_PROTO_MOTIF = 0;
  570. GDK_DRAG_PROTO_XDND = 1;
  571. GDK_DRAG_PROTO_ROOTWIN = 2;
  572. GDK_DRAG_PROTO_NONE = 3;
  573. type
  574. PGdkColor = ^TGdkColor;
  575. TGdkColor = record
  576. pixel : gulong;
  577. red : gushort;
  578. green : gushort;
  579. blue : gushort;
  580. end;
  581. PGdkColormap = ^TGdkColormap;
  582. TGdkColormap = record
  583. size : gint;
  584. colors : PGdkColor;
  585. end;
  586. PGdkVisual = ^TGdkVisual;
  587. TGdkVisual = record
  588. thetype : TGdkVisualType;
  589. depth : gint;
  590. byte_order : TGdkByteOrder;
  591. colormap_size : gint;
  592. bits_per_rgb : gint;
  593. red_mask : guint32;
  594. red_shift : gint;
  595. red_prec : gint;
  596. green_mask : guint32;
  597. green_shift : gint;
  598. green_prec : gint;
  599. blue_mask : guint32;
  600. blue_shift : gint;
  601. blue_prec : gint;
  602. end;
  603. PGdkCursor = ^TGdkCursor;
  604. PGdkWindowAttr = ^TGdkWindowAttr;
  605. TGdkWindowAttr = record
  606. title : ^gchar;
  607. event_mask : gint;
  608. x : gint16;
  609. y : gint16;
  610. width : gint16;
  611. height : gint16;
  612. wclass : TGdkWindowClass;
  613. visual : PGdkVisual;
  614. colormap : PGdkColormap;
  615. window_type : TGdkWindowType;
  616. cursor : PGdkCursor;
  617. wmclass_name : ^gchar;
  618. wmclass_class : ^gchar;
  619. override_redirect : gboolean;
  620. end;
  621. PGdkGeometry = ^TGdkGeometry;
  622. TGdkGeometry = record
  623. min_width : gint;
  624. min_height : gint;
  625. max_width : gint;
  626. max_height : gint;
  627. base_width : gint;
  628. base_height : gint;
  629. width_inc : gint;
  630. height_inc : gint;
  631. min_aspect : gdouble;
  632. max_aspect : gdouble;
  633. end;
  634. PGdkImage = ^TGdkImage;
  635. PPGdkImage = ^PGdkImage;
  636. TGdkImage = record
  637. thetype : TGdkImageType;
  638. visual : PGdkVisual;
  639. byte_order : TGdkByteOrder;
  640. width : guint16;
  641. height : guint16;
  642. depth : guint16;
  643. bpp : guint16;
  644. bpl : guint16;
  645. mem : gpointer;
  646. end;
  647. PGdkFont = ^TGdkFont;
  648. TGdkFont = record
  649. thetype : TGdkFontType;
  650. ascent : gint;
  651. descent : gint;
  652. end;
  653. PGdkGCValues = ^TGdkGCValues;
  654. TGdkGCValues = record
  655. foreground : TGdkColor;
  656. background : TGdkColor;
  657. font : PGdkFont;
  658. thefunction : TGdkfunction;
  659. fill : TGdkFill;
  660. tile : PGdkPixmap;
  661. stipple : PGdkPixmap;
  662. clip_mask : PGdkPixmap;
  663. subwindow_mode : TGdkSubwindowMode;
  664. ts_x_origin : gint;
  665. ts_y_origin : gint;
  666. clip_x_origin : gint;
  667. clip_y_origin : gint;
  668. graphics_exposures : gint;
  669. line_width : gint;
  670. line_style : TGdkLineStyle;
  671. cap_style : TGdkCapStyle;
  672. join_style : TGdkJoinStyle;
  673. end;
  674. PGdkGC = ^TGdkGC;
  675. TGdkGC = record
  676. dummy_var : gint;
  677. end;
  678. PGdkPoint = ^TGdkPoint;
  679. TGdkPoint = record
  680. x : gint16;
  681. y : gint16;
  682. end;
  683. PGdkRectangle = ^TGdkRectangle;
  684. TGdkRectangle = record
  685. x : gint16;
  686. y : gint16;
  687. width : guint16;
  688. height : guint16;
  689. end;
  690. PGdkSegment = ^TGdkSegment;
  691. TGdkSegment = record
  692. x1 : gint16;
  693. y1 : gint16;
  694. x2 : gint16;
  695. y2 : gint16;
  696. end;
  697. TGdkCursor = record
  698. thetype : TGdkCursorType;
  699. end;
  700. PGdkColorContextDither = ^TGdkColorContextDither;
  701. TGdkColorContextDither = record
  702. fast_rgb : array[0..31] of array[0..31] of array[0..31] of gint;
  703. fast_err : array[0..31] of array[0..31] of array[0..31] of gint;
  704. fast_erg : array[0..31] of array[0..31] of array[0..31] of gint;
  705. fast_erb : array[0..31] of array[0..31] of array[0..31] of gint;
  706. end;
  707. PGdkColorContext = ^TGdkColorContext;
  708. TGdkColorContext = record
  709. visual : PGdkVisual;
  710. colormap : PGdkColormap;
  711. num_colors : gint;
  712. max_colors : gint;
  713. num_allocated : gint;
  714. mode : TGdkColorContextMode;
  715. need_to_free_colormap : gint;
  716. std_cmap_atom : TGdkAtom;
  717. clut : Pgulong;
  718. cmap : PGdkColor;
  719. color_hash : PGHashTable;
  720. palette : PGdkColor;
  721. num_palette : gint;
  722. fast_dither : PGdkColorContextDither;
  723. shifts : record
  724. red : gint;
  725. green : gint;
  726. blue : gint;
  727. end;
  728. masks : record
  729. red : gulong;
  730. green : gulong;
  731. blue : gulong;
  732. end;
  733. bits : record
  734. red : gint;
  735. green : gint;
  736. blue : gint;
  737. end;
  738. max_entry : gulong;
  739. black_pixel : gulong;
  740. white_pixel : gulong;
  741. end;
  742. PGdkDeviceKey = ^TGdkDeviceKey;
  743. TGdkDeviceKey = record
  744. keyval : guint;
  745. modifiers : TGdkModifierType;
  746. end;
  747. PGdkDeviceInfo = ^TGdkDeviceInfo;
  748. TGdkDeviceInfo = record
  749. deviceid : guint32;
  750. name : ^gchar;
  751. source : TGdkInputSource;
  752. mode : TGdkInputMode;
  753. has_cursor : gint;
  754. num_axes : gint;
  755. axes : ^TGdkAxisUse;
  756. num_keys : gint;
  757. keys : PGdkDeviceKey;
  758. end;
  759. PGdkTimeCoord = ^TGdkTimeCoord;
  760. TGdkTimeCoord = record
  761. time : guint32;
  762. x : gdouble;
  763. y : gdouble;
  764. pressure : gdouble;
  765. xtilt : gdouble;
  766. ytilt : gdouble;
  767. end;
  768. PGdkDragContext = ^TGdkDragContext;
  769. TGdkDragContext = record
  770. protocol : TGdkDragProtocol;
  771. is_source : gboolean;
  772. source_window : PGdkWindow;
  773. dest_window : PGdkWindow;
  774. targets : PGList;
  775. actions : TGdkDragAction;
  776. suggested_action : TGdkDragAction;
  777. action : TGdkDragAction;
  778. start_time : guint32;
  779. end;
  780. TGdkXEvent = pointer;
  781. PGdkXEvent = ^TGdkXEvent;
  782. PGdkEvent = ^TGdkEvent;
  783. TGdkEventFunc = procedure(event:PGdkEvent;data:gpointer);cdecl;
  784. TGdkFilterFunc = function (xevent:PGdkXEvent; event:PGdkEvent; data:gpointer):TGdkFilterReturn;cdecl;
  785. PGdkEventAny = ^TGdkEventAny;
  786. TGdkEventAny = record
  787. thetype : TGdkEventType;
  788. window : PGdkWindow;
  789. send_event : gint8;
  790. end;
  791. PGdkEventExpose = ^TGdkEventExpose;
  792. TGdkEventExpose = record
  793. thetype : TGdkEventType;
  794. window : PGdkWindow;
  795. send_event : gint8;
  796. area : TGdkRectangle;
  797. count : gint;
  798. end;
  799. PGdkEventNoExpose = ^TGdkEventNoExpose;
  800. TGdkEventNoExpose = record
  801. thetype : TGdkEventType;
  802. window : PGdkWindow;
  803. send_event : gint8;
  804. end;
  805. PGdkEventVisibility = ^TGdkEventVisibility;
  806. TGdkEventVisibility = record
  807. thetype : TGdkEventType;
  808. window : PGdkWindow;
  809. send_event : gint8;
  810. state : TGdkVisibilityState;
  811. end;
  812. PGdkEventMotion = ^TGdkEventMotion;
  813. TGdkEventMotion = record
  814. thetype : TGdkEventType;
  815. window : PGdkWindow;
  816. send_event : gint8;
  817. time : guint32;
  818. x : gdouble;
  819. y : gdouble;
  820. pressure : gdouble;
  821. xtilt : gdouble;
  822. ytilt : gdouble;
  823. state : guint;
  824. is_hint : gint16;
  825. source : TGdkInputSource;
  826. deviceid : guint32;
  827. x_root : gdouble;
  828. y_root : gdouble;
  829. end;
  830. PGdkEventButton = ^TGdkEventButton;
  831. TGdkEventButton = record
  832. thetype : TGdkEventType;
  833. window : PGdkWindow;
  834. send_event : gint8;
  835. time : guint32;
  836. x : gdouble;
  837. y : gdouble;
  838. pressure : gdouble;
  839. xtilt : gdouble;
  840. ytilt : gdouble;
  841. state : guint;
  842. button : guint;
  843. source : TGdkInputSource;
  844. deviceid : guint32;
  845. x_root : gdouble;
  846. y_root : gdouble;
  847. end;
  848. PGdkEventKey = ^TGdkEventKey;
  849. TGdkEventKey = record
  850. thetype : TGdkEventType;
  851. window : PGdkWindow;
  852. send_event : gint8;
  853. time : guint32;
  854. state : guint;
  855. keyval : guint;
  856. length : gint;
  857. thestring : Pgchar;
  858. end;
  859. PGdkEventCrossing = ^TGdkEventCrossing;
  860. TGdkEventCrossing = record
  861. thetype : TGdkEventType;
  862. window : PGdkWindow;
  863. send_event : gint8;
  864. subwindow : PGdkWindow;
  865. time : guint32;
  866. x : gdouble;
  867. y : gdouble;
  868. x_root : gdouble;
  869. y_root : gdouble;
  870. mode : TGdkCrossingMode;
  871. detail : TGdkNotifyType;
  872. focus : gboolean;
  873. state : guint;
  874. end;
  875. PGdkEventFocus = ^TGdkEventFocus;
  876. TGdkEventFocus = record
  877. thetype : TGdkEventType;
  878. window : PGdkWindow;
  879. send_event : gint8;
  880. thein : gint16;
  881. end;
  882. PGdkEventConfigure = ^TGdkEventConfigure;
  883. TGdkEventConfigure = record
  884. thetype : TGdkEventType;
  885. window : PGdkWindow;
  886. send_event : gint8;
  887. x : gint16;
  888. y : gint16;
  889. width : gint16;
  890. height : gint16;
  891. end;
  892. PGdkEventProperty = ^TGdkEventProperty;
  893. TGdkEventProperty = record
  894. thetype : TGdkEventType;
  895. window : PGdkWindow;
  896. send_event : gint8;
  897. atom : TGdkAtom;
  898. time : guint32;
  899. state : guint;
  900. end;
  901. PGdkEventSelection = ^TGdkEventSelection;
  902. TGdkEventSelection = record
  903. thetype : TGdkEventType;
  904. window : PGdkWindow;
  905. send_event : gint8;
  906. selection : TGdkAtom;
  907. target : TGdkAtom;
  908. theproperty : TGdkAtom;
  909. requestor : guint32;
  910. time : guint32;
  911. end;
  912. PGdkEventProximity = ^TGdkEventProximity;
  913. TGdkEventProximity = record
  914. thetype : TGdkEventType;
  915. window : PGdkWindow;
  916. send_event : gint8;
  917. time : guint32;
  918. source : TGdkInputSource;
  919. deviceid : guint32;
  920. end;
  921. PGdkEventClient = ^TGdkEventClient;
  922. TGdkEventClient = record
  923. thetype : TGdkEventType;
  924. window : PGdkWindow;
  925. send_event : gint8;
  926. message_type : TGdkAtom;
  927. data_format : gushort;
  928. dummy : gushort;
  929. data : record
  930. case longint of
  931. 0 : ( b : array[0..19] of char );
  932. 1 : ( s : array[0..9] of system.integer );
  933. 2 : ( l : array[0..4] of longint );
  934. end;
  935. end;
  936. PGdkEventDND = ^TGdkEventDND;
  937. TGdkEventDND = record
  938. thetype : TGdkEventType;
  939. window : PGdkWindow;
  940. send_event : gint8;
  941. context : PGdkDragContext;
  942. time : guint32;
  943. x_root : gshort;
  944. y_root : gshort;
  945. end;
  946. TGdkEvent = record
  947. case longint of
  948. 0 : ( thetype : TGdkEventType );
  949. 1 : ( any : TGdkEventAny );
  950. 2 : ( expose : TGdkEventExpose );
  951. 3 : ( no_expose : TGdkEventNoExpose );
  952. 4 : ( visibility : TGdkEventVisibility );
  953. 5 : ( motion : TGdkEventMotion );
  954. 6 : ( button : TGdkEventButton );
  955. 7 : ( key : TGdkEventKey );
  956. 8 : ( crossing : TGdkEventCrossing );
  957. 9 : ( focus_change : TGdkEventFocus );
  958. 10 : ( configure : TGdkEventConfigure );
  959. 11 : ( theproperty : TGdkEventProperty );
  960. 12 : ( selection : TGdkEventSelection );
  961. 13 : ( proximity : TGdkEventProximity );
  962. 14 : ( client : TGdkEventClient );
  963. 15 : ( dnd : TGdkEventDND );
  964. end;
  965. PGdkRegion = ^TGdkRegion;
  966. TGdkRegion = record
  967. user_data : gpointer;
  968. end;
  969. PGdkICAttr = ^TGdkICAttr;
  970. TGdkICAttr = record
  971. style : TGdkIMStyle;
  972. client_window : PGdkWindow;
  973. focus_window : PGdkWindow;
  974. filter_events : TGdkEventMask;
  975. spot_location : TGdkPoint;
  976. line_spacing : gint;
  977. cursor : PGdkCursor;
  978. preedit_fontset : PGdkFont;
  979. preedit_area : TGdkRectangle;
  980. preedit_area_needed : TGdkRectangle;
  981. preedit_foreground : TGdkColor;
  982. preedit_background : TGdkColor;
  983. preedit_pixmap : PGdkPixmap;
  984. preedit_colormap : PGdkColormap;
  985. status_fontset : PGdkFont;
  986. status_area : TGdkRectangle;
  987. status_area_needed : TGdkRectangle;
  988. status_foreground : TGdkColor;
  989. status_background : TGdkColor;
  990. status_pixmap : PGdkPixmap;
  991. status_colormap : PGdkColormap;
  992. end;
  993. {$endif read_interface}
  994. {
  995. $Log$
  996. Revision 1.2 2000-07-13 11:33:19 michael
  997. + removed logs
  998. }