Image size

[brucelee]

i want to display an 408*60*256 gif
how do i set the hight/width mesurements?

(in the position properties the size is'nt the same)

If you are using an ImageBox, set the Stretch property to True and then size the ImageBox to 480x60. Then the ImageBox will stretch the Picture to whatever size you want it.

Another way of doing it is uing the PaintPicture method.

Private Sub Command1_Click()

   ' Paints the picture on the form.
   Form1.PaintPicture Picture1.Picture, 0, 0, 480, 60

End Sub

[HeSaidJoe]

set Image1.picture = load(app.path & "\myfolder\mypic.gif"
Image1.width = image1.picture.width
Image1.height=image1.picture.height