Es ist eine
VCL Anwendung!
Habe es jetzt aber geschafft! Habe nochmal deinen Code komplett kopiert und neu eingefügt.
Auch waren meine Funktionen wie MainWndProc nicht Global erreichbar.
Ich bekomme zwar immer noch den Error 120 nach dem erzeugen des Parents, aber es werden Parent und Child erzeugt!
Auch kann ich nun eine Funktion statt der Prozedur verwenden!
Danke!
Anscheinend hat es auch etwas mit dem zu tun:
Delphi-Quellcode:
function ChildWndProc(hWindow: HWND; Msg: UINT;
wParam: wParam; lParam: lParam): HRESULT; stdcall;
begin
Result := 1;
end;
Wenn ich Result := 0 zurück gebe werden Childs nicht erzeugt!