getpos

Функция определения текущей позиции в файле.

Синтаксис:

n = getpos(f_id);

Аргументы:

f_id – идентификатор файла.

Описание:

getpos(f_id) – функция определения текущей позиции в файле с идентификатором f_id.

Результат:

n – текущая позиция в байтах от начала файла.

Пример:

var
s1:string = "string1" + chr(10) + "string2",
s2:string = "string3";
//создадим новый файл 
f_id = createfile("file1.dat", -1)
//запишем в него строку s1        
writeln(f_id, s1);                
//получим текущую позицию в файле 
n1 = getpos(f_id);                
//запишем в него строку s2        
writetext(f_id, s2);              
//получим текущую позицию в файле 
n2 = getpos(f_id);                
//закроем файл                    
freeobject(f_id);

В процессе выполнения при помощи функции createfile будет создан новый файл с идентификатором f_id. В файл при помощи функции writeln будет записана строка s1. При помощи функции getpos будет получена текущая позиция в файле. В файл при помощи функции writetext будет записана строка s2. При помощи функции getpos будет получена текущая позиция в файле. Переменной n1 будет присвоено значение 17, переменной n2 будет присвоено значение 24, соответствующее текущей позиции после записи соответствующих строк в файл с идентификатором f_id. Файл будет содержать текст:

string1

string2

string3

Перед завершением примера файл закрывается при помощи функции freeobject.