123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401 |
- #
- # Automatically converted by H2Pas 0.99.15 from x.h
- # The following command line parameters were used:
- # -p
- # -T
- # -S
- # -d
- # -c
- # x.h
- #
- # Pointers to basic pascal types, inserted by h2pas conversion program.
- const
- X_PROTOCOL* = 11
- X_PROTOCOL_REVISION* = 0
- type
- PXID* = ptr TXID
- TXID* = culong
- PMask* = ptr TMask
- TMask* = culong
- PPAtom* = ptr PAtom
- PAtom* = ptr TAtom
- TAtom* = culong
- PVisualID* = ptr TVisualID
- TVisualID* = culong
- PTime* = ptr TTime
- TTime* = culong
- PPWindow* = ptr PWindow
- PWindow* = ptr TWindow
- TWindow* = TXID
- PDrawable* = ptr TDrawable
- TDrawable* = TXID
- PFont* = ptr TFont
- TFont* = TXID
- PPixmap* = ptr TPixmap
- TPixmap* = TXID
- PCursor* = ptr TCursor
- TCursor* = TXID
- PColormap* = ptr TColormap
- TColormap* = TXID
- PGContext* = ptr TGContext
- TGContext* = TXID
- PKeySym* = ptr TKeySym
- TKeySym* = TXID
- PKeyCode* = ptr TKeyCode
- TKeyCode* = cuchar
- proc `==`*(a, b: TAtom): bool =
- return system.`==`(a,b)
- const
- None* = 0
- ParentRelative* = 1
- CopyFromParent* = 0
- PointerWindow* = 0
- InputFocus* = 1
- PointerRoot* = 1
- AnyPropertyType* = 0
- AnyKey* = 0
- AnyButton* = 0
- AllTemporary* = 0
- CurrentTime* = 0
- NoSymbol* = 0
- NoEventMask* = 0
- KeyPressMask* = 1 shl 0
- KeyReleaseMask* = 1 shl 1
- ButtonPressMask* = 1 shl 2
- ButtonReleaseMask* = 1 shl 3
- EnterWindowMask* = 1 shl 4
- LeaveWindowMask* = 1 shl 5
- PointerMotionMask* = 1 shl 6
- PointerMotionHintMask* = 1 shl 7
- Button1MotionMask* = 1 shl 8
- Button2MotionMask* = 1 shl 9
- Button3MotionMask* = 1 shl 10
- Button4MotionMask* = 1 shl 11
- Button5MotionMask* = 1 shl 12
- ButtonMotionMask* = 1 shl 13
- KeymapStateMask* = 1 shl 14
- ExposureMask* = 1 shl 15
- VisibilityChangeMask* = 1 shl 16
- StructureNotifyMask* = 1 shl 17
- ResizeRedirectMask* = 1 shl 18
- SubstructureNotifyMask* = 1 shl 19
- SubstructureRedirectMask* = 1 shl 20
- FocusChangeMask* = 1 shl 21
- PropertyChangeMask* = 1 shl 22
- ColormapChangeMask* = 1 shl 23
- OwnerGrabButtonMask* = 1 shl 24
- KeyPress* = 2
- KeyRelease* = 3
- ButtonPress* = 4
- ButtonRelease* = 5
- MotionNotify* = 6
- EnterNotify* = 7
- LeaveNotify* = 8
- FocusIn* = 9
- FocusOut* = 10
- KeymapNotify* = 11
- Expose* = 12
- GraphicsExpose* = 13
- NoExpose* = 14
- VisibilityNotify* = 15
- CreateNotify* = 16
- DestroyNotify* = 17
- UnmapNotify* = 18
- MapNotify* = 19
- MapRequest* = 20
- ReparentNotify* = 21
- ConfigureNotify* = 22
- ConfigureRequest* = 23
- GravityNotify* = 24
- ResizeRequest* = 25
- CirculateNotify* = 26
- CirculateRequest* = 27
- PropertyNotify* = 28
- SelectionClear* = 29
- SelectionRequest* = 30
- SelectionNotify* = 31
- ColormapNotify* = 32
- ClientMessage* = 33
- MappingNotify* = 34
- LASTEvent* = 35
- ShiftMask* = 1 shl 0
- LockMask* = 1 shl 1
- ControlMask* = 1 shl 2
- Mod1Mask* = 1 shl 3
- Mod2Mask* = 1 shl 4
- Mod3Mask* = 1 shl 5
- Mod4Mask* = 1 shl 6
- Mod5Mask* = 1 shl 7
- ShiftMapIndex* = 0
- LockMapIndex* = 1
- ControlMapIndex* = 2
- Mod1MapIndex* = 3
- Mod2MapIndex* = 4
- Mod3MapIndex* = 5
- Mod4MapIndex* = 6
- Mod5MapIndex* = 7
- Button1Mask* = 1 shl 8
- Button2Mask* = 1 shl 9
- Button3Mask* = 1 shl 10
- Button4Mask* = 1 shl 11
- Button5Mask* = 1 shl 12
- AnyModifier* = 1 shl 15
- Button1* = 1
- Button2* = 2
- Button3* = 3
- Button4* = 4
- Button5* = 5
- NotifyNormal* = 0
- NotifyGrab* = 1
- NotifyUngrab* = 2
- NotifyWhileGrabbed* = 3
- NotifyHint* = 1
- NotifyAncestor* = 0
- NotifyVirtual* = 1
- NotifyInferior* = 2
- NotifyNonlinear* = 3
- NotifyNonlinearVirtual* = 4
- NotifyPointer* = 5
- NotifyPointerRoot* = 6
- NotifyDetailNone* = 7
- VisibilityUnobscured* = 0
- VisibilityPartiallyObscured* = 1
- VisibilityFullyObscured* = 2
- PlaceOnTop* = 0
- PlaceOnBottom* = 1
- FamilyInternet* = 0
- FamilyDECnet* = 1
- FamilyChaos* = 2
- FamilyInternet6* = 6
- FamilyServerInterpreted* = 5
- PropertyNewValue* = 0
- PropertyDelete* = 1
- ColormapUninstalled* = 0
- ColormapInstalled* = 1
- GrabModeSync* = 0
- GrabModeAsync* = 1
- GrabSuccess* = 0
- AlreadyGrabbed* = 1
- GrabInvalidTime* = 2
- GrabNotViewable* = 3
- GrabFrozen* = 4
- AsyncPointer* = 0
- SyncPointer* = 1
- ReplayPointer* = 2
- AsyncKeyboard* = 3
- SyncKeyboard* = 4
- ReplayKeyboard* = 5
- AsyncBoth* = 6
- SyncBoth* = 7
- RevertToNone* = None
- RevertToPointerRoot* = PointerRoot
- RevertToParent* = 2
- Success* = 0
- BadRequest* = 1
- BadValue* = 2
- BadWindow* = 3
- BadPixmap* = 4
- BadAtom* = 5
- BadCursor* = 6
- BadFont* = 7
- BadMatch* = 8
- BadDrawable* = 9
- BadAccess* = 10
- BadAlloc* = 11
- BadColor* = 12
- BadGC* = 13
- BadIDChoice* = 14
- BadName* = 15
- BadLength* = 16
- BadImplementation* = 17
- FirstExtensionError* = 128
- LastExtensionError* = 255
- InputOutput* = 1
- InputOnly* = 2
- CWBackPixmap* = 1 shl 0
- CWBackPixel* = 1 shl 1
- CWBorderPixmap* = 1 shl 2
- CWBorderPixel* = 1 shl 3
- CWBitGravity* = 1 shl 4
- CWWinGravity* = 1 shl 5
- CWBackingStore* = 1 shl 6
- CWBackingPlanes* = 1 shl 7
- CWBackingPixel* = 1 shl 8
- CWOverrideRedirect* = 1 shl 9
- CWSaveUnder* = 1 shl 10
- CWEventMask* = 1 shl 11
- CWDontPropagate* = 1 shl 12
- CWColormap* = 1 shl 13
- CWCursor* = 1 shl 14
- CWX* = 1 shl 0
- CWY* = 1 shl 1
- CWWidth* = 1 shl 2
- CWHeight* = 1 shl 3
- CWBorderWidth* = 1 shl 4
- CWSibling* = 1 shl 5
- CWStackMode* = 1 shl 6
- ForgetGravity* = 0
- NorthWestGravity* = 1
- NorthGravity* = 2
- NorthEastGravity* = 3
- WestGravity* = 4
- CenterGravity* = 5
- EastGravity* = 6
- SouthWestGravity* = 7
- SouthGravity* = 8
- SouthEastGravity* = 9
- StaticGravity* = 10
- UnmapGravity* = 0
- NotUseful* = 0
- WhenMapped* = 1
- Always* = 2
- IsUnmapped* = 0
- IsUnviewable* = 1
- IsViewable* = 2
- SetModeInsert* = 0
- SetModeDelete* = 1
- DestroyAll* = 0
- RetainPermanent* = 1
- RetainTemporary* = 2
- Above* = 0
- Below* = 1
- TopIf* = 2
- BottomIf* = 3
- Opposite* = 4
- RaiseLowest* = 0
- LowerHighest* = 1
- PropModeReplace* = 0
- PropModePrepend* = 1
- PropModeAppend* = 2
- GXclear* = 0x00000000
- GXand* = 0x00000001
- GXandReverse* = 0x00000002
- GXcopy* = 0x00000003
- GXandInverted* = 0x00000004
- GXnoop* = 0x00000005
- GXxor* = 0x00000006
- GXor* = 0x00000007
- GXnor* = 0x00000008
- GXequiv* = 0x00000009
- GXinvert* = 0x0000000A
- GXorReverse* = 0x0000000B
- GXcopyInverted* = 0x0000000C
- GXorInverted* = 0x0000000D
- GXnand* = 0x0000000E
- GXset* = 0x0000000F
- LineSolid* = 0
- LineOnOffDash* = 1
- LineDoubleDash* = 2
- CapNotLast* = 0
- CapButt* = 1
- CapRound* = 2
- CapProjecting* = 3
- JoinMiter* = 0
- JoinRound* = 1
- JoinBevel* = 2
- FillSolid* = 0
- FillTiled* = 1
- FillStippled* = 2
- FillOpaqueStippled* = 3
- EvenOddRule* = 0
- WindingRule* = 1
- ClipByChildren* = 0
- IncludeInferiors* = 1
- Unsorted* = 0
- YSorted* = 1
- YXSorted* = 2
- YXBanded* = 3
- CoordModeOrigin* = 0
- CoordModePrevious* = 1
- Complex* = 0
- Nonconvex* = 1
- Convex* = 2
- ArcChord* = 0
- ArcPieSlice* = 1
- GCFunction* = 1 shl 0
- GCPlaneMask* = 1 shl 1
- GCForeground* = 1 shl 2
- GCBackground* = 1 shl 3
- GCLineWidth* = 1 shl 4
- GCLineStyle* = 1 shl 5
- GCCapStyle* = 1 shl 6
- GCJoinStyle* = 1 shl 7
- GCFillStyle* = 1 shl 8
- GCFillRule* = 1 shl 9
- GCTile* = 1 shl 10
- GCStipple* = 1 shl 11
- GCTileStipXOrigin* = 1 shl 12
- GCTileStipYOrigin* = 1 shl 13
- GCFont* = 1 shl 14
- GCSubwindowMode* = 1 shl 15
- GCGraphicsExposures* = 1 shl 16
- GCClipXOrigin* = 1 shl 17
- GCClipYOrigin* = 1 shl 18
- GCClipMask* = 1 shl 19
- GCDashOffset* = 1 shl 20
- GCDashList* = 1 shl 21
- GCArcMode* = 1 shl 22
- GCLastBit* = 22
- FontLeftToRight* = 0
- FontRightToLeft* = 1
- FontChange* = 255
- XYBitmap* = 0
- XYPixmap* = 1
- ZPixmap* = 2
- AllocNone* = 0
- AllocAll* = 1
- DoRed* = 1 shl 0
- DoGreen* = 1 shl 1
- DoBlue* = 1 shl 2
- CursorShape* = 0
- TileShape* = 1
- StippleShape* = 2
- AutoRepeatModeOff* = 0
- AutoRepeatModeOn* = 1
- AutoRepeatModeDefault* = 2
- LedModeOff* = 0
- LedModeOn* = 1
- KBKeyClickPercent* = 1 shl 0
- KBBellPercent* = 1 shl 1
- KBBellPitch* = 1 shl 2
- KBBellDuration* = 1 shl 3
- KBLed* = 1 shl 4
- KBLedMode* = 1 shl 5
- KBKey* = 1 shl 6
- KBAutoRepeatMode* = 1 shl 7
- MappingSuccess* = 0
- MappingBusy* = 1
- MappingFailed* = 2
- MappingModifier* = 0
- MappingKeyboard* = 1
- MappingPointer* = 2
- DontPreferBlanking* = 0
- PreferBlanking* = 1
- DefaultBlanking* = 2
- DisableScreenSaver* = 0
- DisableScreenInterval* = 0
- DontAllowExposures* = 0
- AllowExposures* = 1
- DefaultExposures* = 2
- ScreenSaverReset* = 0
- ScreenSaverActive* = 1
- HostInsert* = 0
- HostDelete* = 1
- EnableAccess* = 1
- DisableAccess* = 0
- StaticGray* = 0
- GrayScale* = 1
- StaticColor* = 2
- PseudoColor* = 3
- TrueColor* = 4
- DirectColor* = 5
- LSBFirst* = 0
- MSBFirst* = 1
- # implementation
|