Objets à déplacer dans votre form

Soyez le premier à donner votre avis sur cette source.

Vue 3 674 fois - Téléchargée 402 fois

Description

J'en avais besoin pour un petit logiciel mais je n'ai pas trouvé ce que je cherchais (peut être ai-je mal cherché).
Je l'ai donc tapé de mes petites mimines.

Quelquefois il peut être intéressant d'avoir des objets à déplacer dans vos form avec un simple clic.

Sélectionnez l'objet en cliquant sur le pourtour de celui-ci, il passe en rouge et se déplace avec la souris.

Re-cliquez et il se fige à la position choisie

En VB 2008

Source / Exemple :


Typiak (moi)

Conclusion :


Surement possible d'améliorer les scripts

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Adn56
Messages postés
1172
Date d'inscription
jeudi 24 mai 2007
Statut
Membre
Dernière intervention
28 septembre 2013
1
salut, bonne idée car trés souvent utile.
cependant quelques remarques constructives (i hope)
1-Dim objet As Object => c'est pas plutôt des contrôles ? si ? bha écrit le ^^
2- Dim max_x As Integer, Dim max_y As Integer puis max_x = fond_objets.Width - 25 ' Limite max X droitemax_y fond_objets.Height - 25 ' Limite max Y bas> tu connais ces valeurs donc constantes ! moins de ressource non ?
3-pour toutes tes sub en fonctions je pense que tu devrais regarder les handles et les sender des sub ;)
si besoin je reste dans le coin.

bonne continuation et penses à virer l'import visual basic ! un msgbox est obsolète ;)
Adn56
Messages postés
1172
Date d'inscription
jeudi 24 mai 2007
Statut
Membre
Dernière intervention
28 septembre 2013
1
Salut, pour tes sub de sélection d'objets essaye d'utiliser le handler, le sender te renverra l’objet sélectionné ;)
sinon un petit HS pour dire : un numéro de tel wouhou gilles cadiou au 096160.... tu vas avoir de la visite MDR ^^
gillescadiou
Messages postés
19
Date d'inscription
jeudi 4 septembre 2008
Statut
Membre
Dernière intervention
28 juin 2013

09 61 60 32 38 , c'est peu parlant mais ça sonne à St Evarzec. Je débute dans ce langage,
alors, peut-être au plaisir de se voir ou de se téléphoner.

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.