Nur Zahlen im TEdit, aber auch Kommazahlen

[Martin K]

Hmm...

Wie wärs damit?
Im Ereignis OnKeyPress von Deinem TEdit:

Delphi-Quellcode:

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