Hallo leute,
ich lade mir ein txt file in eine TStringList, und will diese werte dann in einer datenbank speichern. Die einzelnen Spalten sind durch ; getrennt
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var TempList: TStrings;
begin
Templist := TStringlist.Create;
with Templist do begin
loadfromFile('C:\Datei.TXT');
try
finally
Templist.free;
end;
end;
end;
end.
mir fehlt jetz irgendwie ein ansatz wie ich die einzelnen Zeilen durchlaufe und nach dem ;
aufteile
die ergebnisse werden dann mit
insert into TABLE(FELD1, FELD2) VALUES ('wert1','wert2')
hoffentlich in die datenbank gespeichert.
Ich hoff ihr verzeiht mir, aber ich bin neu in Delphi und grad am lernen.
Gruß
Michael