Lass das unsägliche
with
weg! Das wird dir noch die Beine brechen!
Was erhoffst du dir denn von
Selection = TGridRect(Rect(0, 1, ColCount, 1)) then
?
Wohl eher so ...
Delphi-Quellcode:
if StringGrid1.Row = 1 then
ShowMessage('Erste Zeile selektiert');