spořič

Dneska se podíváme nejprve na spořič obrazovky, poté si zkusíme otestovat, zda aplikace odpovídá nebo došlo k jejímu pádu, a také se začneme zabývat tiskárnami a vůbec věcmi souvisejícími s tiskem.
Zjištění doby, za kterou se aktivuje spořič obrazovky
Potřebujete-li z nějakého důvodu zjistit, za jaký časový interval se aktivuje spořič obrazovky, můžete využít následující funkci, která vám tuto dobu vrátí v sekundách.
function GetScreenSaverTimeout: Integer;
begin
SystemParametersInfo(SPI_GETSCREENSAVETIMEOUT, 0, @result, 0);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(IntToStr(GetScreenSaverTimeout) + ' sekund');
end;