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:
01450672
Vues:
47
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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform