Redimensionnement du controle msflexgrid ( pas le tableau, mais le contour )

Commenter

Contenu du snippet

Voici un petit bout de programme qui permet de redimensionner un controle MSFlexGrid par rapport à la taille du tableau.
Dans mon code, j'ai fixé des limites pour pas avoir une dimension exédant la taille de mon Form.
libre a vous de les changer.
bon amusement.

Source / Exemple : 


' adapte la taille de la fenêtre du msfgrid
MSF_Resultat.Width = 300

    For vI = 0 To MSF_Resultat.Cols - 1
        If MSF_Resultat.Width < 6615 Then ' limite = 6615
            
            MSF_Resultat.Width = MSF_Resultat.Width + MSF_Resultat.ColWidth(vI) + 10
        Else
            MSF_Resultat.Width = 6615 ' dès que la limite est atteinte il arrête le dimensionement
            vI = MSF_Resultat.Cols
        End If
    Next
MSF_Resultat.Height = 300
    For vE = 0 To MSF_Resultat.Rows - 1
        If MSF_Resultat.Height < 2700 Then ' limite = 2700    
            MSF_Resultat.Height = MSF_Resultat.Height + MSF_Resultat.RowHeight(vE) + 10
        Else
            MSF_Resultat.Height = 2700 ' dès que la limite est atteinte il arrête le dimensionement
            vE = MSF_Resultat.Rows
        End If
    Next

Conclusion :


Voilà, je me servit de ça pour le dimensionner :
  • en hauteur : jusqu'a ce qu'il atteigne mes boutons commandes ( un peu avant quand même ;-) )
  • en largeur : environ la moitié d'un form en 1024 * 768.

pour l'instant j'ai pas vue de faille donc ...
si vous trouvez mieux, faîte moi signe.

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_rodcobalt22)