Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresConnexion

begin process at 2009 01 08 07:27:10

3 ARTICLES SUR SQL SERVER (DATA STRUCTURES, SCANS AND SEEKS, DATA ACCESS STRATEGIES) par RaptorXP

MAIS QUE PEUT BIEN FAIRE UN MVP QUAND IL NE CODE PAS ??? par sebmafate

POWERSHELL : COMMENT EXéCUTER UN SCRIPT PS DEPUIS UNE FENêTRE MS DOS OU SCHEDULED TASK par ROMELARD Fabrice

EDM DESIGNER par Matthieu MEZIL

SMALL BASIC - UN PROJET INTéRESSANT par pierrick

RE : POURQUOI ISEMPTY(VBEMPTY) RENVOI FALSE ??? par Renfield

RE : COLLECTION par Orohena

REMPLIR DATAGRID EN 2 TABLE VB.NET par tdi2a

RE : COLLECTION par skyla

+ de logiciels à télécharger

1 329 730 membres
76 nouveaux aujourd'hui
14 640 membres club

Trouver une ressource

Trouvez une ressource parmi 39 269 codes, 1 222 802 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

RESIZE DYNAMIQUE DE CONTROLE (MAJ)

Information sur la source

Catégorie :Divers Niveau : Initié Date de création : 14/11/2003 Date de mise à jour : 16/11/2003 14:27:34 Vu / téléchargé: 2 890 / 470

Auteur : Cameleon69

Site perso

Ecrire un message privé

Note :

7,50 / 10

Commentaire sur cette source (13)

Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale

Voici un petit bout de code qui permet de redimensionner un controle pendant l'exécution.
Je viens de corriger quelques bricole et d'ajouter des poignées pour étirer le controle.
Un clique gauche sur le controle affiche ou masque les poignées.
En tirant sur les poignées vous pouvez redimensionner le controle.
En maintenant le bouton gauche enfoncé dans le controle vous pouvez le déplacer.
Un double clique le supprime, un clique droit vous affiche un menu contectuel ...

Source

Ce petit bout de code me sert pour tester différente fonction pour l'autre source que j'ai déposé.

Ce petit bout de code me sert pour tester différente fonction pour l'autre source que j'ai déposé.

Conclusion

celui-ci n'est peut être pas complétement débugger !!!
Je me suis servi d'une classe trouvée sur MSDN merci Microsoft ...

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Resize Controle
- cGrabHandles.cls 16 207 octets
- Form1.frm 5 850 octets
- Form1.frx66 octets
- M_API_Declares.bas 6 266 octets
- MGrabHandles.bas 2 280 octets
- MSSCCPRJ.SCC192 octets
- Projet1.vbp 807 octets
- Projet1.vbw 180 octets
- ResizeOcx.bas 2 586 octets

Télécharger le zip

Sources du même auteur

APPROCHE DE LA POO AVEC DES CLASSES

GESTIONNAIRE DE PROJET (MISE A JOUR)

Toutes les sources de Cameleon69

Sources de la même categorie

CARTE DE VOEUX SOUS EXCEL par Orohena

VBA EXCEL FONCTION POUR FORMATER DES ECRITURES BANCAIRES par fredatcs

COVERS SEARCH par Mayzz

GESTION PROJET VB6 par cdbi

FAIRE DE LA MUSIQUE AVEC LE SPEAKER INTEGRER A L'ORDINATEUR par MeSod

Toutes les sources de la catégorie Divers

Commentaires et avis

Commentaire de jack le 14/11/2003 23:15:08 administrateur CS

C'est bien Camelon69, c'est original, mais manque singulièrement d'explications :
Pour les autres, il s'agit :
-- De sélectionner une activité
-- De faire un Drag-Drop du petit carré de couleur à gauche du ComboBox et de le placer dans la zone horizontale du haut (horaires)
-- Ensuite, vous pouvez appliquer les recommendations de Camelon69

Remarques (Jack, le mec chiant du site) :
- "Resize Controle" : Si tu mets "Resize" en anglais, ne met pas de E à controle
- Dans ton Form_Load, il serait judicieux d'autosélectionner une activité en faisant : MaComboBox.ListIndex = 0 (pour le premier)
- Pour les déplacements sur la gauche, le carré scintille. Regarde ce qu'on appelle le SubClassing (SSubTmr6.dll) : Je m'en sers pour des resize de feuille, mais je sais pas trop comment ça fonctionne. En gros, ça intercepte la demande d'evènement et ça évite le scintillement.
Une bonne note, va, t'inquiète pas !

Commentaire de Cameleon69 le 15/11/2003 09:03:24

Merci pour tes conseils, justement ce scintillement m'embetait un peu, merci pour le conseil et je regarde pour le SubClassing.

Commentaire de Cameleon69 le 15/11/2003 18:38:18

Si quelqu'un à une idée ou sait comment utiliser le subclassing, je suis preneur.
J'ai essayer de voir ce que je pouvais faire pour éviter les scintillements mais je n'y arrive pas.
Un petit exemple ou une bonne explication serait la bienvenue.
Je dépose un post également sur le forum on ne sait jamais ???

Commentaire de Cameleon69 le 16/11/2003 14:29:31

J'ai trouvé une classe sur MSDN permettant d emettre des poignées, je l'ai modifiée pour pouvoir gérer plusieurs controles.
Mais le résultat fonctionne, il n'y a plus de scintillement et il est possible de redimensionner le controle depuis la gauche comme la droite.

Commentaire de bbcluny le 17/11/2003 10:40:18

Salut,
est-il possible de redimensionner l'objet en hauteur ?

Commentaire de Cameleon69 le 20/11/2003 13:21:12

> bbcluny
Veux tu dire avec les poignées ???
Oui il y a des poignées tout autour de l'objet, elles ne sont pas visible ici car l'objet et contenu dans un autre objet et il a la même hauteur.

Commentaire de bbcluny le 24/11/2003 11:24:51

Serait-il possible d'avoir un exemple avec les poignée de redimensionement en hauteur?

Commentaire de Cameleon69 le 24/11/2003 21:51:13

Il est dans l'exemple, il suffit de redimensionnet la picture2 plus grand et de glisser la picture3 a l'intérieure et tu auras se que tu veux.
Les modules à prendre en compte pour cela :
- M_API_Declares.bas
- MGrabHandles.bas
- cGrabHandles.cls
Pour mettre les poignées autour d'un controle:
- InitializeGrabHandles
pour initialiser les poignées et ainsi permettre le déplacement.
Et ce dans le sens que tu veux.

Commentaire de moustachu le 24/03/2004 11:40:03

TRès bien, je cherchais commznt faire mais comme c'est déjà fait... En recanche je voudrais l'utiliser en haut, bas également pour le déplacement

Commentaire de Cameleon69 le 24/03/2004 11:45:24

c'est dans la source il suffit d'agrandir la picture box parent

Commentaire de moustachu le 24/03/2004 11:52:00

Heuu... j'ai fait un nouveau projet, je ne souhaite pas redimensionner en haut ou bas mais déplacer. Dans ta procédure NewPosition, je ne vois pas où tu définis le "top" du controle. J'ai essayé ça :
    If Y > OldY Then
        Obj.Top = Obj.Top + (Y - OldY)
    End If
    If Y < OldY Then
        Obj.Top = Obj.Top + (OldY - Y)
    End If

mais parfois, le controle s'en va loin.... loin... pas du tout où je le souhaite

Commentaire de moustachu le 24/03/2004 12:03:54

Ok.... OK le monde entier va voir ma con***ie, j'ai oublié le signe "-" qaund Y < OldY... désolé pour le dérangement
Cool la source donc 9/10

Commentaire de Cameleon69 le 24/03/2004 12:05:01

je ne sais plus comment j'avais fait, cela fait un petit moment.
Les sources complètes sont sur MSDN, c'est de cela que je me suis beaucoup inspiré (copier/coller)