RE:como hacer ejecutable un formulario de vfp
Checa este codigo modificalo a tu conveniencia.
esto lo pones en un Pgr y con click derecho lo estableces como principal.
Set Default To CurDir()
Set Exclusive Off
Set Notify Off
Set Escape Off
Set Talk Off
Set Status Bar Off
Set Confirm On
Set Century On
Set Century To 19 RollOver 50
Set Date To British
Hide Menu _MSYSMENU
With _Screen
.LockScreen=.T.
.BackColor=RGB(0,0,0)
.Caption='SISTE - Sistema de Tesorería'
.BorderStyle=2
.Closable=.F.
.ControlBox=.F.
.MaxButton=.F.
.MinButton=.T.
.Movable=.F.
.Height=400
.Width=400
.MaxHeight=400
.MaxWidth=400
.AutoCenter=.T.
.Picture=CurDir()+'Source\SigIntro.jpg'
.ControlBox=.F.
.LockScreen=.F.
.TiTleBar = 0
EndWith
&& Pausa en la introduccion
=Inkey(5,'H')
With _Screen
.LockScreen=.T.
.CurrentX=0
.CurrentY=0
.BackColor=RGB(0,0,0)
.TiTleBar = 1
.BorderStyle=2
.Closable=.F.
.ControlBox=.F.
.MaxButton=.F.
.MinButton=.T.
.Movable=.F.
.MaxHeight=590
.MaxWidth=795
.Height=590
.Width=795
.Caption='SISTE- Sistema de Tesorería'
.Picture=CurDir()+'Source\BgaBack.sys'
.Icon=CurDir()+'Source\Fdez.ico'
.AutoCenter=.T.
.ControlBox=.T.
.WindowState = 2
.LockScreen=.F.
.Refresh
EndWith
set sysmenu to
Public nForm
Store 0 To nForm
Use (Sys(05)