Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Adding second image
Message
From
23/02/2010 21:54:29
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01450669
Message ID:
01450672
Views:
45
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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform