Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Rectangle dans un PictureBoxB

Rectangle dans un PictureBoxB

4 réponses
Avatar
Alain Ménard
Bonjour à tous,

Je souhaite tracer un rectangle dont la bordure est blanche et dont le fond
est transparent

pctPictureBox.FillStyle = 0 'vbTransparent
pctPictureBox.Line (200, 600)-(600, 280), vbWhite, BF

Malheureusement, avec ceci, mon rectangle est plein (de blanc)


Avez vous la soluce ?


--

Amicalement

Alain
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Pascal B.
La soluce est de retirer F à BF (B doit être seul)

pctPictureBox.FillStyle = 0 'vbTransparent
pctPictureBox.Line (200, 600)-(600, 280), vbWhite, B
^^^^^^^

(BF = "Box Filled" - Cadre rempli avec la meme couleur que le bord; FillStyle et FillColor sont ignorés)
(B = "Box" - Cadre non rempli ou rempli selon les valeurs de FillStyle et de FillColor)

Cordialement
Pascal B


"Alain Ménard" wrote in message news:45658515$0$27095$
| Bonjour à tous,
|
| Je souhaite tracer un rectangle dont la bordure est blanche et dont le fond
| est transparent
|
| pctPictureBox.FillStyle = 0 'vbTransparent
| pctPictureBox.Line (200, 600)-(600, 280), vbWhite, BF
|
| Malheureusement, avec ceci, mon rectangle est plein (de blanc)
|
|
| Avez vous la soluce ?
|
|
| --
|
| Amicalement
|
| Alain
|
|
Avatar
jm
"Alain Ménard" wrote in message
news:45658515$0$27095$
Bonjour à tous,

Je souhaite tracer un rectangle dont la bordure est blanche et dont le
fond est transparent

pctPictureBox.FillStyle = 0 'vbTransparent
pctPictureBox.Line (200, 600)-(600, 280), vbWhite, BF

Malheureusement, avec ceci, mon rectangle est plein (de blanc)


Avez vous la soluce ?



Hello,

les options B et F sont toujours un peu
tricky à manipuler.

Voici une solution qui fonctionne:

' n'importe quelle couleur, ici du rouge
Picture1.BackColor = RGB(255, 0, 0)

Picture1.FillStyle = 1
Picture1.Line (200, 600)-(600, 280), vbWhite, B

Ca marche quelle que soit la couleur de fond.

--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
mailto: remove '_no_spam_' ;
FAQ VB: http://faq.vb.free.fr/
Avatar
Alain Ménard
Merci les gars !

pctPictureBox.Line (200, 600)-(600, 280), vbWhite, B

il faut retirer la ligne précédente qui remplit de noir.

J'avoue avoir utilisé BF car vu sur le net mais sans le comprendre

Mille mercis

--

Amicalement

Alain MENARD
Auteur des logiciels PHILATELIX, NUMISMATIX et COLLECTIX
www.philatelix.fr

"Pascal B." a écrit dans le message de news:

La soluce est de retirer F à BF (B doit être seul)

pctPictureBox.FillStyle = 0 'vbTransparent
pctPictureBox.Line (200, 600)-(600, 280), vbWhite, B

^^^^^^^

(BF = "Box Filled" - Cadre rempli avec la meme couleur que le bord;
FillStyle et FillColor sont ignorés)
(B = "Box" - Cadre non rempli ou rempli selon les valeurs de FillStyle et
de FillColor)

Cordialement
Pascal B


"Alain Ménard" wrote in message
news:45658515$0$27095$
| Bonjour à tous,
|
| Je souhaite tracer un rectangle dont la bordure est blanche et dont le
fond
| est transparent
|
| pctPictureBox.FillStyle = 0 'vbTransparent
| pctPictureBox.Line (200, 600)-(600, 280), vbWhite, BF
|
| Malheureusement, avec ceci, mon rectangle est plein (de blanc)
|
|
| Avez vous la soluce ?
|
|
| --
|
| Amicalement
|
| Alain
|
|




Avatar
Pascal B.
Concerne:
pctPictureBox.FillStyle = 0 'vbTransparent

C'est normal que le rectangle soit rempli de noir car la valeur 0 ne correspond pas au transparent pour une méthode Line!!!

FillStyle = 0 '(vbFSSolid)
FillStyle = 1 '(vbFSTransparent)
...

Cordialement
Pascal B.

"Alain Ménard" wrote in message news:4565abdc$0$21253$
| Merci les gars !
|
| pctPictureBox.Line (200, 600)-(600, 280), vbWhite, B
|
| il faut retirer la ligne précédente qui remplit de noir.
|
| J'avoue avoir utilisé BF car vu sur le net mais sans le comprendre
|
| Mille mercis
|
| --
|
| Amicalement
|
| Alain MENARD
| Auteur des logiciels PHILATELIX, NUMISMATIX et COLLECTIX
| www.philatelix.fr
|
| "Pascal B." a écrit dans le message de news:
|
| > La soluce est de retirer F à BF (B doit être seul)
| >
| > pctPictureBox.FillStyle = 0 'vbTransparent
| > pctPictureBox.Line (200, 600)-(600, 280), vbWhite, B
| >
| > ^^^^^^^
| >
| > (BF = "Box Filled" - Cadre rempli avec la meme couleur que le bord;
| > FillStyle et FillColor sont ignorés)
| > (B = "Box" - Cadre non rempli ou rempli selon les valeurs de FillStyle et
| > de FillColor)
| >
| > Cordialement
| > Pascal B
| >
| >
| > "Alain Ménard" wrote in message
| > news:45658515$0$27095$
| > | Bonjour à tous,
| > |
| > | Je souhaite tracer un rectangle dont la bordure est blanche et dont le
| > fond
| > | est transparent
| > |
| > | pctPictureBox.FillStyle = 0 'vbTransparent
| > | pctPictureBox.Line (200, 600)-(600, 280), vbWhite, BF
| > |
| > | Malheureusement, avec ceci, mon rectangle est plein (de blanc)
| > |
| > |
| > | Avez vous la soluce ?
| > |
| > |
| > | --
| > |
| > | Amicalement
| > |
| > | Alain
| > |
| > |
| >
| >
|
|