Correzione per errore MI6050 sulla selezione degli sheet e
impostata la lunghezza massima di un edit field a 50 chrs sulle ricerche. git-svn-id: svn://10.65.10.50/trunk@3284 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
89d8b13edf
commit
e388f67815
@ -631,6 +631,10 @@ bool TSheet_control::event_handler(XI_OBJ* itf, XI_EVENT *xiev)
|
||||
long rec = -1;
|
||||
switch (k)
|
||||
{
|
||||
|
||||
case K_SPACE:
|
||||
check(selected(), !checked(selected()));
|
||||
break;
|
||||
case K_ENTER:
|
||||
if (_disabled[_cur_rec])
|
||||
break;
|
||||
@ -861,9 +865,9 @@ bool TSheet::on_key(KEY key)
|
||||
{
|
||||
switch(key)
|
||||
{
|
||||
case K_SPACE:
|
||||
check(selected(), !checked(selected()));
|
||||
break;
|
||||
// case K_SPACE:
|
||||
// check(selected(), !checked(selected()));
|
||||
// break;
|
||||
case K_F7:
|
||||
uncheck(-1);
|
||||
break;
|
||||
@ -1175,7 +1179,7 @@ TBrowse_sheet::TBrowse_sheet(TCursor* cursor, const char* fields,
|
||||
switch (c.class_id())
|
||||
{
|
||||
case CLASS_EDIT_FIELD:
|
||||
e = &add_string(c.dlg(), 0, p, 1, y++, c.size(), flags);
|
||||
e = &add_string(c.dlg(), 0, p, 1, y++, c.size(), flags, c.size() > 50 ? 50 : c.size() );
|
||||
break;
|
||||
case CLASS_REAL_FIELD:
|
||||
e = &add_number(c.dlg(), 0, p, 1, y++, c.size(), flags);
|
||||
|
Loading…
x
Reference in New Issue
Block a user