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