Page 2 sur 2

Publié : sam. 07/févr./2004 20:44
par Le Soldat Inconnu
Pour oliv et ceux que ça intéresse : pour cacher le nom d'un icône, il suffit de le renommer comme suit :

mettez le pointeur de votre souris sur l'icône concerné
cliquez avec le bouton droit de la souris
choisissez Renommer
maintenez la touche ALT enfoncée
tapez '0160' à la place du nom
faites Entrée

Publié : sam. 07/févr./2004 23:00
par Oliv
Et pour plusieurs icones ? :D

Publié : sam. 07/févr./2004 23:30
par Chris
Pour Regis:

Un petit bout de code que j'ai trouvé dans CodeArchiv, pour minimiser toutes les fenêtres. (C'est une partie du fichier OpenSystemWindows.pb).

Code : Tout sélectionner

Shell_TrayWnd= FindWindow_("Shell_TrayWnd", NULL) 
result = SendMessage_ (Shell_TrayWnd,$111,419,0)
Tu pourrais peut-être utiliser ça dans ton code que tu as donné dans ton post précédent.

Ca donnerait ça :

Code : Tout sélectionner

Procedure ShowDesktop() 
  Shell_TrayWnd= FindWindow_("Shell_TrayWnd", NULL) 
  result = SendMessage_ (Shell_TrayWnd,$111,419,0) 
EndProcedure 

ShowDesktop() 

Bureau = FindWindow_("Progman", "Program Manager") 
If IsWindowVisible_(Bureau) ; Si les icônes sont visibles 
  ShowWindow_(Bureau, 0) ; Cache les icônes 
Else 
  ShowWindow_(Bureau, 1) ; Montre les icônes 
EndIf 
Chris :)

Publié : sam. 07/févr./2004 23:36
par Le Soldat Inconnu
Pas mal, même super chouette et nettement plus rapide :wink:

Publié : sam. 07/févr./2004 23:38
par Chris
Ceci dit, je ne l'ai testé que deux ou trois fois. A priori, pas de problème, mais bon... à vérifier quand même!!!

Chris :)