root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Corretto menu opzioni

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@2841 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1996-05-16 10:28:10 +00:00
parent cd5fcdffa8
commit 8e1cb4e72a
4 changed files with 13 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ba/ba0.url
View File

@ -2,5 +2,8 @@
MENU TASK_MENUBAR
SUBMENU MENU_FILE "~File"
SUBMENU M_FONT "~Opzioni"
DEFAULT_FONT_MENU
MENU M_FONT
ITEM M_FONT_SELECT "~Font"
ITEM MENU_ITEM(2) "~Colori" DISABLED

4
ba/ba0100a.uml
View File

@ -21,12 +21,12 @@ BEGIN
HELP "Password dell'utente selezionato"
END
BUTTON DLG_OK 9 2
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_CANCEL 9 2
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -22 -1 ""
END

10
ba/ba3200.cpp
View File

@ -24,8 +24,8 @@ class BA3200_application : public TPrintapp
TMask* _msk;
TString _maskname;
int _logicnum;
TArray _string_roman;
TArray _field_roman;
TString_array _string_roman;
TString_array _field_roman;
bool _stampa_registri;
bool _stampa_ca7; //tabella causali 770
bool _tabella_comune;
@ -102,9 +102,9 @@ bool BA3200_application::preprocess_page(int , int)
{
for (int i = 0; i < items; i++)
{
TString& fn = (TString &) _field_roman[i];
TString& fn = _field_roman.row(i);
TFieldref fld(fn, 0);
TString& s = (TString &) _string_roman[i];
TString& s = _string_roman.row(i);
const int n = atoi(fld.read(*_rel));
s = itor(n);
@ -244,7 +244,7 @@ void BA3200_application::set_rows()
{
formato_campo.cut(p);
formato_campo << "#t";
_string_roman.add(new TString);
_string_roman.add("");
_field_roman.add(s);
const int last = _string_roman.items() - 1;

4
ba/ba4200c.uml
View File

@ -724,7 +724,7 @@ NUMBER LST_AG3_SITSOC 1
BEGIN
PROMPT 29 15 "Situazione societa'"
FIELD LF_ANAGGIU->SITSOC
SHEET "Codice|Situazione@88"
SHEET "Codice|Situazione@90"
INPUT LST_AG3_SITSOC
OUTPUT LST_AG3_SITSOC
HELP "Situazione in cui si trova la societa'"
@ -744,7 +744,7 @@ BEGIN
PROMPT 53 15 "Natura Giuridica "
FIELD LF_ANAGGIU->NATGIU
HELP "Natura giuridica della societa'"
SHEET "Codice|Natura Giuridica@120"
SHEET "Codice|Natura Giuridica@150"
INPUT LST_AG3_NATGIU
OUTPUT LST_AG3_NATGIU
ITEM " |Sconosciuta"