Aktive zelle in StringGrid

[huberlix]

Versteh ich jetzt nicht. Ich hab mal ein StringGrid angelegt, und in FormCreate mit Werten vorbelegt:

Code:

procedure TForm1.FormCreate(Sender: TObject);
begin
  StringGrid1.Cells[1,1]:='AA';
  StringGrid1.Cells[2,1]:='BB';
  StringGrid1.Cells[3,1]:='CC';
  StringGrid1.Cells[4,1]:='DD';
  StringGrid1.Cells[5,1]:='EE';
end;

Dann in Button1 OnClick:

Code:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text:=StringGrid1.Cells[1,1];
  Edit2.Text:=StringGrid1.Cells[2,1];
  Edit3.Text:=StringGrid1.Cells[3,1];
  Edit4.Text:=StringGrid1.Cells[4,1];
  Edit5.Text:=StringGrid1.Cells[5,1];
end;

Bei mir werden beim ersten Click die Edits mit AA,BB,CC usw. gefüllt.
Oder hab ich da jetzt das Problem falsch verstanden?

Gruß,Bernd