Adding second image - Level Extreme

From

23/02/2010 21:54:29

Karen Tedman
Colûmbia Britânica, Canada

To

23/02/2010 21:39:26

Naomi Nosonovsky
Wisconsin, United States

General information

Fórum:

Visual FoxPro

Category:

Programação, sintaxe e comandos

Título:

Re: Adding second image

Miscellaneous

ID da thread:

01450669

ID da mensagem:

01450672

Views:

48

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

Responder

Mapa

View