[Résolu] If ExamineDesktops()

[SPH]

Salut,

Existe t'il des cas où la commande "If ExamineDesktops()" ne renvois pas la résolution du bureau ?

Je demande ça car dans les exemples de PB, il est fait mention du "If" justement. Comme si l'ordi pouvait ne pas trouver...

Merci

[Ollivier]

Bonjour SPH,

ma suggestion : on met un 'If' pour éviter une erreur quand on appelle DesktopWidth() et autres. Sous Windows, il est peu probable que ExamineDesktops() retourne 0. En effet, s'il n'y a pas de bureau, le programme risque fort de ne pas être exécuté. Par contre, sous Linux, je suis incapable de te dire si les programmes peuvent démarrer sans bureau.

M'enfin, si tu veux être généraliste, voici un code succint :

Code : Tout sélectionner

Define Count = ExamineDesktops()
If Count
 lastDesk = Count - 1
 Dim deskW(lastDesk)
 Dim deskH(lastDesk)
 For i = 0 To lastDesk
  deskW(i) = DesktopWidth(i)
  deskH(i) = DesktopHeight(i)
 Next
EndIf

C'est sensé stocker les dimensions de tous les bureaux disponibles dans un double tableau.

Perso, if est la première instruction informatique que j'ai tapée et exécutée. (IF ... THEN)