Ini Datei in StringGrid Laden

[Rippo]

Delphi-Quellcode:

Procedure TfrmKundenstamm.SaveToStringGrid( KundenNr,Name,Ansprechpartner,Telefon,Email,Postleitzahl,Ort,Straße : string);
Begin
    StringGridKunden.Cells[1,StringGridKunden.Row] := KundenNr;
    StringGridKunden.Cells[2,StringGridKunden.Row] := Name;
    StringGridKunden.Cells[3,StringGridKunden.Row] := Ansprechpartner;
    StringGridKunden.Cells[4,StringGridKunden.Row] := Telefon;
    StringGridKunden.Cells[5,StringGridKunden.Row] := Email;
    StringGridKunden.Cells[6,StringGridKunden.Row] := Postleitzahl;
    StringGridKunden.Cells[7,StringGridKunden.Row] := Ort;
    StringGridKunden.Cells[8,StringGridKunden.Row] := Straße;

    // Erzeuge eine neue Zeile (ROW)
    StringGridKunden.RowCount := StringGridKunden.RowCount +1;
     //Positioniere den Cursor
    StringGridKunden.Row := StringGridKunden.RowCount-1;
    //Nummerierung
    StringGridKunden.Cells[0,StringGridKunden.Row] := IntToStr(StringGridKunden.Row);

End;