Correzione alla stampa di valori numerici con pictures di solo @.

git-svn-id: svn://10.65.10.50/trunk@3975 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
paola 1996-12-07 09:45:01 +00:00
parent 91d7889853
commit 4daae140f1

View File

@ -1576,8 +1576,12 @@ void TForm_number::apply_format(real& n , TString& s) const
int at = pic.find('@'); int at = pic.find('@');
if (at >= 0 && comma <0) if (at >= 0 && comma <0)
{ {
maxlen = atoi(&pic[at+1]); const int len = atoi(&pic[at+1]);
pic.cut(at); if (len > 0)
{
maxlen = len;
pic.cut(at);
}
} }
s=n.string(pic); // riempi la stringa col valore pitturato s=n.string(pic); // riempi la stringa col valore pitturato