Einzelnen Beitrag anzeigen

silver-moon-2000

Registriert seit: 18. Feb 2007
Ort: Schweinfurt
170 Beiträge
 
Delphi XE Professional
 
#9

Re: StrToInt Erorror vermeiden !

  Alt 6. Mai 2008, 22:56
Zitat von Delphiturbo:
Zitat von mkinzler:
Oder
if not TryStrToInt( zahl1, s1) then s1 := 0;
Wo gemau kann ich diese einsetzen ?
Delphi findet nicht zahl1!
In diesem Fall ist 'zahl1' die variable 's1' der String, den Du aus der Ini Datei ausliest
Zitat von Delphiturbo:
s1 := MyIniFile.ReadString('Section1','zahl1','nicht gefunden');
müsste also in etwa so heißen (mkinzler: ich vergreif' mich einfach mal an Deinem Code):
Delphi-Quellcode:
var iS1 : integer;

[...]

if not TryStrToInt( zahl1, iS1) then iS1 := 0;
if StrToInt(s2) - iS1 > 10 then

[OT]
Ich weiß, es ist ungehörig, in einem Fred olötzlich ein anderes Thema oder ein zweites Problem anzuschneiden, aber mein "problem" ist es mir nicht wert, einen Fred dafür aufzumachen

Auf der Suche danach, einen möglichst "komplizierte" Lösung zu finden, bin ich auf Folgendes gestoßen
Delphi-Quellcode:
var s1 : string;
    temp :integer;
begin
  s1 := '10n00';
  edAusgabe.Text := IntToStr(IfThen(TryStrToInt(s1, temp), StrToInt(s1), 0));
Da bekomme ich allerdings, falls s1 keine Zahl darstellt, die Fehlermeldung

EConvertError with message ''10n00' is not a valid integer value'.

Kann mir das jemand vielleicht erklären, falls es nicht zu enervierend ist?
[/OT]
Tobias
Bitte nicht hauen , ich weiß es nicht besser
  Mit Zitat antworten Zitat