2018-08-02 22:04:49 +03:00
< html > < head >
< object type = "application/x-oleobject" classid = "clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e" >
< param name = "Keyword" value = "Assign" >
< param name = "Keyword" value = "AssignFile" >
< param name = "Keyword" value = "Close" >
< param name = "Keyword" value = "CloseFile" >
< param name = "Keyword" value = "Reset" >
< param name = "Keyword" value = "Rewrite" >
< param name = "Keyword" value = "Append" >
< param name = "Keyword" value = "Eof" >
< param name = "Keyword" value = "Flush" >
< param name = "Keyword" value = "Erase" >
< param name = "Keyword" value = "Rename" >
< param name = "Keyword" value = "Eoln" >
< param name = "Keyword" value = "SeekEof" >
< param name = "Keyword" value = "SeekEoln" >
< param name = "Keyword" value = "Truncate" >
< param name = "Keyword" value = "FilePos" >
< param name = "Keyword" value = "FileSize" >
< param name = "Keyword" value = "Seek" >
< param name = "Keyword" value = "OpenRead" >
< param name = "Keyword" value = "OpenWrite" >
< param name = "Keyword" value = "OpenAppend" >
< / object > < / head >
< meta http-equiv = "Content-Type" content = "text/html; charset=windows-1251" >
< title > < / title > < link rel = "StyleSheet" href = "../../default.css" > < body >
2025-11-07 16:12:31 +03:00
< H1 > Подпрограммы для работы с < / H1 >
2018-08-02 22:04:49 +03:00
< table border = 0 CELLPADDING = 5 >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Assign(f: FileType; name: string);
< / code > < br >
2025-11-07 16:12:31 +03:00
Связывает файловую переменную f с
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > AssignFile(f: FileType; name: string);
< / code > < br >
2025-11-07 16:12:31 +03:00
Связывает файловую переменную f с
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Reset(f: Text);
< / code > < br >
2025-11-07 16:12:31 +03:00
Открывает текстовый файл f на чтение
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Reset(f: < b > < b > file< / b > of< / b > T);
< / code > < br >
2025-11-07 16:12:31 +03:00
Открывает типизированный файл f на чтение и запись
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Reset(f: < b > file< / b > );
< / code > < br >
2025-11-07 16:12:31 +03:00
Открывает нетипизированный файл f на чтение и запись
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Rewrite(f: Text);
< / code > < br >
2025-11-07 16:12:31 +03:00
Открывает текстовый файл f на запись, обнуляя е г о
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Rewrite(f: < b > < b > file< / b > of< / b > T);
< / code > < br >
2025-11-07 16:12:31 +03:00
Открывает типизированный файл f на чтение и запись, обнуляя е г о
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Rewrite(f: < b > file< / b > );
< / code > < br >
2025-11-07 16:12:31 +03:00
Открывает нетипизированный файл f на чтение и запись, обнуляя е г о
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr >
< td >
< code >
< b > procedure< / b > Append(f: Text);
< / code > < br >
2025-11-07 16:12:31 +03:00
Открывает текстовый f файл на дополнение
2018-08-02 22:04:49 +03:00
< / td >
< / tr >
< tr >
< td >
< code >
< b > function< / b > OpenRead(fname: string): Text;
< / code > < br >
2025-11-07 16:12:31 +03:00
Возвращает текстовый файл с
2018-08-02 22:04:49 +03:00
< / td >
< / tr >
< tr >
< td >
< code >
< b > function< / b > OpenWrite(fname: string): Text;< / code > < br >
2025-11-07 16:12:31 +03:00
Возвращает текстовый файл с
2018-08-02 22:04:49 +03:00
< / td >
< / tr >
< tr > < td >
< code >
< b > function< / b > OpenAppend(fname: string): Text;< / code > < br >
2025-11-07 16:12:31 +03:00
Возвращает текстовый файл с < / td > < / tr >
2018-08-02 22:04:49 +03:00
< tr >
< td >
< code >
< b > procedure< / b > Close(f: FileType);
< / code > < br >
2025-11-07 16:12:31 +03:00
Закрывает файл f
2018-08-02 22:04:49 +03:00
< / td >
< / tr >
< tr >
< td >
< code >
< b > procedure< / b > CloseFile(f: FileType);
< / code > < br >
2025-11-07 16:12:31 +03:00
Закрывает файл f
2018-08-02 22:04:49 +03:00
< / td >
< / tr >
< tr > < td >
< code >
< b > function< / b > Eof(f: FileType): boolean;
< / code > < br >
2025-11-07 16:12:31 +03:00
Возвращает True, если достигнут конец файла f
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Flush(f: FileType);
< / code > < br >
2025-11-07 16:12:31 +03:00
Записывает содержимое буфера файла на диск
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Erase(f: FileType);
< / code > < br >
2025-11-07 16:12:31 +03:00
Удаляет файл, связанный с
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Rename(f: FileType; newname: string);
< / code > < br >
2025-11-07 16:12:31 +03:00
Переименовывает файл, связаный с
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > function< / b > Eoln(f: Text): boolean;
< / code > < br >
2025-11-07 16:12:31 +03:00
Возвращает True, если достигнут конец строки в текстовом файле f
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > function< / b > SeekEof(f: Text): boolean;
< / code > < br >
2025-11-07 16:12:31 +03:00
Пропускает пробельные символы, после чего возвращает True, если достигнут конец текстового файла f
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > function< / b > SeekEoln(f: Text): boolean;
< / code > < br >
2025-11-07 16:12:31 +03:00
Пропускает пробельные символы, после чего возвращает True, если достигнут конец строки в текстовом файле f
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Truncate(f: < b > < b > file< / b > of< / b > T);
< / code > < br >
2025-11-07 16:12:31 +03:00
Усекает типизированный файл f, отбрасывая все элементы с
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Truncate(f: < b > file< / b > );
< / code > < br >
2025-11-07 16:12:31 +03:00
Усекает нетипизированный файл f, отбрасывая все элементы с
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > function< / b > FilePos(f: < b > < b > file< / b > of< / b > T): int64;
< / code > < br >
2025-11-07 16:12:31 +03:00
Возвращает текущую позицию файлового указателя в типизированном файле f
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > function< / b > FilePos(f: < b > file< / b > ): int64;
< / code > < br >
2025-11-07 16:12:31 +03:00
Возвращает текущую позицию файлового указателя в нетипизированном файле f
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > function< / b > FileSize(f: < b > < b > file< / b > of< / b > T): int64;
< / code > < br >
2025-11-07 16:12:31 +03:00
Возвращает количество элементов в типизированном файле f
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > function< / b > FileSize(f: < b > file< / b > ): int64;
< / code > < br >
2025-11-07 16:12:31 +03:00
Возвращает количество байт в нетипизированном файле f
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Seek(f: < b > < b > file< / b > of< / b > T; n: int64);
< / code > < br >
2025-11-07 16:12:31 +03:00
Устанавливает текущую позицию файлового указателя в типизированном файле f на элемент с
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< tr > < td >
< code >
< b > < b > procedure< / b > < / b > Seek(f: < b > file< / b > ; n: int64);
< / code > < br >
2025-11-07 16:12:31 +03:00
Устанавливает текущую позицию файлового указателя в нетипизированном файле f на байт с
2018-08-02 22:04:49 +03:00
< / td > < / tr >
< / table >
< / body > < / html >
