TDeviceProcedure= procedure(CancelHandle: THandle) of object;
Таймер
function CreateDeviceTimer(DeviceProcedure: TDeviceProcedure; Interval: Longword; ForceFirst: Boolean): TDeviceTimerHandle;
procedure DestroyDeviceTimer(DeviceTimerHandle: TDeviceTimerHandle);
procedure ForceDeviceTimer(DeviceTimerHandle: TDeviceTimerHandle);
procedure SetDeviceTimerInterval(DeviceTimerHandle: TDeviceTimerHandle; Interval: Longword).
Системные сигнальные объекты
function CreateDeviceEvent(DeviceProcedure: TDeviceProcedure; Handle: THandle): TDeviceEventHandle;
procedure DestroyDeviceEvent(DeviceEventHandle: TDeviceEventHandle).