Стандартные подпрограммы
Стандартные подпрограммы
Общие подпрограммы
procedure Swap<T>(var a, b: T);
Меняет местами значения двух переменных
function Milliseconds: integer;
Возвращает количество миллисекунд с момента начала работы программы
function MillisecondsDelta: integer;
Возвращает количество миллисекунд с момента начала работы программы или предыдущего вызова функций Milliseconds или MillisecondsDelta.
function Rec<T1,T2,...>(x1: T1; x2: T2, ...): Tuple<T1,T2,...>;
Возвращает запись Tuple с соответствующим количеством полей. Поля именуются соответственно Item1, Item2 и т.д. и получают значения x1,x2,... Количество полей - от 2 до 6.
function Dict<TKey, TVal>(params pairs: array of KeyValuePair<TKey, TVal>): Dictionary<TKey, TVal>;
Возвращает словарь пар элементов
function KV<TKey, TVal>(key: TKey; value: TVal): KeyValuePair<TKey, TVal>;
Возвращает пару элементов для использования в функции Dict
procedure Assert(cond: boolean);
Выводит в специальном окне стек вызовов подпрограмм если условие не выполняется
procedure Assert(cond: boolean; mes: string);
Выводит в специальном окне диагностическое сообщение mes и стек вызовов подпрограмм если условие не выполняется
procedure Sleep(ms: integer);
Делает паузу на ms миллисекунд
procedure Halt;
Завершает работу программы
procedure Halt(exitCode: integer);
Завершает работу программы, возвращая код ошибки exitCode
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 ParamCount: integer;
Возвращает количество параметров командной строки
function ParamStr(i: integer): string;
Возвращает i-тый параметр командной строки
procedure New<T>(var p: ^T);
Выделяет динамическую память размера sizeof(T) и возвращает в переменной p указатель на нее. Тип T должен быть размерным
procedure Dispose<T>(var p: ^T);
Освобождает динамическую память, на которую указывает p
function GetEXEFileName: string;
Возващает имя запущенного .exe-файла
function PointerToString(p: pointer): string;
Преобразует указатель к строковому представлению