On Sunday 08 January 2006 15.43, Hans Mårtensson wrote:
> Now, I'm not familiar with the development of the PFC,
> where and when can I download the corrected version of 2.0.2?
Copy the modified definition in type section of your program file:
Program test;
// Program for testing dialogue boxes
{$APPTYPE GUI}
Uses windows;
Const
AppName = 'Lydexperiment';
type
DLGTEMPLATE = packed record //from rtl/win32/wininc/struct.inc
style : DWORD;
dwExtendedStyle : DWORD;
cdit : WORD;
x : smallint;
y : smallint;
cx : smallint;
cy : smallint;
end;
DLGITEMTEMPLATE = packed record
style : DWORD;
dwExtendedStyle : DWORD;
x : smallint;
y : smallint;
cx : smallint;
cy : smallint;
id : WORD;
end;
var
AMessage: Msg; hWindow: HWnd;
pbox2: pointer; box2var1, box2var2: longint;
.....
Martin
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
