ahso, ja klar, sorry für den fehler meinerseits... der fehler ist kein fehler direkt im code sondern ein runtime error... er lautet wie folgt:
"Im Projekt Project1.exe ist eine
Exception der Klasse EConvertError aufgetreten. Meldung: "" ist kein gültiger Integerwert'. Prozeß wurde angehalten. Mit einzelnen Anweisungen oder Start folgen."
das mit trunc hat nix dran geändert... ich poste euch hier mal kurz den code, den ich komplett habe... er ist umstädnlich aber ich dachte, der fehler könnte durch zu viele klammern und all den kram kommen! so far
Delphi-Quellcode:
e
lse begin
//spielvorgabe:=(StrToInt(LabeledEdit4.Text*(StrToInt(LabeledEdit3.Text) div 131)- StrToInt(LabeledEdit2.Text)+StrToInt(LabeledEdit1.Text);
a:=StrToInt(lauf.Daten.platzpar);
b:=StrToInt(LabeledEdit2.Text);
c:=StrToInt(LabeledEdit3.Text);
d:=StrToInt(LabeledEdit4.Text);
x:=trunc(c div 133);
y:=trunc(d * x);
z:=trunc(y - b);
spielvorgabe:=trunc(z + a);
Memo1.Lines.Text:=('Spielvorgabe:'+#13+'( HCP x (Slope / 133) - CR + Par )'+#13+#13+IntToStr(spielvorgabe));
end;
der rest des codes is unwichtig, thanx