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

* some property sheet related structs fixed

Browse Source
This commit is contained in:
florian 2002-02-07 13:04:40 +00:00
parent 4907deb2a6
commit 3924bd6ecf
1 changed files with 40 additions and 34 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

74
rtl/win32/wininc/struct.inc
View File

@ -4969,21 +4969,19 @@
dwSize : DWORD; dwSize : DWORD;
dwFlags : DWORD; dwFlags : DWORD;
hInstance : HINST; hInstance : HINST;
u1 : record case longint of
case longint of 0 : (pszTemplate : LPCTSTR);
0 : ( pszTemplate : LPCTSTR ); 1 : (pResource : LPCDLGTEMPLATE;
1 : ( pResource : LPCDLGTEMPLATE ); case longint of
end; 0 : (hIcon : HICON);
u2 : record 1 : (pszIcon : LPCTSTR;
case longint of pszTitle : LPCTSTR;
0 : ( hIcon : HICON ); pfnDlgProc : DLGPROC;
1 : ( pszIcon : LPCTSTR ); lParam : LPARAM;
end; pfnCallback : LPFNPSPCALLBACK;
pszTitle : LPCTSTR; pcRefParent : ^UINT;
pfnDlgProc : DLGPROC; );
lParam : LPARAM; );
pfnCallback : LPFNPSPCALLBACK;
pcRefParent : ^UINT;
end; end;
LPPROPSHEETPAGE = ^PROPSHEETPAGE; LPPROPSHEETPAGE = ^PROPSHEETPAGE;
LPCPROPSHEETPAGE = ^PROPSHEETPAGE; LPCPROPSHEETPAGE = ^PROPSHEETPAGE;
@ -5000,24 +4998,29 @@
dwFlags : DWORD; dwFlags : DWORD;
hwndParent : HWND; hwndParent : HWND;
hInstance : HINST; hInstance : HINST;
u1 : record case longint of
case longint of 0 : (hIcon : HICON);
0 : ( hIcon : HICON ); 1 : (pszIcon : LPCTSTR;
1 : ( pszIcon : LPCTSTR ); pszCaption : LPCTSTR;
end; nPages : UINT;
pszCaption : LPCTSTR; case longint of
nPages : UINT; 0 : (nStartPage : UINT);
u2 : record 1 : (pStartPage : LPCTSTR;
case longint of case longint of
0 : ( nStartPage : UINT ); 0 : (ppsp : LPCPROPSHEETPAGE);
1 : ( pStartPage : LPCTSTR ); 1 : (phpage : ^HPROPSHEETPAGE;
end; pfnCallback : PFNPROPSHEETCALLBACK;
u3 : record case longint of
case longint of 0 : (hbmWatermark : HBITMAP);
0 : ( ppsp : LPCPROPSHEETPAGE ); 1 : (pszbmWatermark : LPCTSTR;
1 : ( phpage : ^HPROPSHEETPAGE ); hplWatermark : HPALETTE;
end; case longint of
pfnCallback : PFNPROPSHEETCALLBACK; 0 : (hbmHeader : HBITMAP);
1 : (pszbmHeader: PAnsiChar);
);
);
);
);
end; end;
LPPROPSHEETHEADER = ^PROPSHEETHEADER; LPPROPSHEETHEADER = ^PROPSHEETHEADER;
LPCPROPSHEETHEADER = ^PROPSHEETHEADER; LPCPROPSHEETHEADER = ^PROPSHEETHEADER;
@ -7003,7 +7006,10 @@ type
{ {
$Log$ $Log$
Revision 1.11 2002-01-19 11:58:21 peter Revision 1.12 2002-02-07 13:04:40 florian
* some property sheet related structs fixed
Revision 1.11 2002/01/19 11:58:21 peter
* more functions from webbugs * more functions from webbugs
Revision 1.10 2001/08/19 09:27:52 florian Revision 1.10 2001/08/19 09:27:52 florian