IF VarType(_Screen.Image1) != "O"
    _screen.AddObject('Image1','Image')
ENDIF

这个贴子，对你可能有用
http://bbs.

CLEAR
CLOSE ALL
tp11=RAND(-1)
tp12=ROUND(tp11*70,0)
tp13=ALLTRIM(STR(tp12))+".jpg"
IF VarType(_Screen.Image1) != "O"
    _screen.AddObject('Image1','Image')
ENDIF
_screen.Image1.width = _screen.width
_screen.Image1.height = _screen.height
_screen.Image1.stretch = 2
_screen.Image1.anchor = 15
_screen.Image1.picture='&tp13'

通过上段代码已解决问题，谢谢各位

记号了。anchor=15，很好很好啊

路过的新手也来看看