[VB]Bouton graphique et texte

**cd090580** · 16/11/2005, 19h18

Bonjour,

J'essaye de faire un bouton avec une icone et un texte.
Je définit donc la propriété Style sur "Graphical" et je choisis mon image.

Le problème c'est que l'icone s'affiche au dessus de texte et j'aimerais bien qu'elle s'affiche à gauche du texte comme sur tous les boutons graphiques.

Comment faire pour que l'image s'affiche à gauche du texte ?

Merci.

**méphistopheles** · 16/11/2005, 20h55

bonjour.

désolé, mais ce n'est pas possible. si tu veut faire ainsi, je te conseille de faire une icone AVEC ton texte et de la mettre dans l'image.

salut

**ouskel'n'or** · 17/11/2005, 10h39

Pour ça, j'utilise PowerPoint. J'insère l'image, le texte avec fond transparent par en dessus, je groupe les deux, je copie, colle le tout dans Paint, sauvegarde sous jpg et récupère l'image dans Picture du bouton.
C'est simple et rapide et ça marche.

A+

**cd090580** · 18/11/2005, 12h19

Envoyé par ouskel'n'or

Pour ça, j'utilise PowerPoint. J'insère l'image, le texte avec fond transparent par en dessus, je groupe les deux, je copie, colle le tout dans Paint, sauvegarde sous jpg et récupère l'image dans Picture du bouton.
C'est simple et rapide et ça marche.

A+

Ta solution s'adapte a boutons (couleurs et formes) Windows Xp, 2000 et 98 ???

**ouskel'n'or** · 18/11/2005, 12h29

Oui, tu peux toujours coller une image sur le "Picture" d'un bouton. Et là, l'image, tu la fabriques, c'est tout. Enlève tout texte (Caption = "") de ton bouton et choisis la bonne propriété pour l'affichage (PicturePosition)

A+

Invité · 18/11/2005, 12h46

Salut

J'ai fait le test hier chez moi, as-tu essayé de redimensionner ton bouton

Starec

**SfJ5Rpw8** · 18/11/2005, 13h14

en VBA ,

j'ai la propriété PicturePosition du bouton ... à mettre à 1-fmPicturePositionLeftCenter .

...

:

Invité · 18/11/2005, 13h25

Re

Oui, mais tu utilise en VBA le MsForms 2.0 CommandButton, je fais la même chose sous Access, mais quand tu l'utilises en VB, cela pose certains problèmes selon le système d'exploitation.

Starec

**cd090580** · 18/11/2005, 14h56

Envoyé par ouskel'n'or

Oui, tu peux toujours coller une image sur le "Picture" d'un bouton. Et là, l'image, tu la fabriques, c'est tout. Enlève tout texte (Caption = "") de ton bouton et choisis la bonne propriété pour l'affichage (PicturePosition)

A+

Le problème c'est que j'ai besoin de mettre du texte et que ce texte n'est pas fixe (programme multi-langue).

**ouskel'n'or** · 18/11/2005, 15h21

Si tu nous dis pas tout...

Selon la langue, tu peux toujours prévoir plusieurs pictures superposés, texte inclus, que tu rends visibles ou non selon la langue.
A défaut d'une solution plus simple que je ne connais pas...

A+

**ProgElecT** · 19/11/2005, 17h28

Demonstration (VB6) sur une Form

1 PictureBox, 1 CommandButton et 1 Label
Dans le picturebox charger une image.
Label1.autosize = true, CommandButton.caption = ""

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Option Explicit
Dim Langue As String
Private Sub Form_Load()
'Langue = "FR"
Langue = "GB"
'Mon image picture1 etant foncée
Picture1.ForeColor = &HFFFFFF    'encre blanche
 
'adaptation des mots de langues differantes
If Langue = "FR" Then Label1 = "essais"
If Langue = "GB" Then Label1 = "tests"
 
Picture1.CurrentX = (Picture1.Width - Label1.Width) / 2 'facultatif
Picture1.CurrentY = (Picture1.Height - Label1.Height) / 2 'facultatif
Picture1.Print Label1.Caption
Command1.Width = Picture1.Width 'facultatif
Command1.Height = Picture1.Height 'facultatif
Command1.Picture = Picture1.Image
End Sub

Salut

**ProgElecT** · 22/01/2006, 00h45

Quelques précisions

1 Form, 1 PictureBox, 1 CommandButton et 1 Label
form.scalemode = 3 (donc en pixel)
picturebox.autosize= true, picturebox.Autoredraw=true, picturebox.scalemode = 3 (donc en pixel),
dans le picturebox charger une image.
Label.autosize = true
CommandButton.caption = "" , CommandButton.style = 1 (donc en Graphical)

Salut

**jmfmarques** · 22/01/2006, 09h01

La question était :

Comment faire pour que l'image s'affiche à gauche du texte ?

Et pourquoi passer par un relais Label ? Pour calculer la hauteur ?
Quid de la méthode TextHeight (elle est là pour çà).

**bouley** · 22/01/2006, 11h18

Bonjour à tous

J'utilise un composant qui fonctionne trés bien en vb6 et vba dispo en freeware.

HLBButton6 V1.2 VB6 compilation (Freeware)

http://www.fastwrite.com/DvlOnly/dow...ad.cfm?RID=145

@+

**ThierryAIM** · 22/01/2006, 15h51

Envoyé par bouley

Bonjour à tous

J'utilise un composant qui fonctionne trés bien en vb6 et vba dispo en freeware.

HLBButton6 V1.2 VB6 compilation (Freeware)

http://www.fastwrite.com/DvlOnly/dow...ad.cfm?RID=145

@+

Je l'ai eu utilisé aussi, mais dans certains cas, je me suis apercu que ce composant etait buggué

[VB]Bouton graphique et texte

VB 6 et antérieur

Discussions similaires

Partager

Partager