1// Message constants that are not defined in LCL 2 3 WM_APP = $8000; 4 5// ExtTextOut Options 6 7 ETO_RTLREADING = 128; 8 9//DrawText options 10 11 DT_RTLREADING = 131072; 12 13// Clipboard constants 14 15 CF_BITMAP = 2; 16 CF_DIB = 8; 17 CF_PALETTE = 9; 18 CF_ENHMETAFILE = 14; 19 CF_METAFILEPICT = 3; 20 CF_OEMTEXT = 7; 21 CF_TEXT = 1; 22 CF_UNICODETEXT = 13; 23 CF_DIF = 5; 24 CF_DSPBITMAP = 130; 25 CF_DSPENHMETAFILE = 142; 26 CF_DSPMETAFILEPICT = 131; 27 CF_DSPTEXT = 129; 28 CF_GDIOBJFIRST = 768; 29 CF_GDIOBJLAST = 1023; 30 CF_HDROP = 15; 31 CF_LOCALE = 16; 32 CF_OWNERDISPLAY = 128; 33 CF_PENDATA = 10; 34 CF_PRIVATEFIRST = 512; 35 CF_PRIVATELAST = 767; 36 CF_RIFF = 11; 37 CF_SYLK = 4; 38 CF_WAVE = 12; 39 CF_TIFF = 6; 40 CF_MAX = 17; 41 42// Win32 colors 43 CLR_NONE = $ffffffff; 44 CLR_DEFAULT = $ff000000; 45 46//DrawFrameControl constants 47 DFCS_HOT = $1000; 48 49//Thread support 50 //This values is for win32, how about others?? 51 INFINITE = $FFFFFFFF; 52 53//OLE Support 54 E_OUTOFMEMORY = HRESULT($8007000E); 55 E_INVALIDARG = HRESULT($80070057); 56 E_NOINTERFACE = HRESULT($80004002); 57 E_POINTER = HRESULT($80004003); 58 E_HANDLE = HRESULT($80070006); 59 E_ABORT = HRESULT($80004004); 60 E_FAIL = HRESULT($80004005); 61 E_ACCESSDENIED = HRESULT($80070005); 62 63 DV_E_TYMED = HRESULT($80040069); 64 DV_E_CLIPFORMAT = HRESULT($8004006A); 65 DV_E_LINDEX = HRESULT($80040068); 66 DV_E_DVASPECT = HRESULT($8004006B); 67 68 OLE_E_ADVISENOTSUPPORTED = HRESULT($80040003); 69 OLE_S_USEREG = HRESULT($00040000); 70 71 DATA_S_SAMEFORMATETC = HRESULT($00040130); 72 73 DRAGDROP_S_DROP = HRESULT($00040100); 74 DRAGDROP_S_CANCEL = HRESULT($00040101); 75 DRAGDROP_S_USEDEFAULTCURSORS = HRESULT($00040102); 76 77 NOERROR = 0; 78 79 SPI_GETDRAGFULLWINDOWS = 38; 80 81// windows management 82 SWP_HIDEWINDOW = 128; 83 SWP_SHOWWINDOW = 64; 84 85//Imagelists 86 ILD_NORMAL = 0; 87 88// Set WindowPos 89 SWP_FRAMECHANGED = 32; 90 SWP_NOOWNERZORDER = 512; 91 SWP_NOSENDCHANGING = 1024; 92 93 { RedrawWindow } 94 RDW_ERASE = 4; 95 RDW_FRAME = 1024; 96 RDW_INTERNALPAINT = 2; 97 RDW_INVALIDATE = 1; 98 RDW_NOERASE = 32; 99 RDW_NOFRAME = 2048; 100 RDW_NOINTERNALPAINT = 16; 101 RDW_VALIDATE = 8; 102 RDW_ERASENOW = 512; 103 RDW_UPDATENOW = 256; 104 RDW_ALLCHILDREN = 128; 105 RDW_NOCHILDREN = 64; 106 107//SetRedraw 108 WM_SETREDRAW = 11; 109 110//Dummy 111 CM_PARENTFONTCHANGED = 1999; 112 113//Wheel 114 WHEEL_DELTA = 120; 115 WHEEL_PAGESCROLL = High(DWord); 116 SPI_GETWHEELSCROLLLINES = 104; 117 118//MultiByte 119 MB_USEGLYPHCHARS = 4; 120 LOCALE_IDEFAULTANSICODEPAGE = 4100; 121 122//Image list 123 ILD_TRANSPARENT = $00000001; 124 ILD_MASK = $00000010; 125 ILD_IMAGE = $00000020; 126 127 ILD_ROP = $00000040; 128 129 ILD_BLEND25 = $00000002; 130 ILD_BLEND50 = $00000004; 131 ILD_OVERLAYMASK = $00000F00; 132 133 { GetDCEx } 134 DCX_WINDOW = $1; 135 DCX_CACHE = $2; 136 DCX_PARENTCLIP = $20; 137 DCX_CLIPSIBLINGS = $10; 138 DCX_CLIPCHILDREN = $8; 139 DCX_NORESETATTRS = $4; 140 DCX_LOCKWINDOWUPDATE = $400; 141 DCX_EXCLUDERGN = $40; 142 DCX_INTERSECTRGN = $80; 143 DCX_VALIDATE = $200000; 144 145 SCantWriteResourceStreamError = 'CantWriteResourceStreamError'; 146 147 //command 148 EN_UPDATE = 1024; 149 150 ES_AUTOHSCROLL = $80; 151 ES_AUTOVSCROLL = $40; 152 ES_CENTER = $1; 153 ES_LEFT = 0; 154 ES_LOWERCASE = $10; 155 ES_MULTILINE = $4; 156 ES_NOHIDESEL = $100; 157 158 159 EM_SETRECTNP = 180; 160 161 DT_END_ELLIPSIS = 32768; 162