Das steht in der Datei die umgeformt werden soll
Code:
[b]Nachname;Vorname;PLZ;Ort;Tel;
Mueller;Klaus;12454;Salzburg;02349/1234;
Maier;Peter;12344;München;23489/1233;
Mayer;Erwin;12312;Stuttgart;12334/1234; [/b]
Habe schon folgenden Code:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var str: string;
begin
while pos(';',strl.text) > 0 do
begin
listbox1.Items.Add(copy(strl.text, 1, pos(';',strl.text)-1));
str :=strl.text;
delete(str,1,pos(';',str));
strl.text := str
end;
end;
Möchte jetzt aber nur bestimmte Daten in Variablen schreiben (Nachname,Vorname,Tel).
Mit dem oben genannten Code wird nur die kompletten Daten in einer Listbox untereinander geschrieben, wie kann ich jetzt die Daten (Nachname, Vorname, Tel) in eine neue Textdatei schrieben.
[edit=sakura] [delphi]Tags gesetzt. Mfg, sakura[/edit]