Edit Feld eingabe festlegen --> Problem

[The_Tremendous]

Hallo.


Ich möchte bei einem edit Feld nur die Eingabe der Zahlen 0-9 und das ',' zulassen.

Dazu habe ich bisher folgendes geschrieben:

Delphi-Quellcode:

procedure TfrmFahrzeugEingabe.CheckZiffern(var key : Char);
begin
  if not (key in ['0' .. '9', ',' ,#8,#9]) then
    key := #0;
end;

Das funktioniert auch soweit. Jetzt habe ich aber das Problem, das der User immer noch das Komma mehrmals eingeben kann. Wie kann ich jetzt festlegen, dass der User das Komma nur einmal eingeben kann und das nach dem Komma nur 2 Zahlen stehen dürfen ??


The_tremendous

[supermuckl]

nach der checkziffern funktion nochmal eine neue aufrufen, die den gesamten text durchwühlt und das alles überprüft und wenn was net stimmt, das letzte zeichen löscht oderso

[The_Tremendous]

So weit war ich auch schon, nur bei der Ausführung dieses Gedankens komme ich nicht weiter .


Gruß The_Tremendous

[Nikolas]

Ich habe hier in der Code-libraray mal etwas geschrieben, mit dem du dein Edit passend zuschneiden kannst.

[grayfox]

nimm ein TMaskEdit und schon bist du die kommaprobleme los

mfg, stefan

[The_Tremendous]

Ok, dank Toxman habe ich das Prob nun gelöst. Vielen Dank


Gruß The_Tremendous