Making a labels Caption Beveled?

[ZanM]

Does anyobe know of a way to make a label caption bevel and then unbevel the way the threed.vbx CommandButtons text would in VB3?


------------------
SomeTimes Coffee Just Isn't Enough.
Zan Magi

[Juan Carlos Rey]

You are absolutely right. I love Coffee with a spoon of brandy.

For your other question, If you mean a border, try this:

On the Mouse.Move event of your Label:

Label1.BorderStyle = 1

And on the Mouse.Move event of the container of that Label (the Form, a Frame, etc):

Label1.BorderStyle = 0

Guaranteed!




[This message has been edited by Juan Carlos Rey (edited 02-13-2000).]

[ZanM]

Ok I'm makeing a button control. I want to use a picture box now that i think about it so that I can make the button rounded if I want. So what I really need is a way to draw text 3D on a picture box

------------------
SomeTimes Coffee Just Isn't Enough.
Zan Magi

[pardede]

use 2 labels, one as the text and the other as shadow...?

well, you might have thought of this but i'd suggest anyway

[ZanM]

yeah I can do that but I found an old post here on vb-world with 3D text on a picture box except it is in progam form no code I was hoping for something like that if anyone wants to see what I mean search this forum for #d text and look @ DigitalError's post I can't seem to get in touch with him if anyone knows how to do the effect he does please let me know I really could use it.

------------------
SomeTimes Coffee Just Isn't Enough.
Zan Magi

[ZanM]

Thanks everybody but I think I got what I need from rino_2 on the other 3D text topic

------------------
SomeTimes Coffee Just Isn't Enough.
Zan Magi

[DiGiTaIErRoR]

This isn't exactly how I do it but it should give you an idea of how to do it.

Picture1.ForeColor = RGB(255, 255, 255)
Picture1.CurrentX = 1
Picture1.CurrentY = 1
Picture1.Print "DiGiTaIErRoR"

Picture1.ForeColor = RGB(0, 0, 0)
Picture1.CurrentX = 3
Picture1.CurrentY = 3
Picture1.Print "DiGiTaIErRoR"

Picture1.ForeColor = RGB(128, 128, 128)
Picture1.CurrentX = 2
Picture1.CurrentY = 2
Picture1.Print "DiGiTaIErRoR"

be sure to set the scalemode to pixel or it won't work!!!


------------------
DiGiTaIErRoR
VB, QBasic, Iptscrae, HTML
Quote: There are no stupid questions, just stupid people.