Gabrielling n. 27

git-svn-id: svn://10.65.10.50/trunk@2143 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-11-14 10:25:50 +00:00
parent 5ed26f14c8
commit f8ec43a066

View File

@ -333,7 +333,7 @@ bool BA3700_application::ult_class(TMask_field& f, KEY k)
TPagamento* pag = s->_pag; TPagamento* pag = s->_pag;
TSheet_field* shf = s->_sht; TSheet_field* shf = s->_sht;
if (k == K_TAB && pag) if (k == K_TAB && pag && f.focusdirty())
{ {
pag->set_default_ulc(f.get()); pag->set_default_ulc(f.get());
pag->set_sheet(*shf); pag->set_sheet(*shf);