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

Utilisateur anonyme - 17 sept. 2005 à 12:38
 Utilisateur anonyme - 30 oct. 2005 à 13:40
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/33820-messagebox-messagedlg-expert-de-code-nouvelle-version-mise-a-jour

Utilisateur anonyme
30 oct. 2005 à 13:40
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
Utilisateur anonyme
30 oct. 2005 à 13:38
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
Inekman Messages postés 291 Date d'inscription dimanche 2 février 2003 Statut Membre Dernière intervention 30 juin 2006
30 oct. 2005 à 09:01
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
Utilisateur anonyme
30 sept. 2005 à 08:23
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
ioda19 Messages postés 21 Date d'inscription jeudi 10 juin 2004 Statut Membre Dernière intervention 20 juin 2007
29 sept. 2005 à 15:49
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
papyvore Messages postés 223 Date d'inscription samedi 15 novembre 2003 Statut Membre Dernière intervention 16 décembre 2021 15
28 sept. 2005 à 15:05
re Bonjour
merci pour ce prog, j'ai trouvé la solution
a mon problème
tout marche OK
papyvore Messages postés 223 Date d'inscription samedi 15 novembre 2003 Statut Membre Dernière intervention 16 décembre 2021 15
28 sept. 2005 à 12:39
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
Utilisateur anonyme
25 sept. 2005 à 22:34
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
@ +
freetai Messages postés 14 Date d'inscription jeudi 31 mars 2005 Statut Membre Dernière intervention 25 septembre 2005
25 sept. 2005 à 22:28
ouahhh!!! je suis bluffé! chapeau bas CIREC! t'as vraiment fait du bon boulot bravo! allez 10/10 et c'est pas volé!
cs_Michel34 Messages postés 79 Date d'inscription samedi 28 décembre 2002 Statut Membre Dernière intervention 27 juin 2011
21 sept. 2005 à 20:21
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.
Utilisateur anonyme
21 sept. 2005 à 00:09
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
@+
Utilisateur anonyme
20 sept. 2005 à 23:30
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 @+
Utilisateur anonyme
20 sept. 2005 à 21:58
Michel34 ->
Les Modifs ne devrait pas être trop dur à faire

Merci pour l'apréciation

@+ Cirec
Utilisateur anonyme
20 sept. 2005 à 21:54
Désolé pour le bug
je l'ai fait sous Delphi 2005
cs_Michel34 Messages postés 79 Date d'inscription samedi 28 décembre 2002 Statut Membre Dernière intervention 27 juin 2011
20 sept. 2005 à 18:43
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
Utilisateur anonyme
17 sept. 2005 à 12:38
Merci pour votre Note
et n'hesitez pas à me faire part de vos Impressions, Suggestions,
ou Buggs.
Rejoignez-nous