4/5 (14 avis)
Vue 5 062 fois - Téléchargée 500 fois
'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
23 janv. 2005 à 10:24
13 nov. 2004 à 17:55
13 nov. 2004 à 13:35
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
++
13 nov. 2004 à 11:43
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.
@+
13 nov. 2004 à 09:05
moi je prone mon delphi bien evidemment :) mais "chacun ses gouts"
bonne prog a tous les codeurs :)
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.