Fehlermeldungen bearbeiten

Gabo · Hält's aus hier Beiträge: 1

Hallo!

Hab nichts bezüglich meines Problemes in der Suchfunktion gefunden:

bin ein ziemlicher anfänger und ich wollte fragen, wie man Fehlermeldungegn bearbeiten kann.

Beispiel:
" 'D' ist kein gültiger Integerwert"

in

"Bitte geben sie eine Zahl ein".

ich hoffe ihr versteht was ich meine.
danke im voraus!

Marc. · Verfasst: Sa 20.09.08 12:39

Gibt da mehere Möglichkeiten:
1. Man lässt nur Zahlen und die Zurück-Taste zu. (OnkeyPress/OnkeyDown)

markieren

Delphi-Quelltext

1:	if not (key in ['0'..'9',#8]) then ...

2. Vor der Rechnung wird die Eingabe schlichtweg überprüft.

markieren

Delphi-Quelltext

1:
2:

  if not TryStrToInt(edit1.Text,i) then
    Showmessage('Bitte eine Zahl eingeben!');

3. Try-Except-Block. Allerdings nicht empfehlenswert, da man ja eigentlich den Fehler meiden möchte.

Grüße,
Marc

dummzeuch · Verfasst: So 21.09.08 09:04

Hi,

[quote=" user profile icon

Gabo"

Beispiel:
" 'D' ist kein gültiger Integerwert"

in

"Bitte geben sie eine Zahl ein".

[/quote]

Was ich vor Kurzem fesgestellt habe (und vorher nicht wusste) ist, dass man die Message einer Exception aendern kann:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

try
  ...
except
  on e: exception do begin
    e.Message := 'Bitte geben Sie eine Zahl ein! (' + e.Message + ')';
    raise;
  end;
end;

Ob das nun empfehlenswert ist, haengt von der Art des Codes ab, generell wuerde ich es nicht einsetzen.

twm

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme