begin process at 2010 02 10 05:03:28
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Divers

 > MESSAGEBOX MESSAGEDLG EXPERT DE CODE NOUVELLE VERSION (MISE À JOUR)

MESSAGEBOX MESSAGEDLG EXPERT DE CODE NOUVELLE VERSION (MISE À JOUR)


 Information sur la source

Note :
8,88 / 10 - par 8 personnes
8,88 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Divers Classé sous :messagebox, messagedlg, expert Niveau :Expert Date de création :17/09/2005 Date de mise à jour :28/11/2005 23:33:08 Vu / téléchargé :6 735 / 1 086

Auteur : cirec

Ecrire un message privé
Commentaire sur cette source (16)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
Easy MessageBox Creator est un Expert de Code qui permet de générer
des MessageBox standard ou avec icône personnel et on peut même y ajouter un son.
Une MessageDlg avec une CheckBox, quatre bouton entièrement personalisable, choix du bouton qui détient le focus, une ombre autour de la fenêtre et toujours l'Icône perso et le son.

Il utilise 4 sorte de methode
  1 : MessageBox
  2 : MessageBoxIndirect
  3 : ShellAbout
  4 : MessageDlgEx de l'unité DialogEx

Le code généré est automatiquement inséré dans
l'environnement de développement (en mode Expert uniquement) il insert même les unités
manquantes

il vous montre également comment énnumérer les ressources d'une application ou Dll,
l'utilisation des variables d'environnements, des Infos Bulles personnalisées et autres.

avant tout veuillez lire le fichier Installation.doc
tout ce que vous devez savoir y figure


 Conclusion

           Remerciements :

               Freetai : son code a été le déclencheur, il m'a donné l'idée de
               faire Easy MessageBox Creator.
               InekMan : pour une MessageBox avec Icône Personnel.
            
               Mauricio : pour la Procédure qui permet de dessiner un fond en
               degradé.
            
               Matthias Lamoureux : pour l'insertion du code directement dans l'EDI.
            
               DelphiProg : sans qui je n'aurai jamais trouvé la source de InekMan.
               et tous ceux que j'aurai pu oublier.

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

21 septembre 2005 12:02:22 :
'LoadFromResourceID' Methode inconue pour Delphi 6,7,? je l'ai donc modifier par LoadIcon(hRes, MakeIntResource(32)) qui fonctionne même sous delphi 4
24 septembre 2005 22:06:34 :
corrections dans le fichier ressource, ajout de code: Ajout : Ajout de l'unité CodeExplorer qui sert à inserer les unités manquantes: le prog détecte si il en a besoin et les ajoutes si elles n'y sont pas. Corrections : dans le fichier ressource MsgBoxCode.txt il y avait encore un Icon.LoadFromResourceID que j'ai changé en LoadIcon(HandleRessource, IconId)
24 septembre 2005 22:47:44 :
Correction dans la description
30 octobre 2005 13:32:28 :
- Ajout de l’unité DialogEx qui permet d’avoir des MessageDlg avec Icône Perso, choix du bouton qui aura le focus, quatre boutons personnalisables, et la possibilité d’ajouter une CheckBox. - Choix des boutons que vous voulez traiter et type de traitement que vous désire appliquer (Case Of, If Then, If Not Then, ou aucun) -Quelques petits changements dans les préférences : oAjout de : Sauvegarder les Modifications, pour éviter l’affichage intempestif de message vous demandant si vous voulez sauvegarder vos changements. Bien sur vous pouvez toujours les sauvegarder en cliquant sur la disquette. oAjout de : Sauvegarder la page Active : pour vous laisser le choix de démarrer l’application sur la dernière page Active ou sur toujours sur la première page - Un point important : Si vous avez déclaré a la fois l’unité Dialogs et l’unité DialogEx Vous devez absolument,(si vous utilisez la fonction MessageDlg) la changer en MessageDlgEx pour que ça fonctionne.
28 novembre 2005 23:33:08 :
Ajouts de mots clés

 Sources du même auteur

Source avec Zip Source avec une capture BITMAP 32BITS INTÉGRÉ À LA VCL (TIMAGE, TPICTURE, TBITMAP, T...
Source avec Zip Source avec une capture [ASTUCE] COMMENT VOIR UN ITEM, D'UNE LISTBOX, TRONQUÉ DANS U...
Source avec Zip Source avec une capture TEXTE GRAPHIQUE AVEC CONTOUR, OMBRE ET TEXTURE EN API VERSIO...
Source avec Zip Source avec une capture TEXTE GRAPHIQUE AVEC CONTOUR, OMBRE ET TEXTURE EN API
Source avec Zip Source avec une capture ROTATION (RAPIDE) DE BITMAP (À 360°) EN PUR GDI

 Sources de la même categorie

Source avec Zip Source avec une capture LOGICIEL DE DIAGNOSTIC AUTOMOBILE KWP2000 par Oniria
Source avec Zip Source avec une capture RÉGLE TRANSPARENTE POUR MESURER UN OBJET ECRAN par dubois77
Source avec Zip Source avec une capture LE BOOK DU PAUVRE par dubois77
Source avec Zip Source avec une capture CAHIER 90 PAGES par dubois77
Source avec Zip Source avec une capture TABLEAU DE BOUTONS DYNAMIQUES (AGENDA) par dubois77

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture MESSAGEDLG PERSONNALISÉ par HAFTARIFOUAD
Source avec Zip Source avec une capture SIMULATEUR DU PREMIER ORDINATEUR par offlake
Source avec Zip Source avec une capture MESSAGEDLG AVEC CHOIX DE LA LANGUE par cirec
Source avec Zip Source avec une capture MESSAGEDLG AVEC UNE CHECKBOX ET BOUTONS PERSO ET ICÔNE PERSO par cirec
Source avec Zip MESSAGEDLG AVEC CHOIX DU BOUTON QUI A LE FOCUS par djiki

Commentaires et avis

Commentaire de cirec le 17/09/2005 12:38:15 administrateur CS

Merci pour votre Note
et n'hesitez pas à me faire part de vos Impressions, Suggestions,
ou Buggs.

Commentaire de Michel34 le 20/09/2005 18:43:49

J'ai DL ton exemple et je n'ais pa pu le compiler
Sous quelle version de Delphi l'a tu fait ?
J'ai l'erreur suivante :
[Erreur] MBIMain.pas(1006): Identificateur non déclaré : 'LoadFromResourceID'
j'ai regarde de plus pres et TIcon ne possede pas cette fonction mais
TBitmap.

je travaille avec D7 Pro.

Sinon j'ai pu constater un immense travail pour ton programme
(Fenetres et Unités]
A+  Michel

Commentaire de cirec le 20/09/2005 21:54:10 administrateur CS

Désolé pour le bug
je l'ai fait sous Delphi 2005

Commentaire de cirec le 20/09/2005 21:58:38 administrateur CS

Michel34 ->
Les Modifs ne devrait pas être trop dur à faire

Merci pour l'apréciation

@+ Cirec

Commentaire de cirec le 20/09/2005 23:30:59 administrateur CS

Michel34 >
Voici la solution à ton problème de version
Icon.Handle := ExtractIcon(hInstance,'c:\Windows\System32\Shell32.dll', 109);
Ceci Fonctionne à partir de Delphi4 en remplacement de
Icon.LoadFromResourceID

Il faut ajouter l'Unité Shellapi pour Utiliser ExtractIcon

Il y a 3 paramètres à passer :    
1: HINSTANCE hInst, // instance handle
2: LPCTSTR lpszExeFileName, // filename of file with icon
3: UINT nIconIndex // index of icon to extract

1 handle de l'appelant reste à hInstance
2 Exe ou dll contenant des Icônes // PChar
3 N° de l'icône à extraire

Voila @+

Commentaire de cirec le 21/09/2005 00:09:09 administrateur CS

Une autre Solution (la plus complète)
c'est
Icon.Handle := LoadIcon(hInstance, 'MAINICON')
à la place de
//Icon.LoadFromResourceName(hInstance, 'MAINICON')

et
Icon.Handle := LoadIcon(hInstance, MakeIntResource(2));
à la place de
//Icon.LoadFromResourceID(hInstance, 32);
Voila c'est tout
@+

Commentaire de Michel34 le 21/09/2005 20:21:00

Merci beaucoups pour tes idées , je ne sais pas
quand je pourrais m'y pencher , mais je te tiens
au courant .

Il n'y a pas de quoi , il faut savoir reconnaitre
le travail de tous,et merci de le partager.

A+ et bon dev .  michel.

Commentaire de freetai le 25/09/2005 22:28:53

ouahhh!!! je suis bluffé! chapeau bas CIREC! t'as vraiment fait du bon boulot bravo! allez 10/10 et c'est pas volé!

Commentaire de cirec le 25/09/2005 22:34:57 administrateur CS

Merci Freetai

mais sans toi je n'y aurais même pas pensé.


ps : je reserve encore d'autres modifs
je suis en plein dedans
@ +

Commentaire de papyvore le 28/09/2005 12:39:46

bonjour
j'ai D7 et je ne trouve pas ICONS.RES j'ai bien essayé de faire
avec Workshop mais j'ai une erreur
[Erreur] RLINK32: Unsupported 16bit resource in file "ICONS.RES"
comment puis je m'y prendre pour tester cette source, qui pour moi profane est tout simplement super
merci

Commentaire de papyvore le 28/09/2005 15:05:59

re Bonjour
merci pour ce prog, j'ai trouvé la solution
a mon problème
tout marche OK

Commentaire de ioda19 le 29/09/2005 15:49:55

Bonjour je voudrais savoir s'il est possible d'installer ton Util sur Delphi 6 parce que si j'ouvre "MsgBox.dpr" j'ai les erreurs suivantes
- "Erreur de la lecture de Panel1.BevelKind. La propriété BevelKind n'existe pas"
- "Erreur de la lecture de Panel1.ParentBackGround. La propriété ParentBackGround n'existe pas"
- "Erreur de la lecture de cb_MMSystem.WordWrap. La propriété WordWrap n'existe pas"
- "Classe TXPManifest non trouvée"

et si j'ouvre "MessageBoxExpert.dpk" j'ai l'erreur suivante quand j'essaye de compiler
- "Paquet requis 'vclactnband' non trouvé"

Merci de votre aide
Guillaume

Commentaire de cirec le 30/09/2005 08:23:08 administrateur CS

Bonjour Ioda19

MessageBoxExpert.dpk ne fonctionne que à partir de Delphi 7.

Mais en mode programme (MsgBox.dpr) tu devrais pouvoir le compiler.
Quand tu recois les differentes erreurs tu cliques sur "Ignorer" et ton Delphi retirera
les propriétées inconues. Tu fais de même pour la classe TXPManifest et normalement
tu devrais pouvoir le compiler.Tiend moi au courant.
@+ et bonne Prog

Commentaire de Inekman le 30/10/2005 09:01:25

hihi il est très bien fait cet expert, toutes mes félicitations Cirec.

Ca me fait plaisir de voir que la seule source que j'ai posté a aidé quelqu'un sur un autre projet ;-)

Good job.

Inekman.9/10

Commentaire de cirec le 30/10/2005 13:38:22 administrateur CS

Bonjour Inekman,

Merci pour la note et je suis content que ça te plaise et pour ta source, il faut rendre à césar ce qui lui appartient :-)

@+
Cirec

Commentaire de cirec le 30/10/2005 13:40:36 administrateur CS

Bonjour à tous,
Voilà c'est fait, la mise à jour avec l'unité DialogEx est faite plus autres voir plus haut :-)

Tenez moi au courent.

@+
Cirec

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

MessageBox_HiA [ par DelphiCool ] HelloSi quelqu'un à envie de l'essayerc'est un Soft qui creer le code Delphi pour les MessageBoxIl est Visuel, vous tester votre MessageBox avant de c MessageBox [ par jia2812 ] Salut!...Ça va peut-être vous faire rire mais bon "Qui ne tente rien n'a rien!..." Alors, voilà, si je comprends ps trop mal Delphi car ça ressemble 1 Mettre un message sur plusieurs lignes dans un messagedlg ? [ par Technoman ] Comment fait-on pour passer à la ligne dans un messagedlg ?? Merci. Titre des messagedlg [ par Jos ] Est-il possible de définir le titre des messagedlg?Merci MessageBox [ par ak47 ] salut,Je voudrais ajouter une boite de dialogue a mon programme pour qu'elle demande à l'utitlisateur si il veux vraiment quitter le programme ( il re TextEdit dans un messagebox [ par magicvinni ] Bonjour, J'ai un bouton "renomer" et quand on clique dessus, je voudrais qu'une fenetre type messagebox apparaisse avec un textedit pour entrer le n KYLIX 3 ET MessageDlg [ par barbulille ] salut, voila le pb, quand je teste:if MessageDlg('Mon Message', mtWarning, mbYesNo, O)= mrNo then...le compilatuer me dit que l'identificateur mrNo n' Ini => MessageBox [ par kanigou ] Voila, ce que je voudrais faire c'est mettre une valeur d'un string dans une MessageBox ... Ini := TiniFile.Create('fichier.ini'); v := Probleme de MessageDlg qui disparaissent derriere la form principal sous XP [ par Lassal ] Bonjour bonjour !!Voila comme le titre l'indique, depuis que nous sommes sous XP dans notre boite, on a des problemes avec les MessageDlg qui se cache messagedlg en français [ par s_rodrig ] J'utilise des messagedlg dans mon application. Pour celà j'utitlise la librairie QDialogs qui me permet de choisir le bouton du messagedlg sur lequel


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,624 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales