Lunasoft
Messages postés75Date d'inscriptionsamedi 28 juin 2008StatutMembreDernière intervention16 août 2011
-
17 juil. 2009 à 17:35
cs_cantador
Messages postés4720Date d'inscriptiondimanche 26 février 2006StatutModérateurDernière intervention31 juillet 2021
-
22 juil. 2009 à 18:33
Bonjour!
Après avoir essayé ces codes. Je me rends compte d'une chose étrange. Je me demande pourquoi les touches suivantes du clavier font reaparaitre la barre de tâche: Alt+F4; Alt+TAB et la touche ayant le symbole du windows (juste de gauche et de droite de la barre d'espacement). Alors que, je voulais bien qu'aucune touche du clavier ne reactive la barre de tâche. Comment faire?
procedure TTest.FormClose(Sender: TObject; var Action: TCloseAction);
var
HTaskbar: HWND;
OldVal: LongInt;
begin
//Retrouve la barre de tâche
HTaskBar := FindWindow('Shell_TrayWnd', nil);
//Actualisation du système de touche
SystemParametersInfo(97, Word(False), @OldVal, 0);
//Rendre la barre de tâche inactive
EnableWindow(HTaskBar, True);
//Ne pas montrer la barre de tâche
ShowWindow(HTaskbar, SW_HIDE);
end;