Переместиться в конец файла

Советы » Файлы » Переместиться в конец файла

{ прыгаем в конец (eof) }
procedure

gotoeof (f : file

); begin

{ перемещаемся в начало } seek (f, 0); { перемещаемся вперед на "x" количество байт, в нашем случае это размер файла! } seek (f, filesize(f)); end

; {gotoeof}

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com