Incrusted button :-) donne du style a votre prog

Soyez le premier à donner votre avis sur cette source.

Vue 4 881 fois - Téléchargée 809 210 fois

Description

C juste un bouton dans une frame avec resizage automatique alors c dla balle !!!!!
Par contre faut faire des groupes de controles alors c chiant si le prog a 50 boutons !!
mais si y'en a que 2/3/4, ça peut le faire !

Source / Exemple :


Download the Zip and Enjoy

Conclusion :


Rien d'autre a ajouter, faites des commentaires et critiquez si je peux faire des améliorations :-)
Normalement ya pas de virus ...
@+

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
262
Date d'inscription
dimanche 1 septembre 2002
Statut
Membre
Dernière intervention
18 juin 2008

Je te donne entierement raison yoman64 :-)
@+

KaViDee
Messages postés
962
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
2 août 2010
1
Ya pas une source ou Koiu a pas dit de conneries...
Mais améliore sa et continu tes longues secondes de labeur pour pouvoir ajouter des belle couleur a tes bouton et fait en un ocx :D
Messages postés
262
Date d'inscription
dimanche 1 septembre 2002
Statut
Membre
Dernière intervention
18 juin 2008

Ouais merci akhenathon pour ces quelques infos mais là en ce moment je le prépare l'ocx mais ya juste un truc que j'aimerais savoir c comment on fait pour l'évenement Click() et comment on fait mettre la propriété caption dans le controle ?

Merci
@+
Messages postés
575
Date d'inscription
dimanche 23 décembre 2001
Statut
Membre
Dernière intervention
23 octobre 2012

oui tu peux faire ça ... et par exemple dans ton evenement Tex1_OnChange tu mettras

Pos = Text1.selStart
Text1.text = format(Text1.text, "<")
Text1.selstart = Pos

Mais cette methode même si je l'ait pas éssayée me semble trop 'rustre' et ça devrais clignoter comme pas possible , car en touchant au texte , le textbox se vide puis se remplit .
T'as une autre methode sinon :
Pos = Text1.selStart
For i = 1 to len(Text1.text)
text1.selStart = i
Text1.SelLength = 1
Text1.SelText = format(Text1.SelText, "<")
next i

Cette methode aura le bénéfice de moins clignoter mais son effet sur des textes déroulant sera pas beau .

T'as d'autre methode pour faire un effet instantané dans une grandeur de texte varaiable .

Celle que je te conséillerais c'est de filtrer les lettres tappées dés que le mec les tappe, avec keydown et keypress , mais dans ce cas , tu dois rendre enabled le texte et faire des artifices avec des picture box ... mais là ça risque d'etre chiant .

T'as une derniére possibilitée , c'est de faire un roulement avec deux textbox , une cachée ou tu fais les changements , donc on ne voit pas les manips , et que tu rend visible quand c'est finit . Ce serais le plus simple et le plus esthétique , car le clignotement du textbox lorsque on le passera en visible devrais pas être trop génant ... tout dépend de la vitesse de frappe

Mais dans le principe tu peux facilement en faire une ocx , et même si tu le souhaites , tu peux la publier sur ta page web comme champ de texte ;)

PS : Iubito tu sait ce que ça veut dire en roumain ? (j'epére pour toi que t'es une meuf ;)
Messages postés
112
Date d'inscription
mercredi 28 août 2002
Statut
Membre
Dernière intervention
13 mars 2004

j'm'attendais aussi a mieu met jtrouve ca cool .... merci
Afficher les 18 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.