Correzione errore 006095 e abilitazione campi in Godmode.

git-svn-id: svn://10.65.10.50/trunk@3498 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-09-03 17:14:57 +00:00
parent 345b7f5d75
commit 38cab836a1
2 changed files with 13 additions and 5 deletions

View File

@ -219,7 +219,7 @@ STRING F_FILE1 80 60
BEGIN
PROMPT 2 13 "Archivio "
HELP "Nome dell'archivio relativo al campo"
//FLAGS "DB"
GROUP 7
FLAGS "B"
END
@ -227,8 +227,8 @@ STRING F_FIELD1 80 60
BEGIN
PROMPT 2 14 "Campo 1 "
HELP "Nome del campo su file"
GROUP 7
FLAGS "B"
//FLAGS "DB"
END
STRING F_FIELDREF1 20 16
@ -256,7 +256,7 @@ STRING F_FILE2 60
BEGIN
PROMPT 2 16 "Archivio "
HELP "Nome dell'archivio relativo al campo"
//FLAGS "DB"
GROUP 7
FLAGS "B"
END
@ -264,7 +264,7 @@ STRING F_FIELD2 60
BEGIN
PROMPT 2 17 "Campo 2 "
HELP "Nome del campo su file"
//FLAGS "DB"
GROUP 7
FLAGS "B"
END

View File

@ -280,7 +280,15 @@ bool TForm_editor::menu(MENU_TAG tag)
break;
}
if (!quit) edit(sec, pt);
if (!quit)
{
TString status;
status << "Profilo: " << _form->name();
status << " codice: " << _form->code();
xvt_statbar_set(status);
edit(sec, pt);
xvt_statbar_set(" ");
}
return TRUE;
}