Ich hatte mir das mal so gedacht, aber ich komme nicht weiter
Delphi-Quellcode:
var i, t: integer;
begin
for i := 2 to Liste.RowCount do
begin
t := strtoint(Liste.Cells[4, i]) + strtoint(Liste.Cells[4, i-1])
end;
Panel1.Caption := inttostr(t);
Ein weiteres Problem ist, dass nicht alle Zellen einen Integer Wert haben, manche haben auch den den String Wert ''.
Kann mir wer helfen?
isofaind