Petit probleme
Posté par greg@florajet.com le 8/11/2005 11:43:51
Bonjour,
Depuis deux jours, j'utilise ce planning.
Pour les items ca se passe bien par contre l'orsque j'ajoute des plage rien ne s'affiche.
Un autre probleme lors du survol d'un item rien ne s'affiche.
Pourtant le code pour le focus est bien dans la creation de la fenetre.
si quelqu'un peut me donner un coup de main....
merci
voici le code d'ajout d'une Plage
untuple = SqlRetourUnTuple(unecommande, "REQSEEK", Vrai )
IdStage = ExtraitChaîne(untuple,1,TAB)
Libelle = ExtraitChaîne(untuple,2,TAB)
LibelleTheme = ExtraitChaîne(untuple,3,TAB)
LibelleLieu = ExtraitChaîne(untuple,4,TAB)
DateDebut = ExtraitChaîne(untuple,5,TAB)
DateFin = ExtraitChaîne(untuple,6,TAB)
IdFormateur = ExtraitChaîne(untuple,7,TAB)
DateDebut = DateDebut+"000000"
DateFin = DateFin+"000000"
//Ajout de la plage dans le planning
TextePlage = Libelle+" "+LibelleTheme
LignePlage:Idplage=IdStage
LignePlage:IdItem=FormateursID
LignePlage:LibPlage=&TextePlage
LignePlage:LibinfoBulle=&LibelleLieu
LignePlage:DateDebut=&DateDebut
LignePlage:DateFin=&DateFin
SI modulo(i,2)=0 ALORS
LignePlage:CouleurFond=iRougeClair
SINON
LignePlage:CouleurFond=iRougeClair
FIN
LignePlage:CouleurBordure=iRougeClair
ActiveX1>>AddPlage(&LignePlage)
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=7&topic_id=3012&post_id=12633