void uiupdatelistbox( a_list *list ) { int maxline; if( list->box == NULL ) { return; } maxline = uilistsize( list ); list->box->row = list->choice; list->box->gadget.total_size = maxline; if( list->box->gadget.total_size < (int)list->box->area.height ) list->box->gadget.total_size = (int)list->box->area.height; uisetgadget( &list->box->gadget, list->choice ); setstartline( list ); if( selectoutofrange( list->box ) ) { list->box->line = list->box->row; } setstartline( list ); uidrawgadget( &list->box->gadget ); uipaintlistbox( list ); }
EVENT uilistbox( EVENT ev, a_list *list, bool permanent ) { int listsize; int maxline; int newevent; a_list_info *box; int old_line; ORD old_row; bool close; if( Dclick ) { switch( ev ) { case EV_MOUSE_PRESS : Dclick = FALSE; /* must have gotten dlick without release */ /* fall through */ case EV_SCROLL_LINE_UP : case EV_SCROLL_LINE_DOWN : case EV_SCROLL_PAGE_UP : case EV_SCROLL_PAGE_DOWN : case EV_PAGE_UP : case EV_PAGE_DOWN : case EV_CURSOR_UP : case EV_CURSOR_DOWN : SelStart = FALSE; break; case EV_MOUSE_RELEASE : Dclick = FALSE; /* fall through */ default : return( ev ); } } close = FALSE; box = list->box; old_line = box->line; old_row = box->row; listsize = uilistsize( list ); if( listsize > box->area.height ) { maxline = listsize - box->area.height; } else { maxline = 0; } if( maxline > 0 ) { ev = uigadgetfilter( ev, &box->gadget ); } newevent = EV_NO_EVENT; switch( ev ) { case EV_MOUSE_DCLICK: Dclick = TRUE; case EV_MOUSE_PRESS: case EV_MOUSE_RELEASE: case EV_MOUSE_REPEAT: case EV_MOUSE_DRAG: { int row, col, mpos; mpos = getmouseregion( list, &row, &col ); newevent = ev; if( mpos == R_SEL ) { SelStart = TRUE; box->row = (ORD) row - box->area.row; box->row += box->line; } if( ev == EV_MOUSE_RELEASE ) { if( mpos == R_SEL ) { list->choice = list->box->row; newevent = EV_LIST_BOX_CHANGED; } if( SelStart ) { close = TRUE; SelStart = FALSE; } } else if( ev == EV_MOUSE_PRESS || ev == EV_MOUSE_DCLICK ) { if( mpos == R_SEL ) { if( ev == EV_MOUSE_DCLICK ) { newevent = EV_LIST_BOX_DCLICK; } } else { close = TRUE; } } else if( mpos == R_UP && box->line > 0 && SelStart ) { box->line--; box->row--; } else if( mpos == R_DOWN && box->line < maxline ) { box->line++; box->row++; } } break; case EV_CURSOR_UP : if( box->row > 0 ) { if( box->row == box->line ) { box->line--; } box->row--; list->choice = box->row; newevent = EV_LIST_BOX_CHANGED; } if( selectoutofrange( box ) ) { box->line = box->row; setstartline( list ); } break; case EV_SCROLL_LINE_UP : if( box->line > 0 ) { box->line--; } break; case EV_CURSOR_DOWN : if( box->row < listsize - 1 ) { if( box->row - box->line == box->area.height - 1 && box->line < maxline ) { ++box->line; } ++box->row; list->choice = box->row; newevent = EV_LIST_BOX_CHANGED; } if( selectoutofrange( box ) ) { box->line = box->row; setstartline( list ); } break; case EV_SCROLL_LINE_DOWN : if( box->line < maxline ) { box->line++; } break; case EV_PAGE_UP : if( box->row == box->line ) { if( box->line < ( box->area.height - 1 ) ) { box->line = 0; } else { box->line -= ( box->area.height - 1 ); } box->row -= old_line - box->line; } else { box->row = box->line; } if( box->row != old_row ) { list->choice = box->row; newevent = EV_LIST_BOX_CHANGED; } break; case EV_SCROLL_PAGE_UP : if( box->line < box->area.height ) { box->line = 0; } else { box->line -= box->area.height; } break; case EV_PAGE_DOWN : if( box->row == ( box->line + box->area.height - 1 ) ) { box->line += box->area.height - 1; if( box->line > maxline ) { box->line = maxline; } box->row += ( box->line - old_line ); } else { box->row = box->line + box->area.height - 1; } if( box->row != old_row ) { list->choice = box->row; newevent = EV_LIST_BOX_CHANGED; } break; case EV_SCROLL_PAGE_DOWN : box->line += box->area.height; if( box->line > maxline ) { box->line = maxline; } break; case EV_SCROLL_VERTICAL : box->line = box->gadget.pos; break; case EV_ALT_CURSOR_UP : close = TRUE; break; default : if( isalpha( ev ) ) { newevent = charselect( ev, list ); } else { newevent = ev; } break; } if( ( old_line != box->line ) && ( maxline > 0 ) ) { uisetgadget( &box->gadget, box->line ); } if( box->line != old_line || box->row != old_row ) { uipaintlistbox( list ); } if( !permanent && close ) { uiendlistbox( list ); newevent = EV_LIST_BOX_CLOSED; } return( newevent ); }
static void set_slider( int pos ) { uisetgadget( &vGadget, pos ); }