Comment fermer par programme un dialog affiché avec execute

Version imprimable

27/03/2013, 14h16
Pascale38

Comment fermer par programme un dialog affiché avec execute

Bonjour,
un petit problème qui semble tout bête à la base !!
J'ai un TSaveDialog que j'affiche avec un "execute".
Je voudrai dans certain cas pouvoir fermer ce dialog par programme.
Comment faire ??? y'a pas de Close()... :cry:

merci de votre aide !!
Pascale38
27/03/2013, 14h30
ShaiLeTroll

Vu que le Execute est bloquant cela semble difficile
Faudrait un thread qui via un SendMessage soit simule le Clic soit envoi WM_CLOSE
Une bidouille Delphi 100% API Win32 pour écrire dans un Dialogue Ouvrir (là c'est celui de NotePad) pour envoyer sa propre valeur
Voir aussi Modifier un champ d'un TSaveDialog

Autre solution, voir si tu peux fournir ta propre WndProc et via un bool, tu pourrais forcer la fermeture, par contre, cela ne réagi que lors d'une action utilisateur, peut-être dès le déplacement de la souris mais je pense que WM_NOTIFY n'arrive que sur un VRAI action comme un clic sur un élément
27/03/2013, 16h16
Pascale38

Salut ShaiLeTroll !

ni SendMessage(monDialog->Handle, WM_CLOSE, 0,0);
ni PostMessage(monDialog->Handle, WM_CLOSE, 0,0);
ne ferme le dialogue...

Je vais regarder du côté de ton code pour simuler le clic sur ok.
merci !
Pascale38
27/03/2013, 16h45
Pascale38
J'ai bien compris l'idée de faire un
SendMessage(HwndButton, BM_CLICK, 0, 0);

mais je n'arrive pas à récupérer le HwndButton.
Tu fais ça :
Code:

1 2 3 4 lpszClass := 'Button'; lpszWindow := 'OK'; HwndButton := FindWindowEx(HwndParent, HwndChildAfter, lpszClass, lpszWindow);
'OK' c'est la caption de ton bouton???
Ce qui veut dire que ça marche pas si le PC is in english ???
En ce cas pas la peine que je cherche plus loin dans cette solution, vu que appli internationale... :cry:

Arghhhh comment récupérer le handle de ce bouton !!!???
27/03/2013, 17h27
Crayon

Salut pour le bouton OK je crois que tu peux utiliser un truc du genre:

Code:

HWND HwndButton = GetDlgItem(HwndParent, IDOK);

Voici un exemple plus complet qui fonctionne :)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
void __fastcall TForm2::Button1Click(TObject *Sender)
{
    SaveDialog1->Execute();
}
//---------------------------------------------------------------------------
void __fastcall TForm2::SaveDialog1Show(TObject *Sender)
{
    HWND HwndParent = GetParent(((TSaveDialog*)Sender)->Handle);
    HWND HwndButton = GetDlgItem(HwndParent, IDCANCEL); // Bouton Annuler
    SendMessage(HwndButton, BM_CLICK, 0, 0); // Envoie un Click sur le bouton Annuler
}
//---------------------------------------------------------------------------

J'ai mis le code dans le OnShow du TSaveDialog juste pour faire le teste. Je te fais confiance pour le mettre à la bonne place.

28/03/2013, 09h34
Pascale38

merci beaucoup Crayon,
ça marche nickel !!!! :ccool:
trop biennnnnnnnnnnnnnnn tu me sauves la vie ;) !!!
Allez hop hop, résolu !!!
28/03/2013, 10h37
ShaiLeTroll

@Pascale38, Tu l'as mis dans quel event ?
Si tu l'a laissé dans le OnShow, autant ne pas appeler Execute, cela serait plus simple non ?
28/03/2013, 10h44
Pascale38

ShaiLeTroll : ahahah :mouarf:
Là j'ai juste fait une petite appli pour tester, en fait j'ai mis le test dans un "OnTimer".
Puisque tu veux tout savoir, dans ma vraie appli il sera dans le onClose de la fenêtre parent, OnClose qui est lui même appelé par ma fiche principale dans un cas très particulier où je perds la communication avec mon appareil et où je ne dois plus rien afficher dans ce cas là...

Voilà tu sais tout ;)
merci encore !!!
28/03/2013, 11h10
ShaiLeTroll

Faudrait que je teste ce code mais avec un Dialogue externe à une application de test, juste une bidouille pour jouer pas pour de la prod
J'ai un peu le même problème que toi Pascale38 mais je n'ai pas la main sur le Dialog, voir comment je peux choper le bon Handle compatible avec GetDlgItem, ça sera mieux que mes FindWindowEx\GetWindowText d'où ma curiosité :mouarf:
02/04/2013, 10h11
Pascale38

Hop je relance la discussion :roll:
Comment connaitre le petit nom du bouton (ici dans l'exemple IDCANCEL) ?
En fait ça ne fonctionne pas avec un Print Dialog (à priori le bouton cancel a un autre identifiant) et je ne sais pas où trouver l'info ?

merci !!!!!!!!!!
Pascale38
02/04/2013, 16h06
Crayon

Citation:

Envoyé par Pascale38

Comment connaitre le petit nom du bouton (ici dans l'exemple IDCANCEL) ?

Salut, j'utilise le logiciel WinSpy++ pour connaitre le Control ID.
02/04/2013, 16h40
Pascale38

Merci Crayon, sympa ton outil !
Donc je vois que le bouton cancel d'une boite de dialogue save a un Control ID qui vaut 2, c'est comme ça que tu en as déduit que son petit nom était IDCANCEL ? Parce que le bouton cancel du print dialog a aussi un ID de 2...
Et je ne vois nulle part l'info IDCANCEL ?

Tiré de winuser.h:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
/*
 * Dialog Box Command IDs
 */
#define IDOK                1
#define IDCANCEL            2
#define IDABORT             3
#define IDRETRY             4
#define IDIGNORE            5
#define IDYES               6
#define IDNO                7
#if(WINVER >= 0x0400)
#define IDCLOSE         8
#define IDHELP          9
#endif /* WINVER >= 0x0400 */
 
#if(WINVER >= 0x0500)
#define IDTRYAGAIN      10
#define IDCONTINUE      11
#endif /* WINVER >= 0x0500 */

02/04/2013, 17h23
Pascale38
Donc le bouton cancel du print dialog a bien pour nom IDCANCEL mais le code suivant ne fonctionne pas :cry:
Code:

1 2 3 4 HWND HwndParent = GetParent(((TPrintDialog*)Sender)->Handle); HWND HwndButton = GetDlgItem(HwndParent, IDCANCEL); SendMessage(HwndButton, BM_CLICK, 0, 0);
--> HwndButton vaut NULL...

et ça ne fonctionne pas non plus avec un find dialog, par contre lui se ferme tout seul si la form est fermée... :aie:

Pffff aucun ne fonctionne pareil, c'est la galère et je ne sais pas comment fermer mon print dialog du coup

Salut, tu n'as pas besoin de faire le GetParent pour cette fenêtre:
Code:

1 2 3 HWND HwndParent = ((TPrintDialog*)Sender)->Handle; HWND HwndButton = GetDlgItem(HwndParent, IDCANCEL); SendMessage(HwndButton, BM_CLICK, 0, 0);

03/04/2013, 09h24
Pascale38

Effectivement ça marche comme ça !
Heu je suis un peu perdue, tu pourrai m'expliquer cette histoire de GetParent ??
merciiiiiiiiiiiiiiiii
03/04/2013, 11h58
yarp

GetParent est une fonction de l'API Win32 qui renvoie le Handle parent d'une fenêtre.
Dans le cas présent tu demandais le parent de la TPrintDialog c'est à dire la fenêtre appelant.

L'aide de GetParent dans le MSDN (Google search: msdn getparent function) - en Anglais:
http://msdn.microsoft.com/en-us/libr...=vs.85%29.aspx
03/04/2013, 12h49
Pascale38

Oui j'ai bien compris que cette fonction renvoie le handle du parent, ce que je ne comprends pas c'est pourquoi pour un save dialog il faut passer par le handle du parent pour récupérer le handle du bouton et pas pour un print dialog...
En fait même c'est devoir passer par le handle du parent d'un save que je ne comprends pas...
Heu je suis pas sûre d'être très claire là ;)
03/04/2013, 13h28
yarp

Si c'est clair.
Utilise WinSpy++ il te donnera sans doute l'arborescence des Handle.

J'utilise pour ma part MiniSpy qui a cette fonctionnalité.
http://www.codeproject.com/Articles/1732/MiniSpy

Ce peut-être lié à l'implémentation de TSaveDialog vs TPrintDialog dans ce cas il faut regarder dans la VCL. Ou Sinon à la façon dont ces fonctions sont construites dans Windows.
Mais dans les 2 cas MiniSpy/WinSpy te donnera la réponse car il affiche aussi les classes de fenêtre et tu verras tout de suite si la fenêtre est du Win32 pure ou si elle est encapsulé dans un T* (de type VCL).

Edit: pour l'arborescende des Handle je dois confondre avec Spy++ (qui est un outil de Visual Studio). Mais quand tu déplace MiniSPy au dessus d'un controle il te donne le Handle et son parent ce qui revient au même (en plus pénible).
03/04/2013, 14h59
Pascale38

Ok merci pour toutes ces infos et tous ces petits outils.
J'arrive maintenant à fermer tous les dialogues, print, open, save, etc... ouf !!
Je suis quand même dubitative face aux différentes implémentations de toutes ces boites de dialogues... C'est bien dommage que tout ça ne soit pas uniforme... 8O

En tout cas encore un grand merci !!!!
Pascale38
03/04/2013, 16h10
yarp

Je viens de regarder pour WinSPy, il a l'air très supérieur à MiniSpy et affiche bien l'arborescence. D'ailleur on trouve sur ce site (catch22.net) des tas de conseils utiles pour programmer proprement l'API Windows.

La raison de ces différences est inscrite dans les limbes de Windows, mais IDCANCEL et IDOK sont des ID tout ce qu'il y a de plus standard, et tu peux compter que ça ne changeras pas (*) tu peux quand même écrire un code générique en te basant sur ça.
(*) même MS code de cette façon et beaucoup de code qu'on retrouve sur le net est issu des exemples donnés par MS.

Fuseau horaire GMT +2. Il est actuellement 18h01.