Hallo!
Erstmal: Ich habe Delphi 5.
Ich habe mal eine Frage:
Ich habe in meiner Form eine normale ComboBox.
Im OnChange-Ereignis soll jetzt die Image1.Canvas.Pen.Width auf den Wert aus der ComboBox gesetzt werden.
Funktioniert soweit auch.
Auch wenn der Benutzer selbst einen eigenen Wert eingibt (ist ja eigendlich kein Unterschied).
Aber wenn der Benutzer zum Spaß irgendetwas anderes eingibt (Buchstaben o.ä.) gibt Delphi eine Fehlermeldung zurück,
da der Buchstabe (logischerweise) nicht in Integer konvertiert werden kann.
Dann hab ich das mit try.. except gemacht, aber die Meldung kommt immer noch.
Delphi-Quellcode:
try
Image1.Canvas.Pen.Width := StrToInt(ComboBox1.Text); //versucht die Stiftbreite auf den Wert der ComboBox zu setzen
except
ComboBox1.Text := IntToStr(Image1.Canvas.Pen.Width); //und bei einem Fehler soll die ComboBox zurück auf den vorherigen Wert gesetzt werden.
end;
Und trotzdem kommt die Meldung
Zitat:
Im Projekt projekt1.exe ist eine
Exception der Klasse EConverterError aufgetreten. Meldung: ''a' ist kein gültiger Integerwert'. Prozeß wurde angehalten. Mit Einzelne Anweisung oder Start fortsetzen.
Ich hoffe ihr könnt mir helfen.
Danke schonmal im vorraus.
LG
-iBooot