
Delphi - čtení se souboru
Dobrý den.
Mam soubor, který potřebují načíst do StringListu.
Potřebují však, aby začal od 2 řádku a načítal se souboru po dvou řadicích a ukládal ty dva řádky do StringList do jednoho řádku oddělené nějakým separatorem.
myStrLst.Add(nactenyradek +'^'+ nactenyradek1);
AssignFile(myFile, 'mujsoubor');
Reset(myFile);
ReadLn(myFile,nactenyradek);
while not Eof(myFile) do
begin
ReadLn(myFile,nactenyradek);
if Eof(myFile)= true then Exit;
ReadLn(myFile,nactenyradek1);
myStrLst.Add(nactenyradek +'^'+ nactenyradek1);
end;
CloseFile(myFile);
Je to ok ale po načtení mi vyskočí toto.https://s14.postimg.org/4daktxog1/eeee.png
Kde dělám chybu?