Afficher plusieurs feuilles et en mettre une prioritaire

Question

Bonjour,

Lorsque je lance mon programme, ma feuille principale (appelée Client) s'affiche comme je veux dans le coin en haut à gauche, puis lorsque j'appuie sur mon bouton "Ouvrir les Vidéo", une autre fenêtre (appelée Vidéo) s'ouvre et je peux sélectionner la visualisation des vidéos. Le problème est que je veux que la fenêtre principal ne se réduise jamais même quand je suis sur la feuille "Vidéo".J'ai mis "Vidéo.Show" mais je ne sais pas quoi mettre dans (modal et owner Form).
J'espère que j' ai été assez clair et si quelqu'un avait la solution ca serait cool.

Merci d'avance

Guillaume

Shark-Man · Answer

Tu utilises le système des feuilles MDI ?
Si ce que tu veux c'est que ta forme reste toujours au premier plan il suffit d'utiliser ce code:







Dans un module :



Private


 Const SWP_NOMOVE = 2
Private Const SWP_NOSIZE = 1
PrivateC onst HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2
Private  Declare Function SetWindowPos Lib"USER32" (ByVal hwnd AsLong, ByVal hWndInsertAfter AsLong, ByVal x AsLong, ByVal y AsLong, ByVal cx AsLong, ByVal cy AsLong, ByVal wFlags AsLong) AsLong




Pour que la forme reste au premier plan utilises:




SetWindowPos Me.hwnd, 

HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE
Pour annuler cette fonction il te suffit de la relancer en remplacant HWND_TOPMOST par HWND_NOTOPMOST.

J'espère avoir repondu à ta question.
Bonne continuation.






° 
The world is moving so fast these days that the person who says it can't be done is generally interrupted by someone doing it ° 
Harry Emerson Fosdick

bichoncanada · Answer

le set windows je dois le mettre dans la commande qui permet d'ouvrir la fenêtre Vidéo  ???
et les private const au début dela feuille principale ???

bichoncanada · Answer

J'ai trouvé où les mettre mais quand je lance il me mets en message d'erreur " Convention d'appel de DLL incorrect" et me souligne en jaune SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE.
Donc cela n'a pas l'air de marcher.
Peux tu m'aider ???

Shark-Man · Answer

Peut etre ai-je mal copier/coller ou toi..
Reessaye avec sa pour voir.

Dans la partie déclaration du module:
Private Const SWP_NOMOVE = 2
Private Const SWP_NOSIZE = 1
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2;
Private Declare Function SetWindowPos Lib "USER32" (ByVal hwnd As Long, _
    ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, _
    ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Dans le _Load de ta form pour que sa soit actif des le chargement:
SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE

Lorsque tu ne veux plus que la forme soit toujours au premier plan:
SetWindowPos Me.hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE

Chez moi ce code fonctionne parfaitement :(
J'espere vraiment te donner ce que tu attend sa serait dmg que tu te donne du mal pour rien lol.

bichoncanada · Answer

oui c'est bon ca m'a vraiment aidé mais j'ai utilisé plutôt utilisé SWP_NOREDRAW = 0 et ca marche niquel donc merci.

Afficher plusieurs feuilles et en mettre une prioritaire

5 réponses

Votre réponse

Discussions similaires