campo-sirio/ba/ba2600s.uml

#include "ba2600a.h"

TOOLBAR "" 0 20 0 0

BUTTON  DLG_OK  10 2
 BEGIN
  PROMPT -13  -1 ""
 END

BUTTON  DLG_CANCEL  10 2
 BEGIN
  PROMPT -23  -1 ""
 END

BUTTON  DLG_DELREC  10 2
 BEGIN
  PROMPT -33  -1 ""
 END

ENDPAGE

PAGE "Maschera" -1 -1 78 20

TEXT DLG_NULL
 BEGIN
  PROMPT 3 1 "E' possibile personalizzare la struttura della maschera"
 END

GROUPBOX DLG_NULL  -1 8 
 BEGIN
  PROMPT 2 2  ""
  GROUP 1
 END

TEXT DLG_NULL
 BEGIN
  PROMPT 3 3 "Titolo della pagina:"
  GROUP 1
 END

STRING F_PRT  25 15
 BEGIN
  PROMPT 3 4  ""
  GROUP 1
 END

TEXT DLG_NULL
 BEGIN
  PROMPT 40 3 "Numero pagina:"
  GROUP 1
 END

NUMBER F_PAG 10
 BEGIN
  PROMPT 40 4 ""
  GROUP 1
 END

TEXT DLG_NULL
 BEGIN
  PROMPT 3 6 "Totale pagine:"
  GROUP 1
 END

NUMBER F_TOTALP 10
 BEGIN
  PROMPT 3 7 ""
  FLAGS "D"
  GROUP 1
 END

TEXT DLG_NULL
 BEGIN
  PROMPT 3 10 "Tipo di visualizzazione: "
 END

GROUPBOX DLG_NULL 27 6
 BEGIN
  PROMPT 40 10 ""
  GROUP 2   
 END

RADIOBUTTON F_TYPE 25
 BEGIN
  PROMPT 3 10 ""
  ITEM "a|Centrato "
   MESSAGE SHOW,2@
   MESSAGE DISABLE,F_X|DISABLE,F_Y
  ITEM "b|Personalizzato "
   MESSAGE SHOW,2@
   MESSAGE ENABLE,F_X|ENABLE,F_Y
 END

NUMBER F_X 10
 BEGIN
  PROMPT 41 11 "Coordinata X:"
  GROUP 2
 END

NUMBER F_Y 10 
 BEGIN
  PROMPT 41 12 "Coordinata Y:"
  GROUP 2
 END

NUMBER F_LG 10
 BEGIN
  PROMPT 41 13 "Altezza:     "
  GROUP 2
 END

NUMBER F_LN 10
 BEGIN
  PROMPT 41 14 "Lunghezza:   "
  GROUP 2
 END

BOOLEAN F_TOOL
 BEGIN
  PROMPT 3 17 "Con la presenza della toolbar la visualizzazione sara' a pieno schermo"
  MESSAGE TRUE ENABLE,F_TOOLY
  MESSAGE FALSE DISABLE,F_TOOLY
 END

NUMBER F_TOOLY 10 
 BEGIN
  PROMPT 3 19 "Coordinata Y:"
 END

ENDPAGE

ENDMASK