[Delphi 6.0] Créer sa propre boite de dialogue ?

Marsh Posté le 18-02-2002 à 18:11:18

lu,
j'aimerais construire ma propre boite de dlg. C'est à dire une fenetre capable de renvoyer une valeur à sa fermeture.
g commencé à essayer de le faire en créant une fiche mais cela oblige la création de la fenêtre au début de l'éxecution de l'appli et cela empéche de transformer cette boite de dialogue en composant delphi...
quelqu'un aurait une idée ?

vous avez besoin de plus d'information ?

sinon, il doit exister une boite de message commune du style de MessageBox pour win32, quel est son nom en library delphi ?
Je ne pense pas pouvoir l'utiliser dans ce cas là parceque j'aimerais faire une mise en page de la boite de dialogue avec des controles précis comme un check box du type : O Ne plus poser cette question... ce qui est impossible avec un messageBox.. n'est-ce pas ?

Reply

Marsh Posté le 18-02-2002 à 18:11:18

Reply

Marsh Posté le 18-02-2002 à 18:42:05

je crois que tu vas etre obligé de creer une nouvelle "boite de dialogue"...
il n'existe pas a ma connaissance de boite de dialogue "standard" faisant ce que tu veux !

Donc dans ton projet, tu crees une nouvelle TForm
Tu fais ce que tu as a faire avec : ajout des composants (en particulier des boutons OK et Cancel), du code, etc...
N'oublie pas de changer le BorderStyle en bsDialog (pour faire plus vrai )
N'oublie pas non plus de supprimer la creation automatique de ta nouvelle form dans les options de ton projet (menu Project/Options, onglet "Forms" , supprime ta form de la liste de gauche)

lorsque tu voudras utiliser ta form (TfrmMaBoiteDeDialogue) dans une form existante, tu n'auras qu'a faire un Uses de ton unité et dans ton code faire:

Code :

with TfrmMaBoiteDeDialogue.Create(self) do
try
// ici tu assignes les propriétés / valeurs des champs de
// ta boite de dialogue si necessaire
if ShowModal = mrOK then
begin
// ici tu recuperes les propriétes / valeurs des champs
// modifiées par l'utilisateur
// par exemple, tu vas recuperer la valeur de la checkbox
// bNePlusJamaisDemander := chkNePlusJamaisDemander.checked
end;
finally
free
end;

[jfdsdjhfuetppo]--Message édité par JWhy--[/jfdsdjhfuetppo]

---------------
www.alliancefrancophone.org ... Home is where the heart is

Reply

Marsh Posté le 18-02-2002 à 19:05:58

merci bp

Reply

Marsh Posté le 18-02-2002 à 19:51:42

tu as oublié de dire que dans les propriétés des boutons de la boîte de dialogue, il faut mettre quelque chose dans ModalResult.
genre mettre mrOk pour le ModalResult du bouton OK, et mrCancel à l'autre. Aussi mettre Cancel à True pour le bouton Annuler, comme ça ça fait Cancel quand l'utilisateur appuye sur la touche Escape.

---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire

Reply

Marsh Posté le 18-02-2002 à 20:20:26

toutafait...
:jap: pour la precision !