Fórum ctrl alt del no XP #178717

Prezado colega,


Esta dica peguei de outros companheiros do clube delphi, experimente!


Cássio Marques
Lavras -MG

var
OldValue : LongBool;
begin
{liga a trava}
SystemParametersInfo(97, Word(True), @OldValue, 0);
{desliga a trava}
SystemParametersInfo(97, Word(False), @OldValue, 0);
end;