Zahlen hochzählen

[Klaus01]

Delphi-Quellcode:

for i:=4 to StringGrid1.RowCount -1 do
  begin 
    if (i+1) <= StringGrid1.RowCount -1 then 
      if StringGrid1[i,3] = StringGrid1[i+1,3] then
        StringGrid1[i-1,3] :='0';
  end;

So wird die ganze Tabelle durchsucht , in der Zeile i wird die Spalte 3 mit der aus Zeile i+1 verglichen.
Sind die Werte gleich wird i-1 mit 0 besetzt.

Wenn Du jedoch nur die Zeile 4 mit der Zeile 5 vergleichen willst, kannst Du dir die Schleife sparen.
So ganz habe ich es noch nicht erfasst was Du vorhast.

Grüße
Klaus