paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 06:06:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

* second batch Lazarus' win32extra merging. Basic migration done, though a few discussion items remain open.

Browse Source 
git-svn-id: trunk@10269 -
This commit is contained in:
marco 2008-02-10 14:17:11 +00:00
parent c6c6bbd13a
commit 4774f766e0
3 changed files with 42 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
rtl/win/wininc/base.inc
View File

@ -251,6 +251,7 @@
SERVICE_STATUS_HANDLE = DWORD; SERVICE_STATUS_HANDLE = DWORD;
{$ifdef UNICODE} {$ifdef UNICODE}
TBYTE = word; TBYTE = word;
TCHAR = widechar; TCHAR = widechar;
@ -271,7 +272,7 @@
WPARAM = LONG_PTR; WPARAM = LONG_PTR;
PLPSTR = ^LPSTR; PLPSTR = ^LPSTR;
PLPWStr= ^LPWStr; PLPWStr= ^LPWStr;
COLOR16 = ushort;
{ {
Enumerations Enumerations
} }

11
rtl/win/wininc/defines.inc
View File

@ -890,6 +890,7 @@
DC_EXTRA = 9; DC_EXTRA = 9;
DC_FIELDS = 1; DC_FIELDS = 1;
DC_FILEDEPENDENCIES = 14; DC_FILEDEPENDENCIES = 14;
DC_MAXEXTENT = 5; DC_MAXEXTENT = 5;
DC_MINEXTENT = 4; DC_MINEXTENT = 4;
DC_ORIENTATION = 17; DC_ORIENTATION = 17;
@ -934,8 +935,13 @@
IDANI_OPEN = 1; IDANI_OPEN = 1;
IDANI_CLOSE = 2; IDANI_CLOSE = 2;
{ DrawCaption } { DrawCaption }
DC_ACTIVE = 1; DC_ACTIVE = 1;
DC_SMALLCAP = 2; DC_SMALLCAP = 2;
DC_ICON = 4;
DC_TEXT = 8;
DC_INBUTTON = 16;
DC_GRADIENT = 32;
DC_BUTTONS = $1000;
{ DrawEdge } { DrawEdge }
BDR_RAISEDINNER = 4; BDR_RAISEDINNER = 4;
BDR_SUNKENINNER = 8; BDR_SUNKENINNER = 8;
@ -5616,7 +5622,8 @@ const
GA_ROOT = 2; { The window's root window } GA_ROOT = 2; { The window's root window }
GA_ROOTOWNER = 3; { The window's owner } GA_ROOTOWNER = 3; { The window's owner }
AC_SRC_OVER = $00;
AC_SRC_ALPHA = $01;
{$endif read_interface} {$endif read_interface}

31
rtl/win/wininc/struct.inc
View File

@ -7389,6 +7389,37 @@ type
PComboboxInfo = ^TComboboxInfo; PComboboxInfo = ^TComboboxInfo;
LPComboboxInfo = PComboboxInfo; LPComboboxInfo = PComboboxInfo;
_TRIVERTEX = record
x : LONG;
y : LONG;
Red : COLOR16;
Green : COLOR16;
Blue : COLOR16;
Alpha : COLOR16;
end;
TRIVERTEX = _TRIVERTEX;
PTRIVERTEX = ^_TRIVERTEX;
LPTRIVERTEX = PTRIVERTEX;
_GRADIENT_TRIANGLE = record
Vertex1 : ULONG;
Vertex2 : ULONG;
Vertex3 : ULONG;
end;
GRADIENT_TRIANGLE = _GRADIENT_TRIANGLE;
TGRADIENT_TRIANGLE = _GRADIENT_TRIANGLE;
PGRADIENT_TRIANGLE = ^_GRADIENT_TRIANGLE;
LPGRADIENT_TRIANGLE = PGRADIENT_TRIANGLE;
_GRADIENT_RECT = record
UpperLeft : ULONG;
LowerRight : ULONG;
end;
GRADIENT_RECT = _GRADIENT_RECT;
TGRADIENT_RECT = _GRADIENT_RECT;
PGRADIENT_RECT = ^_GRADIENT_RECT;
LPGRADIENT_RECT = PGRADIENT_RECT;
{$endif read_interface} {$endif read_interface}