>>* This class uses a little trick to give the _screen tappable events >>DEFINE CLASS logo AS image >> oscr = _SCREEN >> >> PROCEDURE Init >> * Find a file for this object >> lcFile = 'logo.bmp' >> if not empty(lcFile) >> this.Picture = lcFile >> else >> return .F. >> endif >> this.Position() >> ENDPROC >> >> PROCEDURE oscr.Resize >> * This assumes the object was added to the screen as "oLogo" >> this.oLogo.Position() >> ENDPROC >> >> PROCEDURE Position >> * Position this image where it should be >> with this >> .Left = _screen.width / 2 - .width / 2 >> .Top = _screen.height / 2 - .Height / 2 >> endwith >> ENDPROC >> >>ENDDEFINE>>Then, run this code: