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

Aggiunto il metod TForm_EC_editor::print() per l'anteprima di stampa.

Browse Source 
Aggiunti metodi hook_footer() e unhook_footer() per agganciare il
footer al body se columnwise.
Tolto il ricalcolo delle larghezze colonne in sezioni columnwise se
viene cambiato il font.


git-svn-id: svn://10.65.10.50/trunk@2377 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-01-03 14:40:13 +00:00
parent 8e6e27f3e5
commit 0fcb8f024c
1 changed files with 157 additions and 52 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

209
sc/sc3100.cpp
View File

@ -1,7 +1,11 @@
#ifndef __PRINTER_H #ifndef __PRINTER_H
#include <printer.h> #include <printer.h>
#endif #endif
#ifndef __PROGIND_H
#include <progind.h>
#endif
#include "../ba/baformed.h" #include "../ba/baformed.h"
#include "sc3.h" #include "sc3.h"
#include "sc3100a.h" #include "sc3100a.h"
@ -23,19 +27,27 @@ typedef struct {
class TForm_EC_editor : public TForm_editor class TForm_EC_editor : public TForm_editor
{ {
s_data _prm; s_data _prm;
TMask * _msk; // maschera di selezione sezione
protected: protected:
static bool cpy_handler(TMask_field& f, KEY k); static bool cpy_handler(TMask_field& f, KEY k);
static bool font_handler(TMask_field& f, KEY k); static bool font_handler(TMask_field& f, KEY k);
void load_fonts(TMask& m); void load_fonts();
void change_pos(char sc, pagetype pt); void change_pos(char sc, pagetype pt);
bool recalculate_positions(const char* name, int size); bool recalculate_positions(const char* name, int size);
void hook_footer_to_body(TPrint_section* f, TPrint_section* b);
void unhook_footer(TPrint_section* f);
virtual const char* selection_mask() const { return "sc3100a"; } virtual const char* selection_mask() const { return "sc3100a"; }
virtual bool ask_profile(); virtual bool ask_profile();
virtual bool edit(char s, pagetype p); virtual bool edit(char s, pagetype p);
virtual void print();
public: public:
TForm_EC_editor() {_msk = NULL;}
virtual ~TForm_EC_editor() {}
}; };
inline TForm_EC_editor& app() { return (TForm_EC_editor&) main_app();}
BOOLEAN XVT_CALLCONV1 wprms (long data) BOOLEAN XVT_CALLCONV1 wprms (long data)
{ {
s_data* st =(s_data*)data; s_data* st =(s_data*)data;
@ -91,7 +103,8 @@ bool TForm_EC_editor::cpy_handler(TMask_field& f, KEY k)
{ {
error_box("Errore %d in scrittura testata profilo.",frm.status()); error_box("Errore %d in scrittura testata profilo.",frm.status());
return TRUE; return TRUE;
} }
TProgind pi(50,"Copia in corso...",FALSE,FALSE,10);
rfr.zero();rfr.put("TIPOPROF",form); rfr.zero();rfr.put("TIPOPROF",form);
rfr.put("CODPROF",scod); //Profilo sorgente rfr.put("CODPROF",scod); //Profilo sorgente
rfr.read(_isgteq); rfr.read(_isgteq);
@ -102,7 +115,8 @@ bool TForm_EC_editor::cpy_handler(TMask_field& f, KEY k)
if (rfr_to_write.write() != NOERR) if (rfr_to_write.write() != NOERR)
rfr_to_write.rewrite(); rfr_to_write.rewrite();
rfr.read(_isgreat); rfr.read(_isgreat);
} }
pi.cancel();
if (rfr_to_write.status() != NOERR) if (rfr_to_write.status() != NOERR)
{ {
error_box("Errore %d in scrittura righe profilo.",rfr_to_write.status()); error_box("Errore %d in scrittura righe profilo.",rfr_to_write.status());
@ -156,7 +170,7 @@ bool TForm_EC_editor::font_handler(TMask_field& f, KEY key)
return TRUE; return TRUE;
} }
void TForm_EC_editor::load_fonts(TMask& m) void TForm_EC_editor::load_fonts()
{ {
const int MAX_FAMILIES = 128; const int MAX_FAMILIES = 128;
char* family[MAX_FAMILIES]; char* family[MAX_FAMILIES];
@ -172,7 +186,7 @@ void TForm_EC_editor::load_fonts(TMask& m)
if (form().fontname() == family[i]) font_found = TRUE; if (form().fontname() == family[i]) font_found = TRUE;
xvt_mem_free(family[i]); xvt_mem_free(family[i]);
} }
TList_field& lst = (TList_field&)m.field(F_SFONT); TList_field& lst = (TList_field&)_msk->field(F_SFONT);
lst.replace_items(pn1, pn2); lst.replace_items(pn1, pn2);
if (!font_found) warning_box("Il font %s non esiste per la stampante di default.",(const char*) form().fontname()); if (!font_found) warning_box("Il font %s non esiste per la stampante di default.",(const char*) form().fontname());
lst.set(form().fontname()); lst.set(form().fontname());
@ -181,22 +195,19 @@ void TForm_EC_editor::load_fonts(TMask& m)
void TForm_EC_editor::change_pos(char sc, pagetype pt) void TForm_EC_editor::change_pos(char sc, pagetype pt)
{ {
TPrint_section* sec = form().exist(sc, pt); TPrint_section* sec = form().exist(sc, pt);
if (sec != NULL) if (sec != NULL && !sec->columnwise())
{ {
sec->set_dirty(); sec->set_dirty();
for (word i = 0; i < sec->fields() ; i++) for (word i = 0; i < sec->fields() ; i++)
{ {
TForm_item& fi = sec->field(i); TForm_item& fi = sec->field(i);
short value = sec->columnwise() ? fi.y() : fi.x(); short value = fi.x();
if (value > 0 && (_prm.ratio != 1.0)) if (value > 0 && (_prm.ratio != 1.0))
{ {
real x_pos; real x_pos;
x_pos = value * _prm.ratio; x_pos = value * _prm.ratio;
x_pos.round(); x_pos.round();
if (sec->columnwise()) fi.x() = (short)x_pos.integer();
fi.y() = (short)x_pos.integer();
else
fi.x() = (short)x_pos.integer();
fi.set_dirty(); fi.set_dirty();
} }
} }
@ -228,14 +239,44 @@ bool TForm_EC_editor::recalculate_positions(const char* name, int size)
return TRUE; return TRUE;
} }
void TForm_EC_editor::hook_footer_to_body(TPrint_section* f, TPrint_section* b)
{
const word items = b->columnwise() ? f->fields() : 0;
b->reset_tabs();
for (word i=0;i<items;i++)
{
TForm_item& fi = f->field(i);
if (fi.x()>0) continue;
const TForm_item& fb = b->find_field(fi.id());
const int x = fb.x()+b->ofspc();
fi.x() = x;
fi.ofs() = 999;
}
}
void TForm_EC_editor::unhook_footer(TPrint_section* f)
{
const word items = f->fields();
for (word i=0;i<items;i++)
{
TForm_item& fi = f->field(i);
if (fi.ofs()==999)
{
fi.ofs() = 0;
fi.x() = 0;
}
}
}
bool TForm_EC_editor::edit(char s, pagetype p) bool TForm_EC_editor::edit(char s, pagetype p)
{ {
TMask m("sc3100c"); _msk= new TMask("sc3100c");
TString80 caption; TString80 caption;
bool dirty = FALSE; bool dirty = FALSE;
bool other = FALSE; bool other = FALSE;
KEY k; KEY k;
enable_menu_item(M_FILE_PRINT);
if (extra()) if (extra())
{ {
if (s == 'R') if (s == 'R')
@ -257,49 +298,52 @@ bool TForm_EC_editor::edit(char s, pagetype p)
if (!extra() || (extra() && other)) if (!extra() || (extra() && other))
{ {
// Carica i fonts disponibili nel listbox // Carica i fonts disponibili nel listbox
load_fonts(m); load_fonts();
printer().set_char_size(form().fontsize()); // Questo settera' il carattere della stampante a quello del form printer().set_char_size(form().fontsize()); // Questo settera' il carattere della stampante a quello del form
// Setta l'handler per il listbox dei fonts // Setta l'handler per il listbox dei fonts e per aggiornare i valori dello sfondo
m.set_handler(F_SFONT,font_handler); _msk->set_handler(F_SFONT,font_handler);
// carica i dati relativi all'offset // carica i dati relativi all'offset
m.set(F_SX, form().offset_x()); _msk->set(F_SX, form().offset_x());
m.set(F_SY, form().offset_y()); _msk->set(F_SY, form().offset_y());
TString ctp; TString ctp;
ctp << form().char_to_pos(); ctp << form().char_to_pos();
m.set(F_SCTP, ctp); _msk->set(F_SCTP, ctp);
m.set(F_SIPX, form().ipx()); _msk->set(F_SIPX, form().ipx());
m.set(F_SIPY, form().ipy()); _msk->set(F_SIPY, form().ipy());
_msk->set(F_FOOT_H,form().exist('F',odd_page)->height());
// carica i dati relativi ai flags (memorizzati in HEADER LAST) // carica i dati relativi ai flags (memorizzati in HEADER LAST)
if (form().exist('H', last_page)) if (form().exist('H', last_page))
{ {
TForm_item& flags = form().find_field('H',last_page,PEC_FLAGS); TForm_item& flags = form().find_field('H',last_page,PEC_FLAGS);
TToken_string tt(flags.prompt()); TToken_string tt(flags.prompt());
if (tt.get(0) != NULL) if (tt.get(0) != NULL)
m.set(F_SVALUTA,tt.get(0)); _msk->set(F_SVALUTA,tt.get(0));
if (tt.get(1) != NULL) if (tt.get(1) != NULL)
m.set(F_FINK,tt.get(1)); _msk->set(F_FINK,tt.get(1));
if (tt.get(2) != NULL)
_msk->set(F_MAXTOT,tt.get(2));
} }
// carica i dati relativi allo sfondo (memorizzati in GRAPHICS ODD) // carica i dati relativi allo sfondo (memorizzati in GRAPHICS ODD)
if (form().exist('G', odd_page)) if (form().exist('G', odd_page))
{ {
TForm_item& pict = form().find_field('G',odd_page,PEC_PICTURE); TForm_item& pict = form().find_field('G',odd_page,PEC_PICTURE);
m.set(F_BACKGROUND,pict.prompt()); _msk->set(F_BACKGROUND,pict.prompt());
m.set(F_BACKWIDTH,pict.width()); _msk->set(F_BACKWIDTH,pict.width());
m.set(F_BACKHEIGHT,pict.height()); _msk->set(F_BACKHEIGHT,pict.height());
m.set(F_BACKX,pict.x()); _msk->set(F_BACKX,pict.x());
m.set(F_BACKY,pict.y()); _msk->set(F_BACKY,pict.y());
} }
bool font_changed=FALSE; bool font_changed=FALSE;
while (TRUE) while (TRUE)
{ {
bool local_dirty = FALSE; bool local_dirty = FALSE;
k = m.run(); k = _msk->run();
if ((m.field(F_SFONT).dirty() || m.field(F_SSIZE).dirty())) if ((_msk->field(F_SFONT).dirty() || _msk->field(F_SSIZE).dirty()))
{ {
font_changed = TRUE; font_changed = TRUE;
TString ff(m.get(F_SFONT)); TString ff(_msk->get(F_SFONT));
dirty = recalculate_positions(ff, m.get_int(F_SSIZE)); // Va bene dirty e non local_dirty dirty = recalculate_positions(ff, _msk->get_int(F_SSIZE)); // Va bene dirty e non local_dirty
printer().set_char_size(m.get_int(F_SSIZE)); // Questo settera' il carattere della stampante a quello del form printer().set_char_size(_msk->get_int(F_SSIZE)); // Questo settera' il carattere della stampante a quello del form
} }
if (k==K_F3) local_dirty = edit_fincatura(); if (k==K_F3) local_dirty = edit_fincatura();
else if (k==K_F4) local_dirty = edit_formato_data(); else if (k==K_F4) local_dirty = edit_formato_data();
@ -338,26 +382,26 @@ bool TForm_EC_editor::edit(char s, pagetype p)
change_pos(s,odd_page); change_pos(s,odd_page);
} }
} }
if (local_dirty || m.dirty()!=0) dirty=TRUE; if (local_dirty || _msk->dirty()!=0) dirty=TRUE;
if (k==K_ESC || k==K_ENTER) if (k==K_ESC || k==K_ENTER)
break; break;
} // End of while } // End of while
} // End if } // End if
if (m.dirty() != 0 || dirty) if (_msk->dirty() != 0 || dirty)
{ {
form().fontname() = m.get(F_SFONT); form().fontname() = _msk->get(F_SFONT);
form().fontsize() = m.get_int(F_SSIZE); form().fontsize() = _msk->get_int(F_SSIZE);
form().offset_x() = m.get_int(F_SX); form().offset_x() = _msk->get_int(F_SX);
form().offset_y() = m.get_int(F_SY); form().offset_y() = _msk->get_int(F_SY);
form().char_to_pos() = m.get(F_SCTP)[0]; form().char_to_pos() = _msk->get(F_SCTP)[0];
form().ipx() = m.get_int(F_SIPX); form().ipx() = _msk->get_int(F_SIPX);
form().ipy() = m.get_int(F_SIPY); form().ipy() = _msk->get_int(F_SIPY);
if (form().exist('H', last_page)) if (form().exist('H', last_page))
{ {
TForm_item& flags = form().find_field('H',last_page,PEC_FLAGS); TForm_item& flags = form().find_field('H',last_page,PEC_FLAGS);
TString s(m.get(F_SVALUTA)); TString s(_msk->get(F_SVALUTA));
s << "|" << m.get(F_FINK); s << "|" << _msk->get(F_FINK); s << "|" << _msk->get(F_MAXTOT);
form().section('H',last_page).set_dirty(); form().section('H',last_page).set_dirty();
flags.set_prompt(s); flags.set_prompt(s);
flags.set_dirty(); flags.set_dirty();
@ -365,11 +409,11 @@ bool TForm_EC_editor::edit(char s, pagetype p)
if (form().exist('G', odd_page)) if (form().exist('G', odd_page))
{ {
TForm_item& pict = form().find_field('G',odd_page,PEC_PICTURE); TForm_item& pict = form().find_field('G',odd_page,PEC_PICTURE);
pict.set_prompt(m.get(F_BACKGROUND)); pict.set_prompt(_msk->get(F_BACKGROUND));
pict.width() = m.get_int(F_BACKWIDTH); pict.width() = _msk->get_int(F_BACKWIDTH);
pict.height() = m.get_int(F_BACKHEIGHT); pict.height() = _msk->get_int(F_BACKHEIGHT);
pict.x() = m.get_int(F_BACKX); pict.x() = _msk->get_int(F_BACKX);
pict.y() = m.get_int(F_BACKY); pict.y() = _msk->get_int(F_BACKY);
form().section('G',odd_page).set_dirty(); form().section('G',odd_page).set_dirty();
pict.set_dirty(); pict.set_dirty();
} }
@ -389,15 +433,74 @@ bool TForm_EC_editor::edit(char s, pagetype p)
} }
else else
form().write_profile(); form().write_profile();
} }
if (_msk!=NULL) delete _msk;
_msk = NULL;
disable_menu_item(M_FILE_PRINT);
if (!extra()) dispatch_e_menu(MENU_ITEM(14)); if (!extra()) dispatch_e_menu(MENU_ITEM(14));
return dirty; return dirty;
} }
void TForm_EC_editor::print()
{
TPrint_section* g = form().exist('G',odd_page);
TPrint_section* h = form().exist('H',odd_page);
TPrint_section* f = form().exist('F',odd_page);
TPrint_section* b = form().exist('B',odd_page);
bool remove = TRUE;
CHECK(b!=NULL && f!=NULL && h!=NULL,"Una o piu' sezioni non sono presenti");
// Rilegge la sezione grafica, perche' se e' la seconda volta che si
// stampa deve ripristinare la situazione iniziale.
// NB la sezione grafica deve contenere solo sfondo: le linee di fincatura
// qui generate non verranno salvate; analogamente il programma di stampa
// vero e proprio.
if (b->columnwise())
{
bool gen_fink = TRUE;
if (_msk != NULL)
{
TForm_item& pict = g->find_field(PEC_PICTURE);
pict.set_prompt(_msk->get(F_BACKGROUND));
pict.width() = _msk->get_int(F_BACKWIDTH);
pict.height() = _msk->get_int(F_BACKHEIGHT);
pict.x() = _msk->get_int(F_BACKX);
pict.y() = _msk->get_int(F_BACKY);
form().offset_y() = _msk->get_int(F_SY);
form().offset_x() = _msk->get_int(F_SX);
form()._background_mode = (bkg_mode)_msk->get_int(F_FINK);
if (form()._background_mode == none) gen_fink = FALSE;
if (printer().is_generic() && form()._background_mode == graphics) form()._background_mode = texto;
}
// Schiaffa dentro le stringhe di esempio per ogni campo che non ha prompt o riferimenti sul file
// per i campi memo si copia _memo in _prompt
const int formlen = printer().formlen();
const int h_height = h->height();
int rws[3] = {h_height,formlen-f->height(),0};
if (gen_fink)
form().genera_fincatura(odd_page,h_height-2,formlen,rws);
form().genera_intestazioni(odd_page,h_height-1);
} else
remove = FALSE;
hook_footer_to_body(f,b);
form().put_examples('H',odd_page);
form().put_examples('F',odd_page);
TForm_editor::print();
form().remove_examples('H',odd_page);
form().remove_examples('F',odd_page);
unhook_footer(f);
if (remove)
{
form().remove_temp_items('G',odd_page);
form().remove_temp_items('H',odd_page);
}
}
bool TForm_EC_editor::ask_profile() bool TForm_EC_editor::ask_profile()
{ {
KEY k; KEY k;
mask().set_handler(DLG_COPY,cpy_handler); mask().set_handler(DLG_COPY,cpy_handler);
disable_menu_item(M_FILE_PRINT);
while ((k = mask().run()) != K_QUIT) while ((k = mask().run()) != K_QUIT)
{ {
TLocalisamfile frm(LF_FORM); TLocalisamfile frm(LF_FORM);
@ -425,6 +528,7 @@ bool TForm_EC_editor::ask_profile()
if (fcode != 0 && if (fcode != 0 &&
yesno_box("Confermare la cancellazione del profilo %04ld%c", fcode,flng)) yesno_box("Confermare la cancellazione del profilo %04ld%c", fcode,flng))
{ {
TProgind pi(50,"Cancellazione in corso...",FALSE,FALSE,10);
frm.zero(); frm.zero();
frm.put("TIPOPROF", fform); frm.put("TIPOPROF", fform);
if (fcode != 0 ) if (fcode != 0 )
@ -439,6 +543,7 @@ bool TForm_EC_editor::ask_profile()
for ( ; rfr.get("CODPROF") == cod && rfr.get("TIPOPROF") == fform; rfr.next()) for ( ; rfr.get("CODPROF") == cod && rfr.get("TIPOPROF") == fform; rfr.next())
rfr.remove(); rfr.remove();
} }
pi.cancel();
mask().set(F_CODE,""); mask().set(F_CODE,"");
mask().set(F_CODEL,""); mask().set(F_CODEL,"");
mask().set(F_DESC,""); mask().set(F_DESC,"");