function DiskFree(disknum :byte) :int64;

Функция возвращает, сколько свободного места (в байтах) находится на указанном диске. "disknum" может принимать значения "0" - текущий диск, "1" - диск "A", "2" - "B", "3" - "C" и так далее.

 

function DiskSize(disknum :byte) :int64;

Функция возвращает размер указанного диска в байтах.

 

function Execute(FileName, Parameters, WorkFolder :string) :integer;

Запустить из скрипта любую программу, BAT-файл, открыть документ и прочее. "FileName" — что именно нужно запустить/открыть, "Parameters" - параметры командной строки, "WorkFolder" — рабочий каталог.

 

function ExecuteEx(FileName, Parameters, WorkFolder :string; RunType :integer) :integer;

Расширенный вариант функции Execute. Запускает из скрипта любую программу, BAT-файл, открывает документы и прочее. "FileName" — что именно нужно запустить/открыть, "Parameters" — параметры командной строки, "WorkFolder" — рабочий каталог; RunType — в каком виде запускать приложение из скрипта:

1 — спрятать окно запускаемого приложения, фокус не отбирать;

2 — минимизировать окно приложения, фокус не отбирается;

3 — максимизировать окно запускаемого приложения, фокус не отбирается;

4 — активировать и показать окно запускаемого приложения;

5 — активировать и показать окно запускаемого приложения в его текущей позиции и размере;

6 — аналогично 5;

7 — активировать окно и развернуть на весь экран;

8 — активировать окно и минимизировать его;

9 — показать окно в его стандартном размере, фокус не отбирать;

10 — показать окно приложения в стандартном режиме, активное окно остается активным, фокус не передается;

11 — то же, что и 10, но окно приложения будет показано там, где оно показывалось в прошлый раз;

12 — активировать и показать окно приложения.

 

function GetComputerName:string;

Возвращает сетевое имя компьютера, на котором исполняется скрипт.

 

procedure GetCPUInfo(var Name :string; var Mhz :word; var Vendor, Identifier :string);

Получить информацию о микропроцессоре, установленном в системе. "Name" — название, "Mhz" — частота, "Vendor" — производитель, "Identifier" — технические данные (family, model, stepping).

 

function GetEnvValue(ValueName :string) :string;

Возвращает значение переменной окружения под именем "ValueName".

 

function GetFileVersion(FileName: string): string;

Функция возвращает версию указанного файла.

 

function GetIdleTime: cardinal;

Определить время простоя системы в миллисекундах. Временем простоя считается время, в течении которого пользователь ничего не нажимает на клавиатуре и не двигает мышку.

 

procedure GetMemoryInfo(var MemoryLoad :byte; var TotalPhys :int64; var AvailPhys :int64; var TotalPageFile :int64; var AvailPageFile :int64);

Получить информацию о памяти, используемой в системе. "MemoryLoad" — сколько процентов физической оперативной памяти занято в данный момент, "TotalPhys" — размер физической оперативной памяти, имеющейся в системе, "AvailPhys" — сколько памяти есть в наличии, "TotalPageFile" — размер файла подкачки, "AvailPageFile" — сколько байт из файла подкачки свободно. Все данные возвращаются в байтах.

 

function SetEnvValue(VarName, VarValue: string): integer;

Функция устанавливает значение "VarValue" для переменной окружения "VarName". Если операция прошла успешно, функция возвращает значение "0".

 

procedure SetLedState(KeyCode:byte; OnOff:boolean);

Включить или выключить индикаторы клавиатуры NumLock, CapsLock и ScrollLock. Индикатор зависит от номера переменной KeyCode. 1 — NumLock, 2 — CapsLock, 3 — ScrollLock. OnOff — включить либо выключить индикатор.

 

procedure UpTime(var d, h, m, s :integer);

Сколько времени работает Windows без перезагрузки. "d" — дни, "h" — часы, "m" — минуты, "s" — секунды.