Forum: Sonstige Fragen zu Delphi
Delphi
by Wormid,
3. Sep 2003
Schau mal in meinen letzten Post direkt über deinem... :mrgreen:
Wenn Du alle Werte in einer Liste haben willst, dann muss nur das Tokens.Clear gelöscht werden...
Gruß
Wormid
Forum: Sonstige Fragen zu Delphi
Delphi
by Wormid,
3. Sep 2003
Um mehrere Zeilen nacheinander abzuarbeiten muss das so aussehen:
procedure TForm1.Button2Click(Sender: TObject);
var SL, Tokens: TStringList;
i, n: Integer;
begin
SL := TStringList.Create;
Tokens := TStringList.Create;
SL.LoadFromFile('C:\test.txt');
Forum: Sonstige Fragen zu Delphi
Delphi
by Wormid,
3. Sep 2003
Wie sieht denn dein Textfile aus?
Ich hatte mir zum Test eines erstellt mit diesem Inhalt:
wert1,wert2,wert3,wert4
Mehr stand da nicht drin.
Forum: Sonstige Fragen zu Delphi
Delphi
by Wormid,
3. Sep 2003
So funktioniert die Routine bei mir:
procedure TForm1.Button2Click(Sender: TObject);
var SL, Tokens: TStringList;
i: Integer;
begin
SL := TStringList.Create;
Tokens := TStringList.Create;
SL.LoadFromFile('C:\test.txt');