Für mich sieht das aus wie Luckie schon sagt
Da wird versucht von TForm (existierendes Window) ein neues Window zu erstellen.
Kann mit den bißchen Quelltext ohne zu sehen wie die Classe aufgebaut ist.
Auch nur Raten.
gruss
Entschuldigung, die Klasse erbt von gar nichts. Definition:
Delphi-Quellcode:
type
TSForm = class
private
hwnd : HWND;
windowClass : TWndClass;
w, h : Integer;
function getAppData() : String;
procedure init();
procedure finale();
procedure keypress(c : Char);
procedure ShowError(ErrorText: PChar);
published
function WindowProcedure(HWND: HWND; uMsg: UINT; wParam: wParam; lParam: lParam): lResult; stdcall;
public
appName : String;
constructor Create();
procedure Show();
destructor Close();
end;