Fenster erstellen mit TP für Windows?

[Rastaman]

Naja gut, ich habs geschafft n Button in die Konsole zu pflanzen, das is ja auch schon was
Allerdings hab ich jetz kp wie ich auf die Ereignisse reagieren soll

//Edit: Hier ma der Code:

Delphi-Quellcode:

program bla;
uses WinCrt, WinProcs, WinTypes;
var
  wnd, wnd2: HWND;
begin
  wnd := FindWindow('TPWinCrt', nil);
  wnd2 := CreateWindow('EDIT', ':D',
                       WS_CHILD or WS_VISIBLE
                       or WS_BORDER or ES_MULTILINE,
                       20, 20, 60, 60,
                       wnd, 4, hInstance, nil);
  ReadLn;
  SendMessage(wnd2, WM_SETTEXT, 0, Integer(PChar('HALLO')));
  ReadLn;
end.

Das Edit wird auch auf der Konsole erstellt, aber WM_SETTEXT funktioniert nicht