Implementato il cambio del formato globale dei numeri solo per il body
ed il footer. Cambiata l'inizializzazione dei contenuti delle maschere di selezione profilo e copia. git-svn-id: svn://10.65.10.50/trunk@2489 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
1a3147d03f
commit
fdd5507908
@ -32,6 +32,7 @@ protected:
|
||||
virtual bool post_edit_checks(TMask& m, TPrint_section* sec);
|
||||
public:
|
||||
virtual const char* section_mask() { return "sc3100s" ;}
|
||||
virtual void change_number_format(int w, int dec, const char* p);
|
||||
TForm_EC (): TForm() {};
|
||||
TForm_EC (const char* form, const char * code = "", int editlevel = 0, const char* desc = "")
|
||||
: TForm(form,code,editlevel,desc) {};
|
||||
@ -75,6 +76,18 @@ bool TForm_EC::post_edit_checks(TMask& m, TPrint_section* sec)
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
void TForm_EC::change_number_format(int w, int dec, const char* p)
|
||||
{
|
||||
char secs[] = { "FB" };
|
||||
char ptyp[] = { "LOEF" };
|
||||
TPrint_section* ps;
|
||||
|
||||
for (int sc = 0; sc < 4; sc++)
|
||||
for (int pt = 0; pt < 4; pt++)
|
||||
if ((ps = exist(secs[sc], char2page(ptyp[pt]), FALSE)) != NULL)
|
||||
ps_change_number_format(*ps, w, dec, p);
|
||||
}
|
||||
|
||||
class TForm_EC_editor : public TForm_editor
|
||||
{
|
||||
s_data _prm;
|
||||
@ -128,8 +141,6 @@ BOOLEAN XVT_CALLCONV1 wprms (long data)
|
||||
bool TForm_EC_editor::ccodes_handler(TMask_field& f, KEY k)
|
||||
{
|
||||
TMask& m = f.mask();
|
||||
if (f.dirty() && m.get(F_CBASE).empty())
|
||||
m.set(F_CBASE,BASE_EC_PROFILE);
|
||||
if (k==K_TAB)
|
||||
{
|
||||
TString base(m.get(F_CBASE));
|
||||
@ -149,9 +160,9 @@ bool TForm_EC_editor::ccodes_handler(TMask_field& f, KEY k)
|
||||
|
||||
bool TForm_EC_editor::clngs_handler(TMask_field& f, KEY key)
|
||||
{
|
||||
TMask& m = f.mask();
|
||||
if (key==K_TAB)
|
||||
{
|
||||
TMask& m = f.mask();
|
||||
TString base(m.get(F_CBASE));
|
||||
TString code(m.get(F_CCODES));
|
||||
code << f.get();
|
||||
@ -175,6 +186,7 @@ bool TForm_EC_editor::cpy_handler(TMask_field& f, KEY k)
|
||||
TMask mm("sc3100b");
|
||||
mm.set_handler(F_CCODES,ccodes_handler);
|
||||
mm.set_handler(F_CCODELS,clngs_handler);
|
||||
mm.set(F_CBASE,BASE_EC_PROFILE);
|
||||
while (mm.run() == K_ENTER) // Prende in input il nome del profilo sorgente
|
||||
{
|
||||
long scode = mm.get_long(F_CCODES);
|
||||
@ -238,9 +250,7 @@ bool TForm_EC_editor::cpy_handler(TMask_field& f, KEY k)
|
||||
bool TForm_EC_editor::code_handler(TMask_field& f, KEY key)
|
||||
{
|
||||
TMask& m = f.mask();
|
||||
if (f.dirty() && m.get(F_BASE).empty())
|
||||
m.set(F_BASE,BASE_EC_PROFILE);
|
||||
if (key==K_TAB)
|
||||
if (key==K_TAB && f.get().not_empty())
|
||||
{
|
||||
TString base(m.get(F_BASE));
|
||||
TString code(f.get());
|
||||
@ -259,9 +269,9 @@ bool TForm_EC_editor::code_handler(TMask_field& f, KEY key)
|
||||
|
||||
bool TForm_EC_editor::lng_handler(TMask_field& f, KEY key)
|
||||
{
|
||||
if (key==K_TAB)
|
||||
TMask& m = f.mask();
|
||||
if (key==K_TAB && m.get(F_CODE).not_empty())
|
||||
{
|
||||
TMask& m = f.mask();
|
||||
TString base(m.get(F_BASE));
|
||||
TString code(m.get(F_CODE));
|
||||
code << f.get();
|
||||
@ -787,6 +797,8 @@ bool TForm_EC_editor::ask_profile()
|
||||
mask().set_handler(DLG_COPY,cpy_handler);
|
||||
mask().set_handler(F_CODE,code_handler);
|
||||
mask().set_handler(F_CODEL,lng_handler);
|
||||
mask().set(F_BASE,BASE_EC_PROFILE);
|
||||
|
||||
disable_menu_item(M_FILE_PRINT);
|
||||
while ((k = mask().run()) != K_QUIT)
|
||||
{
|
||||
|
Loading…
x
Reference in New Issue
Block a user