Vermeidung von ERROR-Nachrichten

[qb-tim]

Hi,

ich habe ein Programm geschrieben, der verrückt spielt, wenn man ein Komma anstelle eines Punktes in ein EDIT mit

Delphi-Quellcode:

StrToFloat

Außerdem mag er es nicht, wenn Textzeichen in diesem EDIT auftauchen.

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

Delphi-Quellcode:

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

[BenjaminH]

Hallo

Delphi-Quellcode:

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

[qb-tim]

Danke für die schnelle Antwort!

:cheers:

[Die Muhkuh]

Hi,

TryStrToFloat,
StrToFloatDef

wären evtl. auch noch intressant.

[Sharky]

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.

[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.

(da ist mir wohl Sharky zuvorgekommen :) )

[qb-tim]

OK,

Danke, ich hab's jetzt... :stupid:

[Jelly]

Zitat:

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 :stupid:

[xZise]

Zitat:

Zitat von Jelly

Damit kriegst Du CTRL-V noch nicht abgefangen :stupid:

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 :D