Получение «ÿþI» в качестве выходных данных при чтении из файла .log с помощью delphi

Я пытаюсь прочитать данные из файла .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;

Кто-нибудь знает, в чем может быть проблема?

6
задан David Heffernan 6 October 2011 в 12:55
поделиться