Daten anzeigen in StringGrid und TEdit

[LOMBI]

Guten Morgen

und danke für die rege Beteiligung!

Delphi-Quellcode:

procedure TDemoForm.FormCreate(Sender: TObject);
var
  MyData: TExtraData;
  ndx: Integer;
begin
  config := TMemIniFile.Create(ChangeFileExt(ParamStr(0), '.ini'));
...
  with StringGrid do
  begin
    if goRowSelect in Options
      then Row := Pred(RowCount)
      else Selection := TGridRect(Rect(FixedCols, Pred(RowCount), Pred(ColCount), Pred(RowCount)));
    if VisibleRowCount < (RowCount - FixedRows)
      then TopRow := Succ(RowCount - FixedRows - VisibleRowCount)
      else TopRow := FixedRows;

Natürlich wäre das Ganze mit DBGrid und DBEdits einfacher zu lösen, aber darauf möchte ich ungern
zurückgreifen.

Gruß
Lombi