JulioDelphi
Messages postés2226Date d'inscriptiondimanche 5 octobre 2003StatutMembreDernière intervention18 novembre 2010
-
4 sept. 2007 à 20:44
cs_cantador
Messages postés4720Date d'inscriptiondimanche 26 février 2006StatutModérateurDernière intervention31 juillet 2021
-
7 sept. 2007 à 14:56
Hello =)
J'ai dans ma Form1 une procedure qui ouvre X Form2. (dans le Unit1.pas)
La voici :
Form2:=TForm2.Create(Form2);
Form2.Show;
Grace à une autre procedure, elle apparait dans la barre des taches, voici cette procedure (dans le Unit2.pas):
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
end;
Je voudrais avoir un menu contextuel si je clic droit sur ma form2 qui se trouve dans la barre des taches.
Comment faire donc ? merki
ps : désolé pour le formatage du message, une textbox qui galere ...
f0xi
Messages postés4205Date d'inscriptionsamedi 16 octobre 2004StatutModérateurDernière intervention12 mars 202235 4 sept. 2007 à 20:51
le popupmenu de l'application (ou fenetre) dans la barre des taches, correspond au popupmenu qui s'affiche sur l'icone de l'application (icone systeme).
donc il suffit d'utiliser un code qui ajoute des elements au menu systeme de la fiche, ils devraient apparaitre egalement dans ce menu.
JulioDelphi
Messages postés2226Date d'inscriptiondimanche 5 octobre 2003StatutMembreDernière intervention18 novembre 201014 4 sept. 2007 à 21:07
Oui bien sur, mais sur la barre des taches, je n'ai aucun menu lors du clic droit ^^
Je veux meme le menu "de base" sans forcement le personnaliser.
Test vite fait mes ligens de code, tu verras par toi meme mon soucis ;p
je sais pas si j'ai été bien clair :)
cs_cantador
Messages postés4720Date d'inscriptiondimanche 26 février 2006StatutModérateurDernière intervention31 juillet 202113 7 sept. 2007 à 14:56
Tout doux Julio..
j'ai fait un tas de trucs avec les poppup et clic droit dans PostitForEver..
jette un oeil, on ne sait jamais, çà pourrait peut-être résoudre ton problème..
Enfin du moins je l'espère..
En tout cas je suis sûr qu'on va trouver une solution..