Zahl in Edit Feld eingeben

[Klaus01]

Zitat von FAlter:

Zu dem Beitrag vor mir in dem roten Rahmen: Man sollte zumindest - noch erlauben.

Delphi-Quellcode:

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

Mfg
FAlter

*) Geiler Neologismus!

wozu?

Zitat von rambospike:

edit-feld bleibt und eine Zahl zwischen 0 und 50

Grüße
Klaus