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

Modifica per la chiamata del costruttore di TForm.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@2862 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-05-20 13:33:05 +00:00
parent ecf5733929
commit 0dce6abfa5
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ba/baformed.cpp
View File

@ -648,6 +648,8 @@ bool TForm_editor::ask_profile()
TString16 fform = _m->get(F_BASE);
TString80 fdesc = _m->get(F_DESC);
long fcode = _m->get_long(F_CODE);
TString16 cod;
cod.format("%05ld",fcode);
if (!_extra && (fcode == 0 || fform.left(3) == "BOL"))
{
error_box("Non e' possibile modificare i profili standard o i bollettini.") ;
@ -656,7 +658,7 @@ bool TForm_editor::ask_profile()
if (k == K_ENTER)
{
if (_form != NULL) delete _form;
_form = new TForm(fform, (fcode!=0) ? format("%05ld",fcode) : "", _extra ? 2 :1, fdesc);
_form = new TForm(fform, (fcode!=0) ? cod : "", _extra ? 2 :1, fdesc);
break;
}
else if (k == K_DEL)