Der Vorschlag von DeddyH meint ungefähr sowas:
Delphi-Quellcode:
var
farbwechsel:Boolean;
i:integer;
//[...]
begin
//[...]
farbwechsel := false;
for i:=0 to Grid.ColCount-1
if Grid.Cells[i,ARow]<>Grid.Cells[i,ARow-1] then farbwechsel:=true;
if farbwechsel then
//[...]
end;
Sir Rufo schlägt nun glaub ich vor, die Ermittlung ob ein Farbwechsel vorliegt in eine externe Funktion auszulagern, so braucht man nur diese Funktion ändern, wenn sich mal die Kriterien für einen Farbwechsel ändern sollten.