Hallo Alex,
mit dem Code aus dem vorigen Beitrag wird die erste Zeile aus deinen Beispieldaten so verarbeitet, dass die Straße "Kühle Bäume 12" auf drei Spalten verteilt wird - aber das wirst du später noch irgendwann merken.
Delphi-Quellcode:
procedure FillGrid(sg: TStringGrid; lines: TStrings; delim: Char);
var
i: Integer;
begin
for i := 0 to Pred(lines.Count) do
Explode(lines[i], delim, sg.Rows[sg.FixedRows + i]);
end;
var
sl: TStringList;
begin
if OpenDialog.Execute then
begin
sl := TStringList.Create;
try
sl.LoadFromFile(OpenDialog.FileName); //ausgewählte Datei einlesen
FillGrid(StringGrid, sl, ';');
finally
sl.Free;
end;
end;
end;
Getippt und nicht getestet.
Freundliche Grüße