Rif. mod. 95/51. Aggiunto membro _arrange e metodo TForm::set_arrange().
Si puo' ora dire al form se effettuare il posizionamento o no. Fatto e provato sulla stampa versamenti. git-svn-id: svn://10.65.10.50/trunk@2120 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
bce96f977c
commit
bf258bead0
@ -2394,7 +2394,8 @@ bool TForm::print(long from, long to)
|
||||
if (pr.printtype() == screenvis)
|
||||
error_box("Stampa a video selezionata. Non e' possibile effettuare il posizionamento.");
|
||||
else
|
||||
arrange_form();
|
||||
if (_arrange)
|
||||
arrange_form();
|
||||
}
|
||||
|
||||
pr.setheaderhandler(header_handler); // Setta handlers
|
||||
@ -2675,7 +2676,7 @@ TForm::TForm(const char* name, const char* code, int lev, const char* desc)
|
||||
: _name(name), _code(code), _relation(NULL), _cursor(NULL), _rel_desc(NULL),
|
||||
_isnew(FALSE), _editlevel(lev), _desc(desc), _fontname("Courier New"),
|
||||
_fontsize(12), _x(0), _y(0), _char_to_pos('\0'), _ipx(0), _ipy(0), _fpx(0),
|
||||
_dirty(FALSE)
|
||||
_arrange(TRUE), _dirty(FALSE)
|
||||
{
|
||||
main_app().begin_wait();
|
||||
|
||||
|
@ -114,7 +114,8 @@ class TForm : public TObject
|
||||
bool _lastpage; // I am about to print the last page?
|
||||
|
||||
bool _isnew; // new form
|
||||
bool _isbase; // base form (.frm file)
|
||||
bool _isbase; // base form (.frm file)
|
||||
bool _arrange; // if TRUE perform arranging every time
|
||||
int _editlevel; // Edit permission
|
||||
TString _desc; // form description
|
||||
|
||||
@ -179,6 +180,7 @@ public:
|
||||
int& fpx() { return _fpx; }
|
||||
bool dirty() const { return _dirty; }
|
||||
void set_dirty(bool d = TRUE) { _dirty = d; }
|
||||
void set_arrange(bool arng = TRUE) { _arrange = arng ; }
|
||||
|
||||
// if code == NULL it's a base form
|
||||
// otherwise it's integrated by a file definition
|
||||
|
Loading…
x
Reference in New Issue
Block a user