Corretta gestione config USER quando l'utente ancora non e' noto
git-svn-id: svn://10.65.10.50/trunk@1437 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
fdc48dfb03
commit
1f26d8477a
@ -445,9 +445,15 @@ TConfig::TConfig(int which_config, const char* paragraph)
|
|||||||
switch (which_config)
|
switch (which_config)
|
||||||
{
|
{
|
||||||
case CONFIG_STAMPE:
|
case CONFIG_STAMPE:
|
||||||
_file.add("print.ini"); break;
|
_file.add("print.ini");
|
||||||
|
break;
|
||||||
default:
|
default:
|
||||||
_file << '/' << user() << ".ini"; break;
|
if (user().not_empty())
|
||||||
|
_file.add(user());
|
||||||
|
else
|
||||||
|
_file.add("prassi");
|
||||||
|
_file.ext("ini");
|
||||||
|
break;
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
case CONFIG_FCONV:
|
case CONFIG_FCONV:
|
||||||
|
@ -614,15 +614,24 @@ bool TForm_item::do_message(int num)
|
|||||||
|
|
||||||
bool TForm_item::update()
|
bool TForm_item::update()
|
||||||
{
|
{
|
||||||
string_at(_x, _y, _prompt);
|
if (_prompt.right(1) == "#")
|
||||||
|
{
|
||||||
|
TString prompt(_prompt);
|
||||||
|
for (int i = prompt.len()-2; i >= 0; i--)
|
||||||
|
if (prompt[i] != '#') break;
|
||||||
|
prompt.cut(i+1);
|
||||||
|
string_at(_x, _y, prompt);
|
||||||
|
}
|
||||||
|
else string_at(_x, _y, _prompt);
|
||||||
|
|
||||||
do_message();
|
do_message();
|
||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
void TForm_item::print_on(TToken_string& row) const
|
void TForm_item::print_on(TToken_string& row) const
|
||||||
{
|
{
|
||||||
row = class_name();
|
|
||||||
row.add(id());
|
row.add(id());
|
||||||
|
row = class_name();
|
||||||
row.add(_y);
|
row.add(_y);
|
||||||
row.add(_x);
|
row.add(_x);
|
||||||
|
|
||||||
@ -1487,7 +1496,7 @@ bool TPrint_section::edit(const char* title)
|
|||||||
}
|
}
|
||||||
|
|
||||||
const word flags = 0x08 | (form().edit_level() > 1 ? 0x06 : 0x00);
|
const word flags = 0x08 | (form().edit_level() > 1 ? 0x06 : 0x00);
|
||||||
TArray_sheet a(-1, -1, 0, 0, title, "Tipo@8|ID@4|Riga@R|Col.@R|Gr.@R|Descrizione@40", flags);
|
TArray_sheet a(-1, -1, 0, 0, title, "ID@4|Tipo@8|Riga@R|Col.@R|Gr.@R|Descrizione@40", flags);
|
||||||
|
|
||||||
for (word i = 0; i < fields(); i++)
|
for (word i = 0; i < fields(); i++)
|
||||||
{
|
{
|
||||||
|
Loading…
x
Reference in New Issue
Block a user