Redimensionnement de control

Soyez le premier à donner votre avis sur cette source.

Vue 4 929 fois - Téléchargée 489 fois

Description

Voila un bout de code tout bête mais bon je savais pas quoi faire cettre après midi.
Ca permet de redimensionner les controles en fonction du redimensionnement de la fenetre principale. Bon ca fonctione pas avec les controle ayant des propriété de taille en lecture seulement (ex : combobox)

Source / Exemple :


'variable entiere permettant de conserver les tailles initials de la form
Public sglHeightInitForm As Single
Public sglWidthInitForm As Single

'on declare un type qui permettra de connaitre les tailles de tout les controle
Type ControlSize
    sglHeight As Single
    sglWidth As Single
    sglTop As Single
    sglLeft As Single
End Type

'on definit un tableau du type declarer
Public tabControlSize() As ControlSize
'boolean permettant de savoir si on traite le redimensionnement
Dim bolTraitementEncours As Boolean

Public Sub Initialisaton(ByRef frmForm As Form)
Dim objControl As Object
'on recupere les valeur initial de la form
sglHeightInitForm = frmForm.Height
sglWidthInitForm = frmForm.Width
'par defaut on traite le redimensionne
bolTraitefrmFormntEncours = False
'on redifrmFormnsionne le tableau
ReDim tabControlSize(0)
'on parcours l'ensemble de la collection control
For Each objControl In frmForm.Controls
    ReDim Preserve tabControlSize(UBound(tabControlSize) + 1)
    tabControlSize(UBound(tabControlSize)).sglHeight = objControl.Height
    tabControlSize(UBound(tabControlSize)).sglWidth = objControl.Width
    tabControlSize(UBound(tabControlSize)).sglTop = objControl.Top
    tabControlSize(UBound(tabControlSize)).sglLeft = objControl.Left
Next objControl
End Sub

Conclusion :


Bon au plaisir de vous revoir.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
55
Date d'inscription
vendredi 12 novembre 2004
Statut
Membre
Dernière intervention
1 juin 2007

très utile sa m'évite de le codé cool très bien detaillé et près a l'emploi tres bien RAD ;D
Messages postés
1467
Date d'inscription
samedi 13 mars 2004
Statut
Membre
Dernière intervention
5 mai 2010
2
Bon on est d'accord finalement... @+ bonne prog @tous
Messages postés
1411
Date d'inscription
mercredi 6 août 2003
Statut
Membre
Dernière intervention
3 mars 2019
1
Le redim des controls se passe pas mal, mais pour la fenetre c'est horrible. Une fois agrandie, on ne peut plus la reduire et ça clignote : vraiment pas top.

Je sais que c'est pas encore du VB .Net, mais jetter un oeil sur ma source

http://www.vbfrance.com/code.aspx?id=27455

Au programme :
- Redim des controls
- Gestion Mini et Maxi pour la taille de la feuille
- Empeche la fentre de sortir de l'ecran

Inconvénient, j'utilise le .tag des controls donc ne sont plus utilisables pour autre chose. Mais on peut mettre au point comme dans cette source un systeme de tableau.

Bonne prog
++
Messages postés
179
Date d'inscription
vendredi 1 novembre 2002
Statut
Membre
Dernière intervention
9 janvier 2010

Le language de programmation est fonction de tes besoins progiciels et de leurs puissances.
Si tu desires concevoir de petites infrastructures, vb comme d'autres languages simple,peuvent le faire.
Mais si ton désire est de concevoir un PhotoSop alors, diriges toi pltot vers le C.
VB n'est pas et surtout n'a pas été conçu pour créer du graphisme, mais il se rélève etre puissant dans d'autres domaines pour ce soit disant language de dernière classe.
@+
Messages postés
2226
Date d'inscription
dimanche 5 octobre 2003
Statut
Modérateur
Dernière intervention
18 novembre 2010
13
Si ya autant de language utilisé (c, c++, c#, vb, .NET, delphi, java, perl, php, etc) c'est pour que chacun puisse s'y retrouver, s'identifier a un language et etre passioné de ça :)
moi je prone mon delphi bien evidemment :) mais "chacun ses gouts"
bonne prog a tous les codeurs :)
Afficher les 14 commentaires

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.