procedure Assert(cond: boolean; sourceFile: string := ''; line: integer := 0);
Выводит в специальном окне стек вызовов подпрограмм если условие не выполняется |
procedure Assert(cond: boolean; message: string; sourceFile: string := ''; line: integer := 0);
Выводит в специальном окне диагностическое сообщение и стек вызовов подпрограмм если условие не выполняется |
function ChangeFileNameExtension(name, newext: string): string;
Изменяет расширение файла с именем name на newext |
procedure ChDir(s: string);
Меняет текущий каталог |
function CreateDir(s: string): boolean;
Создает каталог. Возвращает True, если каталог успешно создан |
function DeleteFile(s: string): boolean;
Удаляет файл. Если файл не может быть удален, то возвращает False |
function DiskFree(diskname: string): int64;
Возвращает свободное место в байтах на диске с именем diskname |
function DiskFree(disk: integer): int64;
Возвращает свободное место в байтах на диске disk. disk=0 - текущий диск, disk=1 - диск A: , disk=2 - диск B: и т.д. |
function DiskSize(diskname: string): int64;
Возвращает размер в байтах на диске с именем diskname |
function DiskSize(disk: integer): int64;
Возвращает размер в байтах на диске disk. disk=0 - текущий диск, disk=1 - диск A: , disk=2 - диск B: и т.д. |
procedure Dispose<T>(var p: ^T);
Освобождает динамическую память, на которую указывает p |
function EnumerateAllDirectories(path: string): sequence of string;
Возвращает последовательность имен каталогов по заданному пути, включая подкаталоги |
function EnumerateAllFiles(path: string; searchPattern: string := '*.*'): sequence of string;
Возвращает последовательность имен файлов по заданному пути, соответствующих шаблону поиска, включая подкаталоги |
function EnumerateDirectories(path: string): sequence of string;
Возвращает последовательность имен каталогов по заданному пути |
function EnumerateFiles(path: string; searchPattern: string := '*.*'): sequence of string;
Возвращает последовательность имен файлов по заданному пути, соответствующих шаблону поиска |
procedure Exec(filename: string);
Запускает программу или документ с именем filename |
procedure Exec(filename: string; args: string);
Запускает программу или документ с именем filename и параметрами командной строки args |
procedure Execute(filename: string);
Запускает программу или документ с именем filename |
procedure Execute(filename: string; args: string);
Запускает программу или документ с именем filename и параметрами командной строки args |
function FileExists(name: string): boolean;
Возвращает True, если файл с именем name существует |
function GetCurrentDir: string;
Возвращает текущий каталог |
function GetDir: string;
Возвращает текущий каталог |
function GetEXEFileName: string;
Возващает имя запущенного .exe-файла |
procedure Halt(exitCode: integer);
Завершает работу программы, возвращая код ошибки exitCode |
procedure Halt;
Завершает работу программы |
function Milliseconds: integer;
Возвращает количество миллисекунд с момента начала работы программы |
function MillisecondsDelta: integer;
Возвращает количество миллисекунд с момента последнего вызова Milliseconds или MillisecondsDelta |
procedure MkDir(s: string);
Создает каталог |
procedure New<T>(var p: ^T);
Выделяет динамическую память размера sizeof(T) и возвращает в переменной p указатель на нее. Тип T должен быть размерным |
function ParamCount: integer;
Возвращает количество параметров командной строки |
function ParamStr(i: integer): string;
Возвращает i-тый параметр командной строки |
function PascalABCVersion: string;
Возвращает версию PascalABC.NET |
function PointerToString(p: pointer): string;
Преобразует указатель к строковому представлению |
function RemoveDir(s: string): boolean;
Удаляет каталог. Возвращает True, если каталог успешно удален |
function RenameFile(name, newname: string): boolean;
Переименовывает файл name, давая ему новое имя newname. Возвращает True, если файл успешно переименован |
procedure RmDir(s: string);
Удаляет каталог |
function SetCurrentDir(s: string): boolean;
Устанавливает текущий каталог. Возвращает True, если каталог успешно удален |
procedure Sleep(ms: integer);
Делает паузу на ms миллисекунд |