campo-sirio/ba/ba2600d.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 "Spreadsheet"  -1 -1 78 20

TEXT DLG_NULL
 BEGIN
  PROMPT 3 1 "E' possibile personalizzare la struttura del campo spreadsheet"
 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:  "
  FLAGS "H"
 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_LARGE 5
 BEGIN
  PROMPT 40 12  "Altezza:        "
  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 "Item"  -1 -1 78 20

TEXT DLG_NULL
 BEGIN
  PROMPT 3 2 "Digitare gli item che si vogliono."
 END

SPREADSHEET F_ITEM 0 -3
 BEGIN
  PROMPT 1 4 ""
  ITEM "ITEM@80"
 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 5
 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

STRING F_CHECK 15
 BEGIN
  PROMPT 3 12 ""
 FLAGS "H"
 END

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

ENDPAGE

PAGE "Browse" -1 -1 78 20

TEXT DLG_NULL
 BEGIN
  PROMPT 3 1 "Occorre definire le istruzioni per permettere il browse."
 END

TEXT DLG_NULL
 BEGIN
  PROMPT 3 2 "Per gli intervalli occorre andare a capo."
 END

MEMO F_USE  0 -3
 BEGIN
  PROMPT 1 3  ""
 END

ENDPAGE

ENDMASK

PAGE "Item" -1 -1 78 20

STRING 101 7
 BEGIN
  PROMPT 3 6 "Item:"
  CHECKTYPE REQUIRED
 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