Load Shape At Runtime in a PictureBox - Xtreme Visual Basic Talk

06-26-2012, 05:58 AM

mathprof

Regular

Join Date: May 2003

Posts: 91

Load Shape At Runtime in a PictureBox

How can I load (create) a shape (circle) at runtime in a picturebox?

I know that I can use the circle method to do this but I need the circle shape with its
properties.

That is, when the shape is created it should be part of the picturebox and not the form.
Kind of like when I click and drag the shape from the the toolbox (as opposed to double clicking on the shape control)

Thanks.

06-26-2012, 12:16 PM

Cerian Knight

Multi-Technologist

Super Moderator
* Expert *

Join Date: May 2004

Location: Michigan

Posts: 3,740

Try right-clicking on a Shape control and select 'Cut', then right-click on a PictureBox and select 'Paste'. The Shape control is now embedded and you can work with both as necessary.

__________________
"May the code that you write never work in ways that you didn't expect; and may the code that you didn't write never require you to maintain it". - Ancient Chinese Proverb

06-26-2012, 12:38 PM

Gruff

Bald Mountain Survivor

Super Moderator
* Expert *

Join Date: Aug 2003

Location: Oregon, USA

Posts: 5,882

If you need to move a control into a picturebox (Or Frame, Form, or ssTab) at run-time you would set the container property to be the picturebox.

__________________
Burn the land and boil the sea
You can't take the sky from me

~T

06-26-2012, 01:32 PM

Cerian Knight

Multi-Technologist

Super Moderator
* Expert *

Join Date: May 2004

Location: Michigan

Posts: 3,740

For runtime creation within the PictureBox, I was playing with this code (works, but may need adjustment):

Code:

'Manually add a PictureBox control to a form first, then run this code
Private Sub Form_Activate()
Dim Shape1 As VB.Shape
Set Shape1 = Controls.Add("VB.Shape", "Shape1", Form1)
Set Shape1.Container = Picture1
Shape1.Visible = True
Shape1.Shape = 3 'Circle
End Sub

You should be able to extend this to any number of Shapes by creating a control array.

__________________
"May the code that you write never work in ways that you didn't expect; and may the code that you didn't write never require you to maintain it". - Ancient Chinese Proverb

Last edited by Cerian Knight; 06-26-2012 at 01:46 PM.

06-26-2012, 01:56 PM

mathprof

Regular

Join Date: May 2003

Posts: 91

Container

Thanks.
Great idea.