Hallo Zusammen,
ich noch ein ziemlicher Anfänger und verstehe deshalb auch bestimmt nicht wo hier der Fehler ist!
Delphi-Quellcode:
procedure TTest_1.Button4Click(Sender: TObject);
var sInput: String;
s:TStrings;
sl:TStringList;
char:pchar;
begin
sInput := 'C:\Test\Delphi_Projekte\Test_1\test.txt';
s:=TStrings.create;
sl:=TStringlist.create;
s.LoadFromFile(sInput);
char:=pchar(s);
ExtractStrings([','],[],char,sl);
memo2.Lines.Add(sl[1]);
s.Free;
end;
mfg Ringer