Solved

Create Image Object at run time

Posted on 2010-11-09
3
1,097 Views
Last Modified: 2012-05-10
I want to add images as needed at run time to a form.  I tried:
x=createobject('Image')
x.name='image2'
x.picture='c:\discipline.bmp'
x.left=25
x.Top=25
x.height=20
x.Width=20
x.visible=.t.

No error is generated nor does my image appear.
Can this be done?
0
Comment
Question by:wcsoctu
  • 2
3 Comments
 
LVL 41

Expert Comment

by:pcelba
ID: 34097757
The Image object must be on some form, try e.g. following code:


PUBLIC oForm
oForm = CREATEOBJECT("ImageForm")
oForm.Visible = .T.
*oForm.Image2.PictureVal = cImg.exp  && Image in Memo field
oForm.Image2.Picture = 'c:\discipline.bmp'


DEFINE CLASS ImageForm AS Form
  
  ADD OBJECT Image2 AS Image ;
      WITH Top = 0, Left = 0, ;
           Height = 300, Width = 500, ;
           Stretch = 2

ENDDEFINE

Open in new window

0
 
LVL 41

Accepted Solution

by:
pcelba earned 500 total points
ID: 34097786
You may also create object in the screen window (same code is possible to use in any other form):

_screen.AddObject('image1','Image')
_screen.image1.Top = 0
_screen.image1.Left = 0
_screen.image1.height = 300
_screen.image1.width = 300
_screen.image1.stretch = 2
_screen.Image1.Picture = 'c:\discipline.bmp'
_screen.image1.visible = .t.

Open in new window

0
 
LVL 4

Author Comment

by:wcsoctu
ID: 34098338
Using your second example with thisform instead of _screen I was able to accomplish it.  I want to add an unknown number of images at run time.   Thank You
0

Featured Post

Master Your Team's Linux and Cloud Stack!

The average business loses $13.5M per year to ineffective training (per 1,000 employees). Keep ahead of the competition and combine in-person quality with online cost and flexibility by training with Linux Academy.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Microsoft Visual FoxPro (short VFP) is a programming language with it’s own IDE and database, ranking somewhat between Access and VB.NET + SQL Server (Express). Product Description: http://msdn.microsoft.com/en-us/vfoxpro/default.aspx (http://msd…
This article outlines why you need to choose a backup solution that protects your entire environment – including your VMware ESXi and Microsoft Hyper-V virtualization hosts – not just your virtual machines.
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …
The Email Laundry PDF encryption service allows companies to send confidential encrypted  emails to anybody. The PDF document can also contain attachments that are embedded in the encrypted PDF. The password is randomly generated by The Email Laundr…

803 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question