FoxPro/Visual FoxPro - CONTROLAR LA EJECUCION DE UN EXE ...

Hola ... tengo un EXE a partir de "2-Como formulario de nivel superior".
Quisiera que al hacer click en el acceso directo solo se abra una vez. Para ello tengo este codigo como programa de inicio al formulario, pero no me funciona.

Application.visible=.f.
if !wexist("Form1")
do form Agenda.scx
endif
Read events
Application.visible=.t.

Con este ejemplito deviera funcionarte : a tu form o prg agregas esto :

set safe off
Set Scoreboard off
_Screen.WindowState=2
*_screen.backcolor=rgb(212,208,200)
_screen.backcolor=rgb(192,192,192)

_screen.closable=.F.

_screen.FontSize=14
*_Screen.LockScreen=.T.

_Screen.Caption="Mi Aplicación Personal "

_screen.FontName='Arial Black'
*_screen.Picture="C:\Agrosu\ensilaje.jpg" // si tienes una imagen jpg
cambias esta ruta .para que te salga como fondo en tú Menú .


Set Skip of Menu _Msysmenu .T.

DO Form Agenda

READ EVENTS
RETURN
SET SKIP OF MENU _MSYSMENU .F.

Pues compilado en un exe no funciona .........