Mega Code Archive

 

Categories / Delphi / System

 

Ctrl+esc ve alt+tab tuslarini devre disi birakmak

Devre Disi Birakmak icin: var OldVal : LongInt; begin SystemParametersInfo (97, Word (True), @OldVal, 0) end; Eski Haline Döndürmek: var OldVal : LongInt; begin SystemParametersInfo (97, Word (False), @OldVal, 0) end;