Téléchargé 25 fois
Vote des utilisateurs
0
0
Détails
Licence : Non renseignée
Mise en ligne le 14 novembre 2010
Langue : Français
Référencé dans
Navigation
Une barre système personnalisé pour vos form
Une barre système personnalisé pour vos form
Un OCX qui peut être utiles dans certaines situations où l'on veut maîtriser au mieux l'utilisation du programme mis a disposition de l'utilisateur final.
Il s'agit d'une barre système pour une form, remplaçant la barre par défaut.
Le projet inclus, donne un aperçu, il reste à chacun de découvrir d'autres utilisations possibles.
Il s'agit d'une barre système pour une form, remplaçant la barre par défaut.
Le projet inclus, donne un aperçu, il reste à chacun de découvrir d'autres utilisations possibles.
Merci ProgElecT
Mais le principe de ce forum Contributions et Sources, c'est de partager des codes sources ou des code exemples
Or il n'y a pas le source du composant BarSystem
Je peux comprendre que tu ne veuilles pas le partager, c'est ton droit le plus absolu, mais je ne peux pas publier celà dans la page Sources
ce topic peut néanmoins resté ici, si ce composant interesse qq'un
Bon w-e
Mais le principe de ce forum Contributions et Sources, c'est de partager des codes sources ou des code exemples
Or il n'y a pas le source du composant BarSystem
Je peux comprendre que tu ne veuilles pas le partager, c'est ton droit le plus absolu, mais je ne peux pas publier celà dans la page Sources
ce topic peut néanmoins resté ici, si ce composant interesse qq'un
Bon w-e
Or il n'y a pas le source du composant BarSystem
Je ne pensai pas que cela interesserait, mais n'etant pas un professionnel, je n'ai aucune intention de vendre le code source de l'ocx, je rajoute donc le ZIP de celui-ci.
Motif de l'edit, le zip complet est plus bas
Merci
En fait l'idée de partager les codes sources, c'est que chacun puisse trouver une piste ou un exemple pour son propre problème
Donc des progs qui n'ont pas les sources n'interessent guère, sauf à l'exploiter tel que, mais ce n'ai pas ce que recherchent les forumeurs, en général
en tout cas, Merci encore
Bonsoir, ProgElecT...
dans le même ordre d'idée que Thierry .. pour le publier dans les sources .. l'idéal serai un seul Zip... (cela m'éviterai une gymnastique douteuse....)
encore pour tes contributions..
dans le même ordre d'idée que Thierry .. pour le publier dans les sources .. l'idéal serai un seul Zip... (cela m'éviterai une gymnastique douteuse....)
encore pour tes contributions..
Voilà la réunion en un seul ZIP, source utilitaire, source de l'OCX et l'OCX
FrmBarSysTem.zip(61,3Ko)
Edit: modification de l'utilitaire de démo et meilleur organisation du ZIP
FrmBarSysTem.zip(61,3Ko)
Edit: modification de l'utilitaire de démo et meilleur organisation du ZIP
Bonjour ProgElec,
Très belle appli
Je la met dans mes source et l'employerais certainement.
Un petit bug dans la sub
Merci
A+
PS: autre solution, supprimé la ligne
CommonDialog1.CancelError = True
Très belle appli
Je la met dans mes source et l'employerais certainement.
Un petit bug dans la sub
Code : | Sélectionner tout |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | Private Sub CmdcoulOmbr_Click(Index As Integer) 'pour modifer l'effet ombre couleur If Chargement = True Then Exit Sub CommonDialog1.CancelError = True CommonDialog1.Flags = cdlCCRGBInit If Index = 0 Then CommonDialog1.Color = MFBarSys1.TitreColorOmbre Else CommonDialog1.Color = MFBarSys1.InfosColorOmbre End If 'Si l'utilisateur clique sur annuler, se plante.. J'ai ajouté On Error Resume Next CommonDialog1.ShowColor If Err.Number <> 0 Then Exit Sub If Index = 0 Then MFBarSys1.TitreColorOmbre = CommonDialog1.Color Else MFBarSys1.InfosColorOmbre = CommonDialog1.Color End If End Sub |
A+
PS: autre solution, supprimé la ligne
CommonDialog1.CancelError = True
Tant que j'y suis,
pourquoi mettre un CheckBox avec index 0 qui ne donne que l'affichage d'une valeur non valide ? (le None)
pourquoi la ligne..
Alors que l'utilisateur n'a pas la possibilité de faire une erreur ?
Autre remarque, j'ai un peu chiqué pour assembler les projets, personnelement (ça n'engage que moi et ce n'est pas mon bon jour )
Je mettrais tout dans un seul répertoir, mettre l'OCX dans la forme de test (Form1) que je renommerai FormTest et je sauverai le groupe de projet. De cette façon, tu charge le ZIP, dans le répertoir tu trouve le groupe de projet et tu clic GO et ça marche.
Et pour info, l'OCX ne doit pas obligatoirement être dans system32, il peut être dans le répertoir de l'appli.
L'OCX (compilé) ne doit pas obligatoirement être joint au zip, il y a toujours moyen de le compilé à partir de la source.
J'espère que tu ne m'en voudras pas trop de ces remarques, je l'ai fait à fin d'amélioration, et n'enlève rien à la qualité de ton appli.
A+
pourquoi mettre un CheckBox avec index 0 qui ne donne que l'affichage d'une valeur non valide ? (le None)
pourquoi la ligne..
Code : | Sélectionner tout |
If New_Emplacement < 1 Or New_Emplacement > 4 Then MsgBox "Valeur non valide", vbCritical: Exit Property
Autre remarque, j'ai un peu chiqué pour assembler les projets, personnelement (ça n'engage que moi et ce n'est pas mon bon jour )
Je mettrais tout dans un seul répertoir, mettre l'OCX dans la forme de test (Form1) que je renommerai FormTest et je sauverai le groupe de projet. De cette façon, tu charge le ZIP, dans le répertoir tu trouve le groupe de projet et tu clic GO et ça marche.
Et pour info, l'OCX ne doit pas obligatoirement être dans system32, il peut être dans le répertoir de l'appli.
L'OCX (compilé) ne doit pas obligatoirement être joint au zip, il y a toujours moyen de le compilé à partir de la source.
J'espère que tu ne m'en voudras pas trop de ces remarques, je l'ai fait à fin d'amélioration, et n'enlève rien à la qualité de ton appli.
A+
Bonjour,
J'ai apprécié ta réponse personnelle.
J'ai encore une remarque à faire et celle là elle est de taille, l'OCX ne fonctionne absolument pas sous Vista.
Pour les essais j'avais juste employé le Groupe de projet, mais lorsque j'ai voulu compiler l'OCX c'est impossible, il m'affiche erreur dans le régistre, lequel ?? je n'en sais rien.
J'ai déjà eu ce genre de problème avec un OCX perso, mais j'ai pu y remédier en réactualisant un composant. (panel3D ne fonctionne pas sous Vista je l'ai remplacé par Frame et c'est passé.
Mais ton OCX ne me permet même pas de modifier le design de l'UC. ?? donc impossible de remplacer certain contrôle.
Je me suis dit, beeeeh tant pis, je joindrai le code et l'UC, mais même comme ça cela ne va pas, impossible de créer l'EXE.
Dommage, car le cadre avait le même aspect que les fenêtre Vista.
A l'occasion je le re créerais entièrement sous Vista, et te le communiquerai.
Cordialement
J'ai apprécié ta réponse personnelle.
J'ai encore une remarque à faire et celle là elle est de taille, l'OCX ne fonctionne absolument pas sous Vista.
Pour les essais j'avais juste employé le Groupe de projet, mais lorsque j'ai voulu compiler l'OCX c'est impossible, il m'affiche erreur dans le régistre, lequel ?? je n'en sais rien.
J'ai déjà eu ce genre de problème avec un OCX perso, mais j'ai pu y remédier en réactualisant un composant. (panel3D ne fonctionne pas sous Vista je l'ai remplacé par Frame et c'est passé.
Mais ton OCX ne me permet même pas de modifier le design de l'UC. ?? donc impossible de remplacer certain contrôle.
Je me suis dit, beeeeh tant pis, je joindrai le code et l'UC, mais même comme ça cela ne va pas, impossible de créer l'EXE.
Dommage, car le cadre avait le même aspect que les fenêtre Vista.
A l'occasion je le re créerais entièrement sous Vista, et te le communiquerai.
Cordialement
J'ai encore une remarque à faire et celle là elle est de taille, l'OCX ne fonctionne absolument pas sous Vista
Je dois changer de PC, mais j'attend le debugage de VISTA, de se fait je n'est pas eu l'occasion de faire des essayer.
Developpez.com décline toute responsabilité quant à l'utilisation des différents éléments téléchargés.