Brauche dringend Hilfe

[patti]

Hi, mach mal aus edit1.Text:=IntToStr(c); ein c := StrToInt(edit1.text); mfg

Edit: Oder nutze StrToIntDef, dann kannst du einen Default-Wert angeben, wenn es sich bei "edit1.Text" um keine Zahl handelt...

[Daniel]

Und könntest Du Deinem Thema dann noch bitte einen aussagekräftigen Titel verpassen? Hilfe brauchen - in der einen oder andern Form- viele von uns.

[himitsu]

@Patty: Eine Fehlerbehandlung in StrToInt wird über TryStrToInt durchgeführt.
StrToIntDef diehnt dazu, daß man einen Standardwert bekommt, wenn es ein Problem gibt. Hier soll aber auf Richtigkeit geprüft werden, da ist StrToIntDef also nicht wirklich angebracht.

XxxDef = Default (Standardwert)
und bei TryXxx kann man einfach an Try-Except denken

[patti]

@himitsu: Der Einwand ist natürlich berechtigt, aber in diesem Fall finde ich, ist StrToIntDef gar nicht so verkehrt. Er könnte zum Beispiel als Standard-Wert "-1" setzen. Die Addition von zwei positiven Zahlen ist immer positiv, im Falle einer fehlerhaften Eingabe würde der Vergleich dann mit -1 statfinden, was "FALSCH" ergeben würde und das ist denke ich in diesem Fall auch so gewollt... Gut, für die Subtraktion müsste man das vielleicht anders machen, aber mein Hinweis mit StrToIntDef war ja eh nur zur Ergänzung gedacht... Jetzt kennt er gleich zwei Möglichkeiten

[martin_]

Du gibts der Variable c keinen Wert. Bei der Addition fehlt
c := strtoint(edit1.text); in der ersten Zeile. Bei der Subtraktion ist der gleiche Fehler.

[himitsu]

Zitat von martin_:

Bei der Addition fehlt...

Ich glaub du hast was falsch verstanden.
"c", also das Ergebnis soll der Benutzer eingeben
und dieses soll dann geprüft werden.

[p80286]

@himitsu
also in der Ursprungsform fällt c vom Himmel, nur a und b werden mit random(100) vorbelegt, da hat Martin recht.
Und patti hat ja auch gleich darauf hingewiesen.
Und die Konstruktion (a-b) halte ich auch nicht für so glücklich, da schon eher ABS(a-b)

Gruß
K-H