Einzelnen Beitrag anzeigen

StefanDP

Registriert seit: 11. Apr 2004
294 Beiträge
 
#1

Edit-Feld nur Zahlen erlauben

  Alt 10. Jul 2004, 18:16
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
  Mit Zitat antworten Zitat