OCX POUR PLACER SES CONTRÔLES DANS UN COMMONDIALOG , Source N°27387

Information sur la source

Catégorie :Control Niveau : Débutant Date de création : 06/11/2004 Vu / téléchargé: 3 764 / 635

Auteur : redblast

Ecrire un message privé

Note :

10,00 / 10

1
2
3
4
5
6
7
8
9
10

Commentaire sur cette source (10)

Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale

J'ai fait ce contrôle en partant d'une source déjà existante sur vbfrance (dont j'ai malheureusement oublié l'auteur, je ferai plus attention la prochaine fois, c'est promis) qui permettait de visionner des fichiers images dans une boîte de dialogue d'ouverture de fichiers, je l'ai donc modifié pour que l'on puisse mettre ses propres contrôles.

Source

'In the ZIP

'In the ZIP

Conclusion

Pour faire fonctionner ce contrôle, il suffit de le placer sur une feuille, et de mettre vos contrôles dedans (c'est un conteneur, comme une frame), ensuite il fonctionne comme un commondialog classique:
CmDialog1.Filter = "Tous les fichiers(*.*)|*.*" 'Filtre
CmDialog1.ShowOpen ou CmDialog1.ShowSave 'Affiche la boîte de dialogue
La position des contrôles est contrôlée par la propriété ControlsPosition
Enfin l'évément FileChange est déclanché chaque fois qu'un fichier est sélectionné dans la boîte de dialogue.

Le programme d'exemple n'est pas de moi, c'est un programme qui enregistre en jpeg, j'ai juste modifié les commondialogs classiques. (voir capture)
Il faudra peut-être enregistrer l'ocx dans le registre avant de lancer l'exemple.

Voila j'espére ne rien avoir oublié.
A+ et bonne prog !

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

CmDialog
- Exemple
  - cdibsec.cls 7 972 octets
  - CmDialog.exp997 octets
  - CmDialog.lib2 616 octets
  - CmDialog.oca20 992 octets
  - CmDialog.ocx49 152 octets
  - Form1.frm 4 930 octets
  - Form2.frm 6 950 octets
  - helpers.bas 2 692 octets
  - ijl.bas 47 894 octets
  - ijl15.dll372 736 octets
  - Module1.bas 94 octets
  - Projet1.vbp 854 octets
  - Projet1.vbw 209 octets
- Source
  - CmDialog.vbp 974 octets
  - CmDialog.vbw 53 octets
  - CMDLGD6.dll94 208 octets
  - ctlbtn.bmp 726 octets
  - Dialog.ctl 15 073 octets
  - Dialog.ctx786 octets

Télécharger le zip

Sources du même auteur

Toutes les sources de redblast

Sources de la même categorie

Toutes les sources de la catégorie Control

Commentaires

Commentaire de jack le 06/11/2004 16:19:57 administrateur CS

Salut redblast
Belle réalisation. Bien vu
Sur ce lien, tu trouveras deux classes qui permettent d'assurer la transformation de BMP en JPG sans avoir recours à la DLL de Intel IJL15 : http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=50065&lngWId=1
Commentaire de Saros le 07/11/2004 11:21:43

Erreur 429 :
ActiveX can't create Object or component

Quelqu'un a une idée ?
Commentaire de sibi12 le 07/11/2004 12:00:49

Saros >>
Tu dois enregistrer la dll CMDLGD6.dll:

ouvre une console (invite de commande MS-DOS) tu va ds le dossier "source" et tape "regsvr32 cmdlgd6.dll"

redblast >>

Pourquoi n'as tu pas créer un groupe de projet c'est beaucoup plus facile pour le debogage. Tu as du créer ton OCX pour l'utiliser dans l'exemple alors que si tu créais ton groupe de projet tu pouvais directement utiliser le vbp et tu pouvais déboguer directement ton controle.

Sinon belle source !!!

+++
Commentaire de sibi12 le 07/11/2004 12:04:34

PS : pour info, au prix de quelque manip on a pour projet1.vbp (l'exemple)

Type=Exe
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\System32\stdole2.tlb#OLE Automation
Module=Helpers; helpers.bas
Module=IJL; ijl.bas
Class=cDIBSection; cdibsec.cls
Form=Form1.frm
Form=Form2.frm
Module=Module1; Module1.bas
Object=*\A..\Source\CmDialog.vbp
Startup="form1"
HelpFile=""
ExeName32="Projet1.exe"
Command32=""
Name="Projet1"
HelpContextID="0"
CompatibleMode="0"
MajorVer=1
MinorVer=0
RevisionVer=0
AutoIncrementVer=0
ServerSupportFiles=0
VersionCompanyName="tzete"
CompilationType=0
OptimizationType=0
FavorPentiumPro(tm)=0
CodeViewDebugInfo=0
NoAliasing=0
BoundsCheck=0
OverflowCheck=0
FlPointCheck=0
FDIVCheck=0
UnroundedFP=0
StartMode=0
Unattended=0
Retained=0
ThreadPerObject=0
MaxNumberOfThreads=1

[MS Transaction Server]
AutoRefresh=1

et pour group.vbg (qui est a la racine du zip)

VBGROUP 5.0
Project=Source\CmDialog.vbp
StartupProject=Exemple\Projet1.vbp

donc si vous voulez vous amuser un peu à deboguer...

P.S 2 : ton exemple ne gère pas le bouton annuler
Commentaire de Saros le 07/11/2004 12:42:17

Ben c'est génial :) merci beaucoup
J'ai bien aimé le code, il est vachement utile, et j'ai vu aucun problème ^^
Par contre essaie de commenter un peu plus...
10/10
Commentaire de Saros le 07/11/2004 12:43:24

[La note va tout particulièrement à l'auteur de ce contrôle, ce qui ne veut pas dire que redblast n'a aucun mérite loin de là ^^]
Commentaire de Neo.balastik le 07/11/2004 18:35:23

J'apprécie !!! Je me posais souvent la question de la personnalisation des CommonDialog Box sans jamais avoir réellement recherché comment faire. En voici une bonne illustration.
Commentaire de moustachu le 08/11/2004 10:14:18

Bravo !
++
Moustachu
Commentaire de PCPT le 12/06/2005 20:34:27 administrateur CS

salut,
beau boulot.
mais non, je vais pas m'arrêter là, il faut aussi des défauts ;)

en fait, quand on choisi une autre image, l'objet image se redimentionne (logique), mais comme elle est en strech (logique aussi), la nouvelle image est déformée le temps que la taille de Image approprié soit calculée.
pourquoi ne pas (éventuellement) passer le visible à False, le temps des calculs. l'affichage en sera accéléré puisque qu'affichée à la fin du chargement, et on ne verra pas la différence de taille...

enfin jdis çà.....
note : + que 9, pas envie de mettre 10, alors je note pas (pas aujourd'hui en tout cas)

PCPT
Commentaire de STEPHANE6012 le 04/07/2007 14:59:32

Bonjour
j'ai juste une question
Comment on place less control dans le cmdialog1 et lesquels
Dsl mais je suis débutant
Mais sinon bon travail
Par avance merci