Переместиться в конец файла
Материал из DRKB
Переместиться в конец файла[править | править код]
{ прыгаем в конец (eof) }
procedure GotoEof(f: file);
begin
{ перемещаемся в начало }
Seek(f, 0);
{ перемещаемся вперед на "x" количество байт, в нашем случае это размер файла! }
Seek(f, FileSize(f));
end;
Source: Взято с http://delphiworld.narod.ru
ID: 03132