campo-sirio/ba/ba2600x.uml

#include "ba2600b.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 "List"  -1 -1 78 20

TEXT DLG_NULL
 BEGIN
  PROMPT 3 1 "E' possibile personalizzare la struttura del campo listbox"
 END

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

STRING F_PROMPT  60 25
 BEGIN
  PROMPT 3 4  "Prompt:         "
  GROUP 1
 END

NUMBER F_OFFSET 5 
 BEGIN
  PROMPT 48 4  "Offset:  "
  GROUP 1
 END

NUMBER F_LEFT 5 
 BEGIN
  PROMPT 3 6  "Coordinata X:   "
  GROUP 1
 END

NUMBER F_UPPER 5 
 BEGIN
  PROMPT 42 6  "Coordinata Y:  "
  GROUP 1
 END

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

STRING F_IDENT  20
 BEGIN
  PROMPT 3 10  "Identificativo: "
 GROUP 2
 END

NUMBER F_LONGEFF 5
 BEGIN
  PROMPT 3 12  "Lunghezza:      "
  GROUP 2
 END

NUMBER F_LONGEVD 5
 BEGIN
  PROMPT 42 12 "Lunghezza-video:  "
  GROUP 2
 END

NUMBER F_PAGE 5
 BEGIN
  PROMPT 3 15 "Numero della pagina:  "
 END

NUMBER F_FOCUS 5
 BEGIN
  PROMPT 40 15  "Priorita' focus:  "
 END

BOOLEAN F_INTOOL
 BEGIN
  PROMPT 3 17 "Si vuole il controllo nella toolbar"
 END

ENDPAGE

PAGE "Opzioni" -1 -1 78 20

TEXT DLG_NULL
 BEGIN
  PROMPT 3 1 "Scelta delle opzioni"
 END

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

STRING F_FLAG  15
 BEGIN
  PROMPT 3 4 "Flags:   "
  GROUP 1 
 END

STRING F_GROUP  25 15
 BEGIN
  PROMPT 45 4 "Gruppi: "
  GROUP 1
 END

STRING F_FIELD 25
 BEGIN
  PROMPT 3 6 "Field:   "
  GROUP 1
 END

STRING F_KEY 15
 BEGIN
  PROMPT 45 6 "Key:    "
  GROUP 1
 END

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

TEXT DLG_NULL
 BEGIN
  PROMPT 3 9  "Warning:   "
  GROUP 2
 END

STRING F_WARNING 55
 BEGIN
  PROMPT 3 10 ""
  GROUP 2
 END

TEXT DLG_NULL
 BEGIN
  PROMPT 3 11 "Checktype: "
  GROUP 2
 END

LIST F_CHECK 15
 BEGIN
  PROMPT 3 12 ""
  ITEM "a| "
  ITEM "b|NORMAL"
  ITEM "c|REQUIRED"
  ITEM "d|SEARCH"
  ITEM "e|FORCED"
  GROUP 2
 END

STRING F_MESSAGE 10
 BEGIN
  PROMPT 3 15 ""
  FLAGS "H"
 END

ENDPAGE

PAGE "Item/Msg"  -1 -1 78 20

TEXT DLG_NULL
 BEGIN
  PROMPT 3 2 "Scrivere gli item con i relativi messaggi."
 END

SPREADSHEET F_ITEM 0 -3
 BEGIN
  PROMPT 1 4 ""
  ITEM "CODICE"
  ITEM "DESCRIZIONE@24"
  ITEM "MESSAGE@50"
 END

ENDPAGE

ENDMASK

PAGE "Item/Msg" -1 -1 78 20

STRING 101 7
 BEGIN
  PROMPT 3 3 "Codice:"
  CHECKTYPE REQUIRED
 END

STRING 102 24
 BEGIN
  PROMPT 3 6 "Descrizione:"
  CHECKTYPE REQUIRED
 END

STRING 103 40
 BEGIN
  PROMPT 3 9 "Messaggio:"
 END
 
BUTTON DLG_OK 10 2
 BEGIN 
  PROMPT -13 -1 ""
 END 

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

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

ENDPAGE

ENDMASK