DeMaster
12-03-2000, 09:22 AM
Hi,
I am having a bit of a problem... (*grin* Like that is not normal)... Anyways, I am doing some GDI graphics functions on a simple splash form... I run 1024x768 large fonts... Everything looks good... If I switch to small fonts (same res), everything is still working as expected, except I have a picture box that is being clipped off at the right and bottom sides... If anyone can point me to what I am doing wrong I would be most grateful... I have tried about everything I can think of, *grin* prolly something so simple I am gonna kick myself but at this point I am losing hair... LOL... My thought process at this time is to use an API call to determine screen font setting and adjust accordingly... Does anyone know an API that will give me this or just anyway around this?? What I have come up with below works, but on my next form I have a huge amount of controls and I really would hate to have to set them all in code... <code><pre>
Me.Width = ScaleY(440, vbPixels, vbTwips)
Me.Height = ScaleX(260, vbPixels, vbTwips)
For a = 0 To 4
Picture1(a).ScaleMode = vbPixels
Picture1(a).Width = 400
Picture1(a).Height = 200
Picture1(a).ScaleWidth = 400
Picture1(a).ScaleHeight = 200
Next a
</code></pre>
Thank You In Advance
Duane
Programming... The expression of true creativity bound only to the limitations of your mind...
I am having a bit of a problem... (*grin* Like that is not normal)... Anyways, I am doing some GDI graphics functions on a simple splash form... I run 1024x768 large fonts... Everything looks good... If I switch to small fonts (same res), everything is still working as expected, except I have a picture box that is being clipped off at the right and bottom sides... If anyone can point me to what I am doing wrong I would be most grateful... I have tried about everything I can think of, *grin* prolly something so simple I am gonna kick myself but at this point I am losing hair... LOL... My thought process at this time is to use an API call to determine screen font setting and adjust accordingly... Does anyone know an API that will give me this or just anyway around this?? What I have come up with below works, but on my next form I have a huge amount of controls and I really would hate to have to set them all in code... <code><pre>
Me.Width = ScaleY(440, vbPixels, vbTwips)
Me.Height = ScaleX(260, vbPixels, vbTwips)
For a = 0 To 4
Picture1(a).ScaleMode = vbPixels
Picture1(a).Width = 400
Picture1(a).Height = 200
Picture1(a).ScaleWidth = 400
Picture1(a).ScaleHeight = 200
Next a
</code></pre>
Thank You In Advance
Duane
Programming... The expression of true creativity bound only to the limitations of your mind...