Creation grid

Messages postés
85
Date d'inscription
mercredi 17 septembre 2003
Statut
Membre
Dernière intervention
20 mars 2012
- - Dernière réponse : cs_hustler
Messages postés
85
Date d'inscription
mercredi 17 septembre 2003
Statut
Membre
Dernière intervention
20 mars 2012
- 28 juil. 2008 à 10:04
Bonjour à tout le monde,

Je suis en train de réaliser un petit logiciel de planning et j'affiche le planning des agents par service sur un mois
Il y a environ 20 agents par service

J'ai utilisé le systeme de génération :

Function CreatLigne(LblDyna As Object, LblNum As Integer, ligRepas As Integer)
    Load LblDyna(LblNum)
    If ligRepas = 0 Then
        LblDyna(LblNum).Top = LblNom(LblNum - 1).Top + LblNom(LblNum).Height
    Else
        LblDyna(LblNum).Top = LblNom(LblNum - 1).Top + (LblNom(LblNum).Height * 2)
    End If
    LblDyna(LblNum).Visible = False
    LblDyna(LblNum).Caption = ""
    LblDyna(LblNum).BackColor = &H80000005
    LblDyna(LblNum).ToolTipText = ""
End Function

Ce systeme fonctionne trés bien cependant il est trop lent
Je me disais qu'il serait peut etre sympa d'utiliser les grid mais je fais un affichage

http://img76.imageshack.us/my.php?image=planningde8.jpg

L'image ci-dessus est le resultat de ce que j'obtiens actuellement
Il me faudrait un resultat ressemblant à ça
Est ce que cela est possible ? Et si oui comment

MErci beaucoup pour votre aide
Afficher la suite 

1 réponse

Messages postés
85
Date d'inscription
mercredi 17 septembre 2003
Statut
Membre
Dernière intervention
20 mars 2012
0
Merci




Commenter la réponse de cs_hustler