Resize, scale width/height [re4solved]

VB Code:

FrmSplitted.pic.ScaleMode = 3
FrmSplitted.pic.ScaleWidth = xWidth
FrmSplitted.pic.ScaleHeight = yWidth

why does this code give me an error 'invalid property value? i need to resize a picture box how can this be done? what is the best method? :afrog:

Which line is the error on?

You can't do it like that....ScaleWidth & ScaleHieght are for reading from....In the Design time propertys if you change these values you will notice the ScaleMode changes to "User" which means you are setting a user defined scale. What you need to use is the frm.Width & frm.Height Propertys and the Screen.TwipsPerPixelX & Screen.TwipsPerPixelY

VB Code:

With FrmSplitted
        .ScaleMode = vbPixels
        .pic.Move .pic.Left, .pic.Top, xWidth, yWidth
    End With

Scalewidth and scaleheight for pic returns the inner part of pic. So if you change the scalemode of pic, you change how values are displayed in pic's inner sizes. So instead of changing pic's scalemode, we change pic's host's scalemode and then resize pic according to this. There is an alternative method though...

VB Code:

With FrmSplitted
        .pic.Move .pic.Left, .pic.Top, .ScaleX(xWidth, vbPixels, .ScaleMode), .ScaleY(yWidth, vbPixels, .ScaleMode)
    End With

Above code will convert pixels to the current used Scalemode of pic's host. Hope this helps :)

I'm sure just using the TwipsPerPixel is just as easy though ;)

VB Code:

frmMain.Width = iWidth *Screen.TwipsPerPixelX
frmMain.Height = iHeight *Screen.TwipsPerPixelY

;)

But it doesn't work if ScaleMode is set to something else than vbTwips ;) Move command is also two times faster than doing Width and Height calls separately.

Quote:

---

Posted by Merri
But it doesn't work if ScaleMode is set to something else than vbTwips ;) Move command is also two times faster than doing Width and Height calls separately.

---

Your thinking of the container.....the thign is the Form's Width & Height propertys are always in twips....if you change the scale mode of the form then it affects controls that it is the container for....to chnage the Width & Height properties to anything but twips would mean changing the forms containers ScaleMode and I don't think that is possibel :D. if you are changing the size of a picture box it is easy because you make the form's scale mode Pixel and the pictureboxes Width & Height propertys will turn into Pixel values ;).

He is clearly using a picturebox on a form here, so you're kind of talking about the wrong thing :D I do know this and I also know Scales are not supported by Screen and that you need to use TwipsPerPixel to place form correctly to the screen (though I've rarely had any use for this).

Doh!!!, I didn't see the .pic. part :blush:.

In that case shouldn't this work:

VB Code:

FrmSplitted.ScaleMode = 3
FrmSplitted.pic.Width = xWidth
FrmSplitted.pic.Height = yWidth

Thanks Fellers

[Resolved]

Before these two start arguing ;)

Quote:

---

Originally posted by Electroman
Doh!!!, I didn't see the .pic. part :blush:.

In that case shouldn't this work:

VB Code:

FrmSplitted.ScaleMode = 3
FrmSplitted.pic.Width = xWidth
FrmSplitted.pic.Height = yWidth

---

nope that doesnt work thats why i posted :)

It does work, and that's my first suggestion :) (vbPixels = 3, but you should always use these predeclared variables to keep code more readable).

Quote:

---

Posted by Pino
nope that doesnt work thats why i posted :)

---

I don't think you spotted the change I made to your code (the first line & removed the Scale off the other lines)....I just checked it and yes it did work ;) :D.

Quote:

---

Posted by Pino
Thanks Fellers

[Resolved]

Before these two start arguing ;)

---

If you don't mind adding -[Resolved]- to the title then ;). Thanx :D