OCX JOURNÉES MONDIALES
clubpsr
Messages postés
21
Date d'inscription
samedi 15 février 2003
Statut
Membre
Dernière intervention
2 septembre 2008
-
11 sept. 2006 à 10:44
chaibat05 Messages postés 1883 Date d'inscription samedi 1 avril 2006 Statut Membre Dernière intervention 20 novembre 2007 - 11 sept. 2006 à 16:28
chaibat05 Messages postés 1883 Date d'inscription samedi 1 avril 2006 Statut Membre Dernière intervention 20 novembre 2007 - 11 sept. 2006 à 16:28
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/39514-ocx-journees-mondiales
https://codes-sources.commentcamarche.net/source/39514-ocx-journees-mondiales
11 sept. 2006 à 16:28
Rien à redire.
Merci.
Si j' ai besoin de quoi que ce soit, je sais ou te trouver !
A+
11 sept. 2006 à 16:22
>Tu n' a rien à ajouter. (...).Get_Journee est dans UC_Initialise
*exact oui, le code était en 'remarque...
>Print
*membre masqué mais existe bel et bien. pas besoin de VbCrLf puisque chaque ligne commence sur une nouvelle, mais tu peux....
>ressources
*menu Compléments > gestionnaire de complément> coche "Editeur de ressources VB6" [OK]
menu Outils > Editeur de ressources > ajouter une ressource personnalisée
tu vas chercher ton fichier texte, il te faudra ensuite lire la ressource en tableau hexa par LoadResString ou LoadResData.
sinon tu peux aussi stocker un tableau en variables...
>11 septembre
*ne mélange pas tout! j'ai juste écrit une donnée pour voir le résultat aujourd'hui...
++
11 sept. 2006 à 16:00
J' ai revu tes remarques avec plus de précision.
Je Veux répondre à quelques unes tout en restant convaincu
qu' elles étaient toutes pertinentes.
*mettre une date par défaut, çà colle pas trop :
si je jour ne correspond à rien, soit ne rien mettre, soit justement le saint.
>>Il n' y' a pas de date par défaut.C' était juste pour l' exemple.
Les lignes doivent être carrement supprimé.
et ne conserver que : Get_Journee App.Path & "\JM.txt", Date
Si je jour ne correspond à rien, ça sera rien
D' ailleur je l' ai signalé.
*tu as oublié de lire le fichier. on est donc obligé d'ajouter ce code au form_load :
>>Tu n' a rien à ajouter.
OJM1.Get_Journee App.Path & "\JM.txt", Date
est dans UC_Initialise.
*tu peux écrire sur le UC (pas besoin de labels)
>>ça je ne savais pas.Je vais le tester.
Mais comment ?.Il n' y a pas de UC.Print.
Et surtout est-ce qu' il y' aurait moyen d' inclure VbCrlf ?
*tu fais un ocx, le fichier peut sans mal être en ressources
>>J' y ai pensé mais je ne savias pas comment le référencer.
Comment dois-je faire ?
"11/09 11 septembre : Anniversaire des jumelles américaines en vente sur E-Bay"
Le11 septembre est un triste anniversaire:oui, mais pas une fête officielle
(Journée Mondiale)
Il ne faut pas mettre tout dans le même sac !
Pour finir dans une note d' humour :
*ajouter les saints du jour.
>>Oui, pourquoi pas.Mais dans un autre UC
Vous avez vos Saints, nous avons les nôtres !!!
A++
chaibat
11 sept. 2006 à 14:33
Je n' espérais pas tant.
Toutes tes remarques sont à prendre en considération.
J' avoue que j' ai fait tout ça dans la précipitation du moment.
J' ai été tellement emporté par l' idée que j' ai oublié pas mal de chose.
Au début j' ai hésité entre lancer l' idée dans le Forum et faire un exemple.
C 'est raté pour la source !
Maintenenant que j' ai des éclaircissements,
je referais tout avec plus de patience.
J' ai tout mon temps pour ça.
Merci encore.
PS:
^^non chaibat05, il faut juste éditer projet2.vbp avec le bloc-note ..
J' ai jamais essayé ça, mais ma façon de faire marche aussi.
J' ai toujours procédé ainsi quand je veux réutiliser des feuilles dans
divers projets
Mais plusque tu le dis ...
11 sept. 2006 à 13:18
non chaibat05, il faut juste éditer projet2.vbp avec le bloc-note et remplacer
Form=..\..\..\..\Documents and Settings\Me\Bureau\JOURNEES_MONDIALES\fExemple.frm
par
Form=fExemple.frm
bon, quelques remarques :
*ajouter les saints du jour.
*mettre une date par défaut, çà colle pas trop :
si je jour ne correspond à rien, soit ne rien mettre, soit justement le saint.
*le UC devrait être configurable (transparence, couleur, typo, image de fond, etc...)
*tu as oublié de lire le fichier. on est donc obligé d'ajouter ce code au form_load :
OJM1.Get_Journee App.Path & "\JM.txt", Date
mais c'est à l'UC lui-même de se lire.
*tu fais un ocx, le fichier peut sans mal être en ressources
*tu peux écrire sur le UC (pas besoin de labels)
*les labels ne sont pas détruits.
pour aujourd'hui par exemple j'ai ajouté cette ligne dans JM.txt :
"11/09 11 septembre : Anniversaire des jumelles américaines en vente sur E-Bay"
et je me retourve avec cette ligne, suivi des 2 du 15 octobre...
*le UC devrait tester le changement de date (jour/nuit) pour se mettre à jour automatiquement
voilà tout pour le moment, l'idée est plutôt bonne ;)
++
PCPT [AFCK]
11 sept. 2006 à 12:42
Tout d' abord je m' excuse de ce facheux oubli.
En fait j' ai omis d' enregistrer fExemple sous ...
A l' origine elle était dans un autre projet test.
Pour corriger :
1° En réponse au message d' erreur, accepter de charger
le projet .
2° Menu/Projet/Ajouter une feuille
3° Dans la boite de dialogue, choisir l' onglet Existant.
4° Ouvrir le dossier du groupe de projet.
5° Charger fExemple, sélectionner .la dans la page de propriété
du projet2 et Enregistrer la Sous le même nom et dans le même
dossier .
Sinon je posterai un nouveau Zip.
J' y apporterai par la même occasion les modifications selon vos
remarques.
Je m' excuse encore une fonis, je tacherai de faire plus attention
la prochaine fois.
Bonne journée à tous.
11 sept. 2006 à 10:44
(...)
Form=..\..\..\..\Documents and Settings\Me\Bureau\JOURNEES_MONDIALES\fExemple.frm
(...)
Je pense qu'il serai bien de modifier le zip, sinon tu vas avoir 50 messages "Ca marche pas ... Ouiiinnn"
Sinon très bonne idée à intégrer dans une appli qui s'ouvrirai au démarrage