Указатель в текстовом файле

← →
Manulo (2004-03-02 17:36) [0]

Вот запамятывал, как перевести указатель в тектовом файле на нужное место :( А конкретно на начало файла, на первую строку.
При попытке использовании Seek(f,0); указывает на f и кричит несовместимости типов.
Переменная f объявлена как textfile

← →
Defunct (2004-01-23 13:31) [1]

Если мне не изменяет память, то никак. Разве что закрыть и открыть файл заново.

TextFile считается файлом с последовательным доступом, т.е. можно только прочитать и дописать в конец файла.

Если нужен произвольный доступ работаем с
F : File of ...
или просто
F : File;

Seek можно использовать только в том случае, если при открытии файла явным образом указан размер записи (буфера).
Например:
Reset(F,1); // Позиционируемся на любой байт Reset(F,128); // Позиционируемя через каждые 128 байт.

В текстовом файле размер записи неопределен, отсюда и невозможно позиционирование с помощью Seek.

← →
Soft (2004-03-03 03:26) [2]

только при этом для старых файловых операций нужно использовать директиву компилятора {I-} а потом после окончания описания {I+}

← →
Manulo (2004-03-03 21:11) [3]

Блин, глюки... Только смог сюда попасть

Делаю так:
reset(f);
То есть открываю заново для чтения. Самое интересное, что я его не закрываю перед этим, вроде не ругалось

Всем спасибо за советы

← →
Defunct (2004-03-03 21:15) [4]

reset(f);
То есть открываю заново для чтения. Самое интересное, что я его не закрываю перед этим, вроде не ругалось

Это баг. повторный Reset вызывает создание нового хендла файла. Закрывайте, будет работать надежнее.

← →
Vit@ly (2004-03-03 21:28) [5]

2 Defunct © (03.03.04 21:15) [4]
Не стОит дублировать действия компилятора (это по поводу бага). Перевод надеюсь не нужен.

Reset opens the existing external file with the name assigned to F. An error results if no existing external file of the given name exists. If F is already open, it is first closed and then reopened. The current file position is set to the beginning of the file.

← →
Anatoly Podgoretsky (2004-03-03 21:30) [6]

Defunct © (23.01.04 13:31) [1]
Seek можно использовать только в том случае, если при открытии файла явным образом указан размер записи (буфера).

Не верно, можно всегда, просто Reset(F) = Reset(F,128)

Указатель в текстовом файле Найти похожие ветки