Я пытаюсь прочитать данные из файла .log и обработать его содержимое. Файл журнала создается другим приложением. Когда я используйте команду readln в Delphi и отобразите содержимое файла в памятке, я получаю только одну строку данных (ÿþI) из файла с более чем 6000 строками данных.
procedure TForm1.Button1Click(Sender: TObject);
Var
F : TextFile;
s : string;
begin
AssignFile(F, 'data.log');
Reset(F);
while not Eof(F) do
begin
Readln(F, s);
Memo1.Lines.Add(s);
end;
end;
Кто-нибудь знает, в чем может быть проблема?