Процедуры и функции Object Pascal


ПРИЛОЖЕНИЕ

 

Процедуры и функции Object Pascal

ПРИЛОЖЕНИЕ

 

Процедуры и функции Object Pascal

 

Процедуры и функции для работы с порядковыми данными
подпрограммы Тип аргумента Тип результата назначение
Ord (x) порядковый порядковый Возвращает порядковый номер x.
Pred (x) порядковый порядковый Возвращает предыдущий порядковый номер для x.
Succ (x) порядковый порядковый Возвращает следующий порядковый номер для x.
High (x) диапазон порядковый Возвращает максимальное значение типа — диапазон, к которому принадлежит x.
Low (x) диапазон порядковый Возвращает минимальное значение типа — диапазон, к которому принадлежит x.
Процедуры и функции для работы с целыми и действительными данными
подпрограммы Тип аргумента Тип результата назначение
Abs (x) Integer, Real Integer, Real Возвращает модуль x.
Chr (b) Byte Char Возвращает символ по его кодом.
Dec (x [, i]) Integer Integer Уменьшает значение x на i, а при отсутствии i на 1.
Inc (x [, i])) Integer Integer Увеличивает значение x на i, а при отсутствии i на 1.
Hi (w) Word Byte Возвращает старший байт аргумента
Lo (w) Word Byte Возвращает младший байт аргумента

 

Hi (i) Integer Byte Возвращает старший байт аргумента
Lo (i) Integer Byte Возвращает младший байт аргумента
Odd (i) Integer Boolean Возвращает true, если i нечетное, иначе — false.
Random (i) Integer Integer Возвращает псевдослучайное число из интервала (0, w-1).
Random Real Real Возвращает псевдослучайное число из интервала (0, 1).
Randomize Инициализация генератора псевдослучайных чисел.
Swap (i) Integer Integer Меняет местами байты в слове.
Swap (w) Word Word Меняет местами байты в слове.
Sin (x) Real Real Синус, угол в радианах.
Cos (x) Real Real Косинус, угол в радианах.
Arctan (x) Real Real Арктангенс, значение в радианах.
Exp (x) Real Real Экспонента.
Ln (x) Real Real Логарифм натуральный.
Pi Real Real число .
Sqr (x) Real Real Квадрат аргумента.
Sqrt (x) Real Real Корень квадратный.
Frac (x) Real Real Дробная часть числа.
Int (x) Real Real Целая часть числа.
Процедуры и функции для работы с датами
подпрограммы назначение
Function Date: TDateTime; Возвращает текущую дату.
Function Time: TDateTime; Возвращает текущее время.
символьных строк
Процедуры и функции для работы с символьными строками
подпрограммы назначение

 

 

Function Concat (S1 [, S2, … SN]: String): String; Возвращает соединен с порядком S1, S2, …, SN символьный строку.
Function Copy (St: String; Index, Count: Integer): String; Копирует из строки St, начиная с символа с номером Index Count символов.
Procedure Delete (St: String; Index, Count: Integer); Удаление из строки St, начиная с символа с номером Index Count символов.
Procedure Insert (SubSt, St: String, Index: Integer); Вставляет подстроку SubSt в строку St, начиная с символа с номером Index.
Function Pos (SubSt, St: String): Integer; Возвращает номер позиции первого вхождения подстроки SubSt в строку St. Если подстрока не найдена, то возвращается ноль.
Function Length (St: String): Integer; Возвращает текущую длину строки St.
Procedure SetLength (St: String, NewLength: Integer) Устанавливает новую (меньшую) длину строки St. Если NewLength больше длины строки, то обращение к SetLength игнорируется.
Function LowerCase (Const St: String): String; Возвращает начальный строку St, в котором все большие латинские буквы заменены на малы.
Function UpperCase (Const St: String): String; Возвращает начальный строку St, в котором все малые латинские буквы заменены на большие.
Function AnsiLowerCase

(Const St: String): String;

Возвращает начальный строку St, в котором все большие буквы заменены на малые (с учетом кириллицы).
Function AnsiUpperCase

(Const St: String): String;

Возвращает начальный строку St, в котором все малые буквы заменены на большие (с учетом кириллицы).
Процедуры и функции преобразования строк к другим типам
подпрограммы назначение
Function StrToFloat (St: String): Extended; Превращает символы строки St в действительное число. Строка не должен содержать ведущих или ведомых пробелов.
Function StrToInt (St: String): Integer; Превращает символы строки St в целое число. Строка не должен содержать ведущих или ведомых пробелов.

 

Procedure Val (St: String; Var X; Code: Integer); Превращает строку символов St во внутреннее представление целой или действительной переменной X, которое определяется типом этой переменной. При успешном преобразовании параметр Code содержит ноль.
Function StrToDate (St: String): TdateTime; Превращает символы строки St в дату. Строка должна содержать два или три числа, разделенных символом «. «. Первое число — дата, второе — месяц. Если задано третье число — год, то оно должно быть в формате XX или

XXXX. Если год не задано, то дата дополняется текущим годом.

Function StrToTime (St: String): TdateTime; Превращает символы строки St в дату. Строка должна содержать два или три числа, разделенных символом «:». Числа задают часы, минуты и, возможно, секунды. По последним числом через пробел могут идти символы «am» «pm», которые указывают на 12-часовой формат времени.
Function StrToDateTime (St: String): TdateTime; Превращает символы строки St в дату и время. Строка должна содержать дату и время, в правильном формате, разделенных пробелом.
Процедуры и функции преобразования данных различных типов в символьных строк
подпрограммы назначение
Function FloatToStr (Value: Extended): String; Превращает истинное значение Value в строку символов.
Function IntToStr (Value: Integer): String; Превращает целое значение Value в строку символов.
Procedure Str (X [: Width [: Decimals]]; var St: String); Превращает число X любого целого или действительного типов в строку символов. Параметры Width и Decimals определяют формат преобразования. Width — общая ширина поля символьного представления, а Decimals — количество десятичных знаков для истинных чисел.

 

Function DateToStr (Value: TdateTime): String; Превращает дату с параметра Value в строку символов.
Function TimeToStr (Value: TdateTime): String; Превращает время с параметра Value в строку символов.
Function DateTimeToStr

(Value: TdateTime): String;

Превращает дату и время с параметра Value в строку символов.
Динамические структуры данных
Процедуры и функции для работы с динамической памятью
подпрограммы назначение
Function Addr (x): Pointer; Возвращает адрес аргумента x. Аналогичный результат возвращает операция @.
Procedure New (Var P: Pointer) Резервирует фрагмент кучи динамической памяти для размещения переменной и помещает в типизированный указатель P адрес первого байта.
Procedure Dispose (Var P: Pointer) Возвращает в кучу фрагмент динамической памяти, который был зарезервирован за типизированным указателем P.
Procedure GetMem (Var P: Pointer; Size: Integer); Резервирует за нетипизированного указателем P фрагмент динамической памяти размера Size (в байтах) и присваивает ему адрес этой области.
Procedure FreeMem (Var P: Pointer; Size: Integer); Возвращает в кучу фрагмент динамической памяти, который был зарезервирован за нетипизированного указателю P.
Function SizeOf (x): Integer; Возвращает длину в байтах внутреннего представления объекта x.
Файловый
Процедуры и функции для работы со всеми типами файлов
подпрограммы назначение
Procedure AssignFile (Var F; FileName: String); Связывает файловую переменную F с именем файла FileName,
Procedure Reset (Var F: File [; RecSize: Word]) Открывает существующий файл. Параметр RecSize, имеет смысл только для нетипизированных файлов, указывает размер блока данных.
Procedure Rewrite (Var F: File [; RecSize: Word]) Создает новый файл. Параметр RecSize, имеет смысл только для нетипизированных файлов, указывает размер

 

  блока данных.
Procedure CloseFile (Var F) Закрывает файл, а связь файловой переменной с именем файла, установленный ранее процедурой AssignFile сохраняется. При создании нового или расширении старого файла процедура обеспечивает сохранение в файле всех новых записей и регистрацию файла в каталоге. Процедура CloseFile выполняется автоматически в отношении всех открытых файлов при нормальном завершении программы. Поскольку связь файловой переменной с именем файла сохраняется, то файл можно повторно открыть без дополнительного использования процедуры AssignFile.
Function Eof (Var F): Boolean; Тестирует конец файла, если указатель указывает на конец файла возвращает true, иначе false.
Function IOResult: Integer; Возвращает код завершения последней операции ввода-вывода. При успешном завершении операции код равен нулю.
Procedure Flush (Var F) Очищает внутренний буфер файла, гарантирует сохранность всех последних изменений файла на диске.
Function FileExists (Const FileName: String): Boolean; Возвращает true, если файл с именем (или маршруту) FileName существует, иначе false.
Procedure GetDir

Var S: String);

(D: Byte: Возвращает в переменной S имя текущего каталога. D — номер устройства (0 — устройство по умолчанию, 1 — диск А, 2 — диск В и т. д.).
Procedure ChDir

String)

  (Path: Изменяет текущий каталог. Path — путь к текущий каталог, который устанавливается по умолчанию.
Procedure MkDir (Dir: String); Создает новый каталог. Dir — путь к создаваемому каталогу.
Procedure RmDir (Dir: String); Удаление каталог Dir. Каталог изымаемого должен быть пустым.

 

Procedure Erase (Var F) Удаление файла F. Перед изъятием файл нужно закрыть.
Procedure Rename (Var F; NewName: String); Меняет имя файла F. NewName — новое имя файла. Перед переименование файла нужно закрыть.
Function DateTimeToFileDate (DateTime: TdateTime): Integer; Превращает значение DateTime в системный формат времени создания файла.
Function FileDateToDateTime

(FileDate: Integer): TdateTime;

Превращает системный формат FileDate времени создания файла в формат дата-время.
Function FileGetDate (Handle: Integer): Integer; По заданным дескриптором файла Handle возвращает дату и время его создания в системном формате.
Function FileSetDate (Handle: Integer; Age: Integer): Integer; Для файла с дескриптором Handle устанавливает новую дату и время Age в системном формате.
Function FileAge (Const FileName: String; Attr: Integer): Integer; Для файла FileName возвращает время его последнего обновления (в системном формате) или -1, если такого файла не существует.
Function FindFirst (Const Path: String; Attr: Integer; Var F: TsearchRec): Integer; Возвращает атрибуты первого из файлов регистрируемых в указанном каталоге: Path — маршрут поиска и маска выбора файлов; Attr — атрибуты файлов, выбираются; F — переменная типа TsearchRec, в которой возвращается имя первого выбранного файла.
Function FindNext (Var F: TsearchRec): Integer; Возвращает в переменной F имя следующего файла в каталоге. Переменная F должна предварительно инициироваться обращением к функции FindFirst.
Procedure FindClose (Var F: TsearchRec): Integer; Освобождает память, выделенную для поиска файлов функциями FindFirst или FindNext.
Процедуры и функции для работы с текстовыми файлами
подпрограммы назначение
Procedure Append (Var F: TextFile) Открывает текстовый файл для расширения, при этом указатель устанавливается на конец файла.
Procedure Read (Var F: Читает из текстового файла

 

TextFile; v1 [, v2, …, vn]) последовательность символов, игнорируя признак EOLN и учитывая типы переменных vi. Переменные vi могут быть типа Char или String, а также любого целого или действительного типов.
Procedure Readln (Var F: TextFile; v1 [, v2, …, vn] ) Читает из текстового файла последовательность символов с учетом признака EOLN и типа переменных vi. Переменные vi могут быть типа Char или String, а также любого целого или действительного типов.
Procedure Write (Var F: TextFile; p1 [, p2, …, pn] ) Записывает в символьной форме параметры p1, …, pn в текстовый файл.
Procedure Writeln (Var F: TextFile; p1 [, p2, …, pn]) Записывает в символьной форме параметры p1, …, pn и признак конца строки EOLN в текстовый файл.
   
Function Eoln

TextFile): boolean;

(Var F: Тестирует маркер конца строки. Если достигнут конец строки возвращает true, иначе false.
Function SeekEoln

TextFile): boolean;

(Var F: Тестирует маркер конца строки, пропуская все пробелы и знаки табуляции в признаку EOLN или до первого символа. Если достигнут конец строки возвращает true, иначе false.
Function SeekEof

TextFile): boolean;

(Var F: Тестирует маркер конца файла, пропуская все пробелы, знаки табуляции и маркеры конца строки EOLN, к маркеру конца файла EOF или до первого символа. Если достигнут конец файла возвращает true, иначе false.
Процедуры и функции для работы с типизированными файлами
подпрограммы назначение
Procedure Read (Var F; v1, v2,

…, vn)

Читает (без преобразования) данные с типизированного файла F. Vi — переменные того же типа, что и компоненты файла.
Procedure Write (Var F; p1, p2,

…, pn)

Записывает (без преобразования) данные в типизированный файл F.  Pi — выражения того

 

  же типа, что и компоненты файла.
Procedure Seek (Var F, N: Longint) Устанавливает указатель файла F на N- первый компонент файла (первый компонент файла имеет номер 0).
Function FileSize (Var F): Longint; Возвращает количество компонентов файла.
Function FilePos (Var F): Longint; Возвращает текущую позицию указателя в файле, то есть номер компонента, который будет обрабатываться следующей операцией ввода-вывода.
Процедуры и функции для работы с нетипизированного файлами
подпрограммы назначение
Procedure BlockRead (Var F: File; Var Buf; Count: Integer [; Var AmtTransferred: Integer]); Читает (без преобразования) данные с нетипизированного файла F. Buf — имя переменной, которая принимает участие в обмене данными. Count — количество записей, которые должны быть прочитаны за одно обращение. AmtTransferred — необязательный параметр, который содержит при выходе из процедуры количество фактически обработанных записей.
Procedure BlockWrite (Var F: File; Var Buf; Count: Integer [; Var AmtTransferred: Integer]); Записывает (без преобразования) данные в нетипизированных файл F. Buf — имя переменной, которая принимает участие в обмене данными. Count — количество записей, которые должны быть записаны за одно обращение. AmtTransferred — необязательный параметр, который содержит при выходе из процедуры количество фактически обработанных записей.

 

ЛИТЕРАТУРА

 

1. Сурков К.А., Сурков Д.А Программирование в среде DELPHI 2.0. — Мн .: Попурри, 1997. — 640 с.

2. Епанешников А., Епанешников В. Программирование в среде DELPHI 2.0. Реферат: В 4-х частях. — М .: ДИАЛОГ-МИФИ. 1998.- 1236 с.

3. Фаронов В.В. Delphi 4. Учебный курс. М .: Нолидж, 1998.-464 с.

3. Фаронов В.В.   Delphi 3.  Учебный курс. М .: Нолидж, 1998.- 400 с.

4. Р. Баас, М. Фервай, Х. Гюнтер. Delphi 5: для пользователя — М. Издательская группа BNV, 2000.-496 с.

6. П.В.Шумаков, Фаронов В.В.              Delphi 4.              Руководство разработчика баз данных. — М .: Нолидж, 1999.-476 с.

7. Калверт Ч. Delphi 2. Энциклопедия пользователя: Пер. с англ.

— М .: НИПФ ДиаСофтЛтд, 1996.- 736 с.

 

Процедуры и функции для работы с порядковыми данными
подпрограммы Тип аргумента Тип результата назначение
Ord (x) порядковый порядковый Возвращает порядковый номер x.
Pred (x) порядковый порядковый Возвращает предыдущий порядковый номер для x.
Succ (x) порядковый порядковый Возвращает следующий порядковый номер для x.
High (x) диапазон порядковый Возвращает максимальное значение типа — диапазон, к которому принадлежит x.
Low (x) диапазон порядковый Возвращает минимальное значение типа — диапазон, к которому принадлежит x.
Процедуры и функции для работы с целыми и действительными данными
подпрограммы Тип аргумента Тип результата назначение
Abs (x) Integer, Real Integer, Real Возвращает модуль x.
Chr (b) Byte Char Возвращает символ по его кодом.
Dec (x [, i]) Integer Integer Уменьшает значение x на i, а при отсутствии i на 1.
Inc (x [, i])) Integer Integer Увеличивает значение x на i, а при отсутствии i на 1.
Hi (w) Word Byte Возвращает старший байт аргумента
Lo (w) Word Byte Возвращает младший байт аргумента

 

Hi (i) Integer Byte Возвращает старший байт аргумента
Lo (i) Integer Byte Возвращает младший байт аргумента
Odd (i) Integer Boolean Возвращает true, если i нечетное, иначе — false.
Random (i) Integer Integer Возвращает псевдослучайное число из интервала (0, w-1).
Random Real Real Возвращает псевдослучайное число из интервала (0, 1).
Randomize Инициализация генератора псевдослучайных чисел.
Swap (i) Integer Integer Меняет местами байты в слове.
Swap (w) Word Word Меняет местами байты в слове.
Sin (x) Real Real Синус, угол в радианах.
Cos (x) Real Real Косинус, угол в радианах.
Arctan (x) Real Real Арктангенс, значение в радианах.
Exp (x) Real Real Экспонента.
Ln (x) Real Real Логарифм натуральный.
Pi Real Real число .
Sqr (x) Real Real Квадрат аргумента.
Sqrt (x) Real Real Корень квадратный.
Frac (x) Real Real Дробная часть числа.
Int (x) Real Real Целая часть числа.
Процедуры и функции для работы с датами
подпрограммы назначение
Function Date: TDateTime; Возвращает текущую дату.
Function Time: TDateTime; Возвращает текущее время.
символьных строк
Процедуры и функции для работы с символьными строками
подпрограммы назначение

 

 

Function Concat (S1 [, S2, … SN]: String): String; Возвращает соединен с порядком S1, S2, …, SN символьный строку.
Function Copy (St: String; Index, Count: Integer): String; Копирует из строки St, начиная с символа с номером Index Count символов.
Procedure Delete (St: String; Index, Count: Integer); Удаление из строки St, начиная с символа с номером Index Count символов.
Procedure Insert (SubSt, St: String, Index: Integer); Вставляет подстроку SubSt в строку St, начиная с символа с номером Index.
Function Pos (SubSt, St: String): Integer; Возвращает номер позиции первого вхождения подстроки SubSt в строку St. Если подстрока не найдена, то возвращается ноль.
Function Length (St: String): Integer; Возвращает текущую длину строки St.
Procedure SetLength (St: String, NewLength: Integer) Устанавливает новую (меньшую) длину строки St. Если NewLength больше длины строки, то обращение к SetLength игнорируется.
Function LowerCase (Const St: String): String; Возвращает начальный строку St, в котором все большие латинские буквы заменены на малы.
Function UpperCase (Const St: String): String; Возвращает начальный строку St, в котором все малые латинские буквы заменены на большие.
Function AnsiLowerCase

(Const St: String): String;

Возвращает начальный строку St, в котором все большие буквы заменены на малые (с учетом кириллицы).
Function AnsiUpperCase

(Const St: String): String;

Возвращает начальный строку St, в котором все малые буквы заменены на большие (с учетом кириллицы).
Процедуры и функции преобразования строк к другим типам
подпрограммы назначение
Function StrToFloat (St: String): Extended; Превращает символы строки St в действительное число. Строка не должен содержать ведущих или ведомых пробелов.
Function StrToInt (St: String): Integer; Превращает символы строки St в целое число. Строка не должен содержать ведущих или ведомых пробелов.

 

Procedure Val (St: String; Var X; Code: Integer); Превращает строку символов St во внутреннее представление целой или действительной переменной X, которое определяется типом этой переменной. При успешном преобразовании параметр Code содержит ноль.
Function StrToDate (St: String): TdateTime; Превращает символы строки St в дату. Строка должна содержать два или три числа, разделенных символом «. «. Первое число — дата, второе — месяц. Если задано третье число — год, то оно должно быть в формате XX или

XXXX. Если год не задано, то дата дополняется текущим годом.

Function StrToTime (St: String): TdateTime; Превращает символы строки St в дату. Строка должна содержать два или три числа, разделенных символом «:». Числа задают часы, минуты и, возможно, секунды. По последним числом через пробел могут идти символы «am» «pm», которые указывают на 12-часовой формат времени.
Function StrToDateTime (St: String): TdateTime; Превращает символы строки St в дату и время. Строка должна содержать дату и время, в правильном формате, разделенных пробелом.
Процедуры и функции преобразования данных различных типов в символьных строк
подпрограммы назначение
Function FloatToStr (Value: Extended): String; Превращает истинное значение Value в строку символов.
Function IntToStr (Value: Integer): String; Превращает целое значение Value в строку символов.
Procedure Str (X [: Width [: Decimals]]; var St: String); Превращает число X любого целого или действительного типов в строку символов. Параметры Width и Decimals определяют формат преобразования. Width — общая ширина поля символьного представления, а Decimals — количество десятичных знаков для истинных чисел.

 

Function DateToStr (Value: TdateTime): String; Превращает дату с параметра Value в строку символов.
Function TimeToStr (Value: TdateTime): String; Превращает время с параметра Value в строку символов.
Function DateTimeToStr

(Value: TdateTime): String;

Превращает дату и время с параметра Value в строку символов.
Динамические структуры данных
Процедуры и функции для работы с динамической памятью
подпрограммы назначение
Function Addr (x): Pointer; Возвращает адрес аргумента x. Аналогичный результат возвращает операция @.
Procedure New (Var P: Pointer) Резервирует фрагмент кучи динамической памяти для размещения переменной и помещает в типизированный указатель P адрес первого байта.
Procedure Dispose (Var P: Pointer) Возвращает в кучу фрагмент динамической памяти, который был зарезервирован за типизированным указателем P.
Procedure GetMem (Var P: Pointer; Size: Integer); Резервирует за нетипизированного указателем P фрагмент динамической памяти размера Size (в байтах) и присваивает ему адрес этой области.
Procedure FreeMem (Var P: Pointer; Size: Integer); Возвращает в кучу фрагмент динамической памяти, который был зарезервирован за нетипизированного указателю P.
Function SizeOf (x): Integer; Возвращает длину в байтах внутреннего представления объекта x.
Файловый
Процедуры и функции для работы со всеми типами файлов
подпрограммы назначение
Procedure AssignFile (Var F; FileName: String); Связывает файловую переменную F с именем файла FileName,
Procedure Reset (Var F: File [; RecSize: Word]) Открывает существующий файл. Параметр RecSize, имеет смысл только для нетипизированных файлов, указывает размер блока данных.
Procedure Rewrite (Var F: File [; RecSize: Word]) Создает новый файл. Параметр RecSize, имеет смысл только для нетипизированных файлов, указывает размер

 

  блока данных.
Procedure CloseFile (Var F) Закрывает файл, а связь файловой переменной с именем файла, установленный ранее процедурой AssignFile сохраняется. При создании нового или расширении старого файла процедура обеспечивает сохранение в файле всех новых записей и регистрацию файла в каталоге. Процедура CloseFile выполняется автоматически в отношении всех открытых файлов при нормальном завершении программы. Поскольку связь файловой переменной с именем файла сохраняется, то файл можно повторно открыть без дополнительного использования процедуры AssignFile.
Function Eof (Var F): Boolean; Тестирует конец файла, если указатель указывает на конец файла возвращает true, иначе false.
Function IOResult: Integer; Возвращает код завершения последней операции ввода-вывода. При успешном завершении операции код равен нулю.
Procedure Flush (Var F) Очищает внутренний буфер файла, гарантирует сохранность всех последних изменений файла на диске.
Function FileExists (Const FileName: String): Boolean; Возвращает true, если файл с именем (или маршруту) FileName существует, иначе false.
Procedure GetDir

Var S: String);

(D: Byte: Возвращает в переменной S имя текущего каталога. D — номер устройства (0 — устройство по умолчанию, 1 — диск А, 2 — диск В и т. д.).
Procedure ChDir

String)

  (Path: Изменяет текущий каталог. Path — путь к текущий каталог, который устанавливается по умолчанию.
Procedure MkDir (Dir: String); Создает новый каталог. Dir — путь к создаваемому каталогу.
Procedure RmDir (Dir: String); Удаление каталог Dir. Каталог изымаемого должен быть пустым.

 

Procedure Erase (Var F) Удаление файла F. Перед изъятием файл нужно закрыть.
Procedure Rename (Var F; NewName: String); Меняет имя файла F. NewName — новое имя файла. Перед переименование файла нужно закрыть.
Function DateTimeToFileDate (DateTime: TdateTime): Integer; Превращает значение DateTime в системный формат времени создания файла.
Function FileDateToDateTime

(FileDate: Integer): TdateTime;

Превращает системный формат FileDate времени создания файла в формат дата-время.
Function FileGetDate (Handle: Integer): Integer; По заданным дескриптором файла Handle возвращает дату и время его создания в системном формате.
Function FileSetDate (Handle: Integer; Age: Integer): Integer; Для файла с дескриптором Handle устанавливает новую дату и время Age в системном формате.
Function FileAge (Const FileName: String; Attr: Integer): Integer; Для файла FileName возвращает время его последнего обновления (в системном формате) или -1, если такого файла не существует.
Function FindFirst (Const Path: String; Attr: Integer; Var F: TsearchRec): Integer; Возвращает атрибуты первого из файлов регистрируемых в указанном каталоге: Path — маршрут поиска и маска выбора файлов; Attr — атрибуты файлов, выбираются; F — переменная типа TsearchRec, в которой возвращается имя первого выбранного файла.
Function FindNext (Var F: TsearchRec): Integer; Возвращает в переменной F имя следующего файла в каталоге. Переменная F должна предварительно инициироваться обращением к функции FindFirst.
Procedure FindClose (Var F: TsearchRec): Integer; Освобождает память, выделенную для поиска файлов функциями FindFirst или FindNext.
Процедуры и функции для работы с текстовыми файлами
подпрограммы назначение
Procedure Append (Var F: TextFile) Открывает текстовый файл для расширения, при этом указатель устанавливается на конец файла.
Procedure Read (Var F: Читает из текстового файла

 

TextFile; v1 [, v2, …, vn]) последовательность символов, игнорируя признак EOLN и учитывая типы переменных vi. Переменные vi могут быть типа Char или String, а также любого целого или действительного типов.
Procedure Readln (Var F: TextFile; v1 [, v2, …, vn] ) Читает из текстового файла последовательность символов с учетом признака EOLN и типа переменных vi. Переменные vi могут быть типа Char или String, а также любого целого или действительного типов.
Procedure Write (Var F: TextFile; p1 [, p2, …, pn] ) Записывает в символьной форме параметры p1, …, pn в текстовый файл.
Procedure Writeln (Var F: TextFile; p1 [, p2, …, pn]) Записывает в символьной форме параметры p1, …, pn и признак конца строки EOLN в текстовый файл.
   
Function Eoln

TextFile): boolean;

(Var F: Тестирует маркер конца строки. Если достигнут конец строки возвращает true, иначе false.
Function SeekEoln

TextFile): boolean;

(Var F: Тестирует маркер конца строки, пропуская все пробелы и знаки табуляции в признаку EOLN или до первого символа. Если достигнут конец строки возвращает true, иначе false.
Function SeekEof

TextFile): boolean;

(Var F: Тестирует маркер конца файла, пропуская все пробелы, знаки табуляции и маркеры конца строки EOLN, к маркеру конца файла EOF или до первого символа. Если достигнут конец файла возвращает true, иначе false.
Процедуры и функции для работы с типизированными файлами
подпрограммы назначение
Procedure Read (Var F; v1, v2,

…, vn)

Читает (без преобразования) данные с типизированного файла F. Vi — переменные того же типа, что и компоненты файла.
Procedure Write (Var F; p1, p2,

…, pn)

Записывает (без преобразования) данные в типизированный файл F.  Pi — выражения того

 

  же типа, что и компоненты файла.
Procedure Seek (Var F, N: Longint) Устанавливает указатель файла F на N- первый компонент файла (первый компонент файла имеет номер 0).
Function FileSize (Var F): Longint; Возвращает количество компонентов файла.
Function FilePos (Var F): Longint; Возвращает текущую позицию указателя в файле, то есть номер компонента, который будет обрабатываться следующей операцией ввода-вывода.
Процедуры и функции для работы с нетипизированного файлами
подпрограммы назначение
Procedure BlockRead (Var F: File; Var Buf; Count: Integer [; Var AmtTransferred: Integer]); Читает (без преобразования) данные с нетипизированного файла F. Buf — имя переменной, которая принимает участие в обмене данными. Count — количество записей, которые должны быть прочитаны за одно обращение. AmtTransferred — необязательный параметр, который содержит при выходе из процедуры количество фактически обработанных записей.
Procedure BlockWrite (Var F: File; Var Buf; Count: Integer [; Var AmtTransferred: Integer]); Записывает (без преобразования) данные в нетипизированных файл F. Buf — имя переменной, которая принимает участие в обмене данными. Count — количество записей, которые должны быть записаны за одно обращение. AmtTransferred — необязательный параметр, который содержит при выходе из процедуры количество фактически обработанных записей.

 

ЛИТЕРАТУРА

 

1. Сурков К.А., Сурков Д.А Программирование в среде DELPHI 2.0. — Мн .: Попурри, 1997. — 640 с.

2. Епанешников А., Епанешников В. Программирование в среде DELPHI 2.0. Реферат: В 4-х частях. — М .: ДИАЛОГ-МИФИ. 1998.- 1236 с.

3. Фаронов В.В. Delphi 4. Учебный курс. М .: Нолидж, 1998.-464 с.

3. Фаронов В.В.   Delphi 3.  Учебный курс. М .: Нолидж, 1998.- 400 с.

4. Р. Баас, М. Фервай, Х. Гюнтер. Delphi 5: для пользователя — М. Издательская группа BNV, 2000.-496 с.

6. П.В.Шумаков, Фаронов В.В.              Delphi 4.              Руководство разработчика баз данных. — М .: Нолидж, 1999.-476 с.

7. Калверт Ч. Delphi 2. Энциклопедия пользователя: Пер. с англ.

— М .: НИПФ ДиаСофтЛтд, 1996.- 736 с.

 

[Всего голосов: 4    Средний: 5/5]

Читать  Основы программирования и алгоритмические языки – ЦЕЛИ И ЗАДАЧИ КУРСОВОЙ РАБОТЫ