Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Adding second image
Message
 
 
To
23/02/2010 21:54:29
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01450669
Message ID:
01450673
Views:
107
This message has been marked as the solution to the initial question of the thread.
>probably silly naomi - it was a shot in the dark. This is what i tried:
>
>
>lcImage = "C:\pix\mypix1.jpg"
>lcBgType = "TOP"
>IF NOT PEMSTATUS(_Screen, "oImg", 5)
>    _Screen.AddObject("oImg", "Image")
>ENDIF
>WITH _Screen.oImg
>       .Picture = lcImage 
>        .Top  = 85
>        .Left = 100
>        .Stretch = 0
>    .Visible = .T.
>ENDWITH
>
>ldImage = "C:\pix\mypix2.jpg"
>lcBgType = "TOP"
>IF NOT PEMSTATUS(_Screen, "oImg", 5)
>    _Screen.AddObject("oImg", "Image")
>ENDIF
>WITH _Screen.oImg
>       .Picture = ldImage 
>        .Top  = 285
>        .Left = 300
>        .Stretch = 0
>    .Visible = .T.
>
>ENDWITH

I haven't tried your code yet, but try adding the second image using different name, e.g.

_Screen.AddObject('oImg2','Image') and do
with _screen.oImg2
...
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform