Hi,

ich habe ein Programm geschrieben, der verrückt spielt, wenn man ein Komma anstelle eines Punktes in ein EDIT mit StrToFloat Außerdem mag er es nicht, wenn Textzeichen in diesem EDIT auftauchen.

Wie kann ich die ERROR-Nachricht umgehen sodass es folgendes macht?

markieren

Delphi-Quellcode:

//in einer Prozedur, die nach dem umgehen einer ERROR-Nachricht abläuft
ShowMessage('Bitte nur eine Zahl eingeben! Keinen Text!');

Hallo

markieren

Delphi-Quellcode:

try
x:=strtofloat(Edit1.Text);
except
ShowMessage('Bitte nur eine Zahl eingeben! Keinen Text!');
end;

Danke für die schnelle Antwort!

Hi,

TryStrToFloat,
StrToFloatDef

wären evtl. auch noch intressant.

Hai,

ich bin eigentlich immer dafür das der Anwender keine "falschen" Eingaben machen kann.
Wenn er nur Zahlen und eine Dezimaltrennzeichen eingeben soll dann muss man dafür sorgen das er auch nur diese Zeichen eingeben kann.

Oder du fängst die Tastendrücke in OnKeyPress ab und ersetzt ungültige Zeichen (Textzeichen) durch #0 und das Komma durch einen Punkt. Dann kann man einfach keinen Text eingeben.

(da ist mir wohl Sharky zuvorgekommen )

OK,

Danke, ich hab's jetzt...

Zitat von SnuffMaster23:

Oder du fängst die Tastendrücke in OnKeyPress ab und ersetzt ungültige Zeichen (Textzeichen) durch #0 und das Komma durch einen Punkt. Dann kann man einfach keinen Text eingeben.

Damit kriegst Du CTRL-V noch nicht abgefangen

Zitat von Jelly:

Damit kriegst Du CTRL-V noch nicht abgefangen

Nicht wenn das Editfeld auf ReadOnly = true ist

Und ansonsten kannst du ja bei Tasteneingaben darauf reagieren: Einfügen ja/nein? Wie SnuffMaster23 schon sagte