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;
|
long rec = -1;
|
||||||
switch (k)
|
switch (k)
|
||||||
{
|
{
|
||||||
|
|
||||||
|
case K_SPACE:
|
||||||
|
check(selected(), !checked(selected()));
|
||||||
|
break;
|
||||||
case K_ENTER:
|
case K_ENTER:
|
||||||
if (_disabled[_cur_rec])
|
if (_disabled[_cur_rec])
|
||||||
break;
|
break;
|
||||||
@ -861,9 +865,9 @@ bool TSheet::on_key(KEY key)
|
|||||||
{
|
{
|
||||||
switch(key)
|
switch(key)
|
||||||
{
|
{
|
||||||
case K_SPACE:
|
// case K_SPACE:
|
||||||
check(selected(), !checked(selected()));
|
// check(selected(), !checked(selected()));
|
||||||
break;
|
// break;
|
||||||
case K_F7:
|
case K_F7:
|
||||||
uncheck(-1);
|
uncheck(-1);
|
||||||
break;
|
break;
|
||||||
@ -1175,7 +1179,7 @@ TBrowse_sheet::TBrowse_sheet(TCursor* cursor, const char* fields,
|
|||||||
switch (c.class_id())
|
switch (c.class_id())
|
||||||
{
|
{
|
||||||
case CLASS_EDIT_FIELD:
|
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;
|
break;
|
||||||
case CLASS_REAL_FIELD:
|
case CLASS_REAL_FIELD:
|
||||||
e = &add_number(c.dlg(), 0, p, 1, y++, c.size(), flags);
|
e = &add_number(c.dlg(), 0, p, 1, y++, c.size(), flags);
|
||||||
|
Loading…
x
Reference in New Issue
Block a user