Вниз
Скачать: CL | DM;

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

 
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)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.018 c
14-43804
ИМХО
2004-02-23 12:48
2004.03.14
Немцам :)


3-43398
Причастившийся
2004-02-13 16:40
2004.03.14
O firebird


1-43487
Rayslava
2004-02-27 18:57
2004.03.14
Позиция каретки в RichEdit


14-43824
тихий вовочка
2004-02-22 22:15
2004.03.14
Где взять Interbase?


14-43863
VID
2004-02-20 19:04
2004.03.14
Зацените плиз




   Наверх