Discussion :

[BestofMac]

Boujour,

J'aimerais qu'une fenêtre 'custom' apparaissent sur une autre fenêtre principale mais de façon flottante. De cette manière, je peux utiliser le menu de la fenêtre principale tout en rendant visible la deuxième fenètre.

Quand je fais:
fenetre2.visible:= true;
cette fenetre 2 reçoit le focus et donc si j'étais en train de cliquer sur un menu de la fenetre principale. le menu se ferme car cette dernière n'a plus le focus.

Y a t-il un moyen de faire une fenêtre que l'on voit mais qui n'affecte pas les autres fenêtres du programme?
P.S.: Ce genre de fenêtre existe dans l'API Macintosh existe-t-il en Win

Merci!

[Smortex]

Je n'ai pas très bien compris ce que tu voualis faire :

Faire du MDI ?
=> Il faut mettre FormStyle en fsMDIForm pour la fiche principale et en fsMDIChild pour la fenêtre enfant.

Activer une fenêtre enfant MDI ?
=> ActiveMDIChild.BringToFront;

Mettre une fenêtre dans une autre sans utiliser le MDI ?
=> Form2.ParentWindow := Form1.Handle;

En espérant t'avoir aidé... Si c'est pas bon, essaye de reformuler le problème.

Bon développement !

[Merlin]

Ce style de fenêtre popup sans focus n'existe pas sous Windows. Dans ce dernier toute fenêtre à le focus quant elle est créée. Il y a des moyens de contourner bien entendu.

Maintenant si tu veux afficher la fenêtre pendant que tu fais d'autres trucs sans perte de focus (genre sélection dans une combo) il faut utiliser d'autres méthodes.
Celle qui me vient à l'esprit est celle des Hint. Regarde le source de la VCL sur la gestion des Hints, la fenêtre qui est créée répond tout à fait à ton besoin et utilise une astuce pour ne pas prendre le focus ni le faire perdre à ce qui est en cours.
Sinon autre idée : afficher un simple rectangle (comme un panel avec du texte) en le créant sur le bureau au lieu de la fiche princiale.

Je n'ai jamais eu à faire çà mais ce sont les 2 directions dans lesquelles je chercherais.

[BestofMac]

Voilà la façon de faire:

setWindowPos(frmBulle.Handle, HWND_TOPMOST, Rect.Left, Rect.Top, form2.Width, form2.Height,SWP_NOACTIVATE);

ShowWindow(frmBulle.Handle, SW_SHOWNOACTIVATE);

C'est comme ça qu'on montre une fenêtre par dessus toutes les autres sans toutefois lui donner le focus.

J'ai trouvé cette méthode dans la procédure THintWindow.ActivateHint
du fichier controls.pas.

Merci pour les conseils !!

[BestofMac]

Correction de la réponse précédente, voilà en fait mon code en plus clair:

//Affecter du texte dans un composant sur la form//

form2.tAide.Caption:= getLongHint(application.Hint);

//placer la form sur toutes les fenêtres//

setWindowPos(frmBulle.Handle, HWND_TOPMOST, Rect.Left, Rect.Top, form2.Width, form2.Height,SWP_NOACTIVATE);

//montrer la form//

ShowWindow(frmBulle.Handle, SW_SHOWNOACTIVATE);

//Je ne comprend pas pourquoi je dois mettre la ligne suivant mais si je ne la met pas, le hint affecter au caption de taide n'apparaît pas : : //

form2.visible:= true;