Stringgrids Zeilen vergleichen

[Flips]

Hi.

Willst du die Zeile oder nur eine Zelle vergleichen?

Für Zellen:

Delphi-Quellcode:

procedure TForm1.StringGrid1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var Row,Col:integer;
begin
//Zelle ermitteln
Stringgrid1.MouseToCell(X,Y,Col,Row);
//Selektieren
Stringgrid2.Row := Row;
Stringgrid2.Col := Col;
//Vergleichen
if Stringgrid1.Cells[Col,Row] = Stringgrid2.Cells[Col,Row] then
  ShowMessage('Gleich')
else
  ShowMessage('Nicht gleich');
end;