Code: Select all
DEFINE DIALOG oDlg TITLE 'reporte de stocks' SIZE 800, 600
@ 05, 05 LISTBOX oLbx VAR cLbx OF oDlg ;
SIZE 750, 500;
ITEMS aItems
@ 520, 190 BUTTON aBtn[01 ] PROMPT "Salir" OF oDlg ;
ACTION oDlg:end() SIZE 200, 70
ACTIVATE DIALOG oDlg CENTERED
saludos
Wilson