ich habe diesen Quellcode:
Code: Alles auswählen
var
wc: TWndClassEx;
begin
wc.cbSize := SizeOf(TWndClassEx);
wc.Style := CS_HREDRAW or CS_VREDRAW;
wc.lpfnWndProc := @MyWindowProc;
wc.cbClsExtra := 0;
wc.cbWndExtra := 0;
wc.lpszMenuName := nil;
wc.lpszClassName := 'Hauptfenster';
wc.hIconSm := 0;
RegisterClassEx(wc);
CreateWindowEx(
0,
'Hauptfenster',
'Testanwendung',
WS_CAPTION,
100,50,
800,600,
0,
0,
0,
nil
);
Weil mich dieses Verhalten irretiert, habe ich diese Frage in "Benutzung der IDE" gepostet, da Freepascal sehr viele Include Dateien verwendet. Kann es sein, dass der Compiler da durcheinander kommt?
Ich benutze hierfür Lazarus 1.6.4!
.