Wertübergbae für einen Stringgrid

[Technikus]

Hallo marabu,
ich danke dir für das Kommentar.
Nun balstle ich schon an meinem nächsten Problem, passt aber auch hier her.
Ziel: Der Nutzer des Programmes soll mit Eingabe von der selbstgewählten Anzahl von Messwerten seine Tabellengröße selbst bestimmen.
Dazu habe ich folgenden Quellcode geschrieben, oder besser gesagt, deinen ergänzt.

Delphi-Quellcode:

procedure TForm1.Button4_Berechne_PClick(Sender: TObject);

var
  i, anzahl: integer;
  dSpannung, dStrom, dLeistung: double;
  s: string;
  ok: boolean;
begin
anzahl:=StrToInt(Edit3_Eingabe_anzahl.Text);
StringGrid1.RowCount:=anzahl+1;
StringGrid2.RowCount:=anzahl+1;
  with StringGrid1 do
  for i := FixedRows to anzahl do
   begin
    StringGrid1.Cells[0,i]:=IntToStr(i)+'.';
    ok := TryStrToFloat(Cells[1, i], dSpannung);
    ok := ok and TryStrToFloat(Cells[2, i], dStrom);
    if ok then begin
      dLeistung:= dSpannung * dStrom;
      s := FloatToStr(dLeistung);
    end else s := '';
    StringGrid2.Cells[0, i] := s;
  end;
end;
end.

Nun funktioniert das Ganze zwar, wenn ich im Eingabefeld "Anzahl der Messwerte" eine Interger-Zahl eingebe wird die Tabelle beim Betätigen des Buttons "Berechne" erweitert und die Nummerierung bis zur letzten Zeile ergänzt. Aber das ist für den Anwender unpraktisch-denke ich.
Nun meine Überlegung zur Verbesserung: 1. Ich gebe eine Anzahl in das EditFeld ein, sobald ich mit der Maus in die Tabelle hineinklicke, wird die Tabelle auf die nötige Größe erweitert und durchnummeriert.
Meine Frage: Ist sowas ohne großen Aufwand programmierbar, wenn ja, welchen Tipp könnt ihr geben?

Danke
Technikus