Stringgrid Prob

[f4r]

Hi Leute,

könnt ihr mir sagen was an dem folg. Quelltext falsch ist danke

f4r

Delphi-Quellcode:

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
begin
stringgrid3.Cells[0,1]:=stringgrid1.Cells[0,stringgrid1.selection.top];
end;