Edit-Feld nur Zahlen erlauben

[StefanDP]

Hi!
Ich hab ein Edit nonVCL und möchte im prinzip folgenden code realisieren:

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); 
begin 
     if not (key in [#8,#48..#57]) then key:=#0; 
end

wie mach ich das jetzt nonvcl?
wenn ich mit meiner wndproc WM_KEYDOWN abfrage, springt das nur an, wenn der focus aufm fenster ist und nicht, wenn der focus im edit ist, bzw. das edit aktiv ist.

stefan