CREATION DE CONTROLS DYNAMIQUE + DEPLACEMENT ET REDIMENTION POUR L'USER

Messages postés
735
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
22 novembre 2016
- - Dernière réponse : nicolasq150784
Messages postés
51
Date d'inscription
mercredi 24 juin 2009
Statut
Membre
Dernière intervention
23 avril 2010
- 26 mars 2010 à 13:02
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/51188-creation-de-controls-dynamique-deplacement-et-redimention-pour-l-user

Afficher la suite 
elguevel
Messages postés
735
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
22 novembre 2016
3 -
Salut,

Je n'ai pas encore telechargé ta source, mais juste en voyant le code, quelques remarques :

- Evite dans une classe de declarer tes variables (attributs) avec des "Dim" qui sont reservés aux declarations locales (function/sub/...), utilise plutot Private/Public/Friend/Protected.


- C'est une question de gout mais je n'aime pas trop voir çà :
Dim i, cx, cy, tx, ty As Integer : tx 70 : ty 100 : cx = 50 : cy = 50

J'aurai preferé :

Dim cx As Integer = 50
Dim cy As Integer = 50
Dim tx As Integer = 70
Dim ty As Integer = 100

C'est plus lisible non ?

- Idem pour :

Dim i [...] As Integer
For i = 1 To 3

Tu peux faire :
Dim i As Integer = 1 To 3


Après c'est du pinaillage :
- "cx = cx + tx + 10" --> "cx += tx + 10"
- "If deplace = True Then" --> "If Deplace Then"
etc...

Sinon à part çà c'est simple et commenté, continues comme çà ;-)
Adn56
Messages postés
1220
Date d'inscription
jeudi 24 mai 2007
Statut
Membre
Dernière intervention
28 septembre 2013
1 -
Et le with comme dirais PCPT ^^
With CtrlRtb
25. 'son nom
26. .Name = "Rtb_" & (numcase + 1)
27. 'sa taille
28. .Size = New System.Drawing.Size(taillex, tailley)
29. 'sa position sur la form
30. .Location = New System.Drawing.Point(xcb, ycb)
31. 'multiligne = oui
32. .Multiline = True
33. 'visible=oui
34. .Visible = True
35. 'pas de bordure
36. .BorderStyle = BorderStyle.None
end with
Salut
tresorsdevie
Messages postés
135
Date d'inscription
lundi 17 juin 2002
Statut
Membre
Dernière intervention
20 juillet 2013
-
merci pour ces remarques instructives, j'en prend bonne note!
nicolasq150784
Messages postés
51
Date d'inscription
mercredi 24 juin 2009
Statut
Membre
Dernière intervention
23 avril 2010
-
Salut
merci pour cette source qui est vraiment SUPER
bien expliqué clair en bien quoi....

moi je voudrais savoir si vous pouviez fournir un code qui permet d'enregister les positions

Merci beaucoup d'avance :)
tresorsdevie
Messages postés
135
Date d'inscription
lundi 17 juin 2002
Statut
Membre
Dernière intervention
20 juillet 2013
-
salut , il est tres facile d'enregistrer les positions dans un fichier ini genre

[NOMDUCONTROLE1]
posX=
posY=
TailleX=
TailleY=

[NOMDUCONTROLE2]
posX=
posY=
TailleX=
TailleY=

etc...

tu trouvera sur ce site plusieurs sources pour les fichiers ini
sinon en .net ici : http://tresorsdevie.free.fr/selkis/index.php?option=com_content&view=article&id=111&Itemid=117

a++
nicolasq150784
Messages postés
51
Date d'inscription
mercredi 24 juin 2009
Statut
Membre
Dernière intervention
23 avril 2010
-
ok merci
je vais regarder ça
merci
elguevel
Messages postés
735
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
22 novembre 2016
3 -
Pour sauvegarder tes positions, utilise plutot les parametres (Propriétes de ton projet > Paramètres).

Tu peux ensuite les exploiter très simplement :

Sauvegarder une valeur :

My.Settings.POSITION_X = 8
My.Settings.Save()

Charger une valeur :

My.Settings.Reload()
Dim MaPosition As Integer = My.Settings.POSITION_X
tresorsdevie
Messages postés
135
Date d'inscription
lundi 17 juin 2002
Statut
Membre
Dernière intervention
20 juillet 2013
-
interressant je connaissait pas!
nicolasq150784
Messages postés
51
Date d'inscription
mercredi 24 juin 2009
Statut
Membre
Dernière intervention
23 avril 2010
-
Justement j'allais demander la diference en tre les fichiers .ini et My.Setting :)

Mais comment on fait avec My.setting pour créer, par code, des parametres?

Merci en tout cas elguevel ;)
nicolasq150784
Messages postés
51
Date d'inscription
mercredi 24 juin 2009
Statut
Membre
Dernière intervention
23 avril 2010
-
AH oui aussi quel code utiliser pour sauvegarder la position d'un objet(un bouton par exemple) mais aussi la police, la couleur, la taille etc...

Merci beaucoupe d'avance
tresorsdevie
Messages postés
135
Date d'inscription
lundi 17 juin 2002
Statut
Membre
Dernière intervention
20 juillet 2013
-
oui il serait intéressant de le savoir, jusqu'a présent j'ai toujours utiliser les fichiers ini pour mes paramétrages, que je trouvais tres utiles.
elguevel
Messages postés
735
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
22 novembre 2016
3 -
Les .INI ne sont plus pris en charge dans .Net, considéré comme obsolète aujourd'hui, de plus pour les gerer il faut faire sa classe soit même.

Le nouveau standard étant l'XML,que d'ailleur le My.Settings utilise.

L'XML du My.Settings est se situe dans le profil de l'utilisateur, ce qui lui permet d'avoir ses propres parametres, et j'aime l'utilisé car il est simple d'utilisation, pratique et la serialisation est complétement transparente.

Une petite recherche sur la MSDN : http://msdn.microsoft.com/fr-fr/library/ms379611(VS.80).aspx

Bon code ...
nicolasq150784
Messages postés
51
Date d'inscription
mercredi 24 juin 2009
Statut
Membre
Dernière intervention
23 avril 2010
-
MERCI

J'avais deja vu ça un peu.

Encore merci de partager tes connaissances qui mon l'air nombreuse.

Encore merci ;)