FoxPro/Visual FoxPro - Splash o presentacion

Que tal, espero me puedan ayudar...

Deseo saber como generar un Splash al ingresar en mi aplicacion, el inconveniente es que yo trabajo en Genexus y deseo llamar un *.prg (si es posible) que me muestre este splash o llamar un ejecutable.

Gracias por todo
Saludos

Prueba el siguiente codigo


LOCAL loPresenta
loPresenta = NEWOBJECT("FormPresenta")
loPresenta.SHOW()
** Presentation screen
FOR ln = 1 TO 30&& Legal Value = 30
INKEY(.1)
ENDFOR
RELEASE loPresenta
loPresenta = NULL
**********************
* Formulario Presenta
**********************
DEFINE CLASS FormPresenta AS FORM
ALWAYSONTOP = .T.
AUTOCENTER = .T.
WIDTH = 700 &&468
HEIGHT = 500 &&319
NAME = "Presenta"
SHOWWINDOW = 2
DESKTOP = .T.
TITLEBAR = 0
BORDERSTYLE = 1
MOUSEPOINTER = 11
ADD OBJECT imgLogo AS IMAGE
PICTURE = "BITMAPS\SPLASH2.BMP"
PICTURE = "Logo Empresa\logo.jpg"
TOP = 0
LEFT = 0
ADD OBJECT Inicilizando as LABEL
caption="Wait ..... "
*************
PROCEDURE INIT
SET CURSOR OFF
THIS.SETALL("MOUSEPOINTER", THIS.MOUSEPOINTER)
ENDPROC
*****************
PROCEDURE DESTROY
SET CURSOR ON
ENDPROC
ENDDEFINE



Suerte

Cheqa la clase dialogs...

Saludos