Delphi-Quellcode:
var MinVal: integer;
MaxVal: integer;
i: integer;
begin
MinVal:=maxInt;
MaxVal:=0;
for i:=1 to sgMess.RowCount-1 do
if StrToInt(sgMess.Cells[1,i]) < MinVal then
MinVal:=StrToInt(sgMess.Cells[1,i])
else
if StrToInt(sgMess.Cells[1,i]) > MaxVal then
MaxVal:=StrToInt(sgMess.Cells[1,i]);
edMin.Text:=IntToStr(MinVal);
edMax.Text:=IntToStr(MaxVal);
Aber der Compiler spuckt mich schon bei
StrToInt(sgMess.Cells[1,i])
an, dass der Wert 0019 kein gültiger Integerwert sei...Warum nicht? Ich wandel doch den String um? Es liegt aber nicht an
0019 - ich hab zum testen nur 19 hineingeschrieben!
http://img213.imageshack.us/img213/1...5745tq2.th.jpg
bei der Fehlermeldung "19 fehlt das andere "-Zeichen?!
