
ПРИЛОЖЕНИЕ
Процедуры и функции 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 с.