Could you tell me, How do you apply skin to your form?
Thanks you.
Printable View
Could you tell me, How do you apply skin to your form?
Thanks you.
If you want to place an image on a form; try 'Me.Picture = Loadpicture("D:\Folder\MyPic.jpg")
If you want real skin on that form; beats me!
Draw your form, buttons, and whatever else it is your using and save them a BMPs. Then start up VB Shaped Form Creator and trace your form BMP file and save it (it saves as *.frm). Fire up VB and start a project or something. Add the .frm file you just saved. And in its Picture property put the form BMP file. Now add a Picture Box: AutoSize = True, BorderStyle = None. And in its picture property put the close button BMP file you drew. And then add some closing code:
Run what you have just created and i think you'll be pleased with what you get.Code:Private Sub Picture1_Click()
Unload Me
End
End Sub
You can add multi-state buttons so they appear to dimpple when clicked. And other cool things.... just mess around with it. :)
I hope this helps!
http://home.clara.net/doczaf/index.html
Click on Samples from the options
(in the top right hand corner)
On the next web page
(click on Basic in the left hand panel)
The sample is called Tiling a form with an image
Sub Form_Paint()
'This routine tiles an image all over the form
Dim X as Integer
Dim Y as Integer
'Set vertical loop
For Y = 0 To Me.Height Step Image1.Height
'Set horizontal loop
For X = 0 To Me.Width Step Image1.Width
'Draw the image at location x,y
PaintPicture Image1, X, Y
'Draw next horizontal image
Next X
'Draw next vertical image
Next Y
End Sub
I got the code from my site
Doc Zaf
{;->
What Cbomb said works good enough, it's really easy to skin your forms that way, I'm working on a program for my clan and here's a screen shot of one of the shaped forms which is skinned, the skin was created in PSP....
http://silenttroopers.tripod.com/screen1.gif
Damn, the images are off, but you can go there, and check it out anyways...
[Edited by WildGhost on 04-04-2000 at 05:26 PM]