Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Adding second image
Message
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01450669
Message ID:
01450673
Vues:
108
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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform