DelimitedText // CSV

[Hansi]

Hier mal ein anderes Bsp wie man so ein text datei auch auslesen kann:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  s:String;
  Url_WKN :String;
  Url_Kurs :String;
begin
  s:='710000.DE;32,92';
  Url_WKN:= Copy(s,1,Pos('.',s)-1);   // alles von S[7] bis S[;]-1 kopieren
  Delete(s,1,Pos(';',s));             // Jetzt alles von Anfang an bis incl. ";" löschen
  Url_Kurs:= Copy(s,1,Pos(';',s)-1);
  Delete(s,1,Pos(';',s));
end;

Vielleicht hilft dir das ja!