Es un programa que copie de un manual sobre el manejo de pantalla como ejemplo de mi investigación.
soy sincero no conosco nada de FW. y me estoy basando en el manual que esta muy completo.
Intento hacerlo paso a paso, con el fin de que arranque y luego modificarlo poniendore otras opciones, pero de hay no paso.
#include "fivewin.ch"
static oWnd
function main()
Define Window oWnd TITLE"Primera Ventana en Five Win" FROM 5,5 to 15,75 ;
COLORS RGB(128,128,128), RGB(255,255,255) ;
MENU Creamenu()
ACTIVATE WINDOW oWnd
retu nil
//------------------
Function Creamenu()
LOCAL oMenu
LOCAL oPrimero
MENU oMenu
MENUITEM"&Primero"
MENU
MENUITEM"&Calculadora" ACTION WinExec("calc.exe")
MENUITEM"&Block de Notas" ACTION WinExec("Notepad.exe")
SEPARATOR
MENUITEM"&Salir" ACTION oWnd:End()
ENDMENU
ENDMENU
retu oMenu
como vez es muy facil.
para compilar
d:\clip_53\bin\clipper ventana.PRG /m/b/w/P >ventana.err
CLS
ECHO ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
ECHO º LIGANDO.................. º
ECHO ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
D:\BLINKER\BLINKER @ve >ve.err
BLINKER INCREMENTAL OFF
//BLINKER EXECUTABLE COMPRESS
OUTPUT \prueba\ventana.exe
LIB d:\clip_53\lib\CLIPPER
BEGINAREA
FILE ventana
ENDAREA
PACKCODE
PACKDATA %
