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 uigadgetfilter( EVENT ev, p_gadget g )
{
int m_anchor, m_linear;
int tmp;
EVENT newev;
ORD start;
int length;
int pos = 0;
if( uimouseinstalled() ) {
uiunprotect( g->win );
uimousepos( g->win, &m_anchor, &m_linear );
uiprotect( g->win );
if( g->dir == VERTICAL ) {
tmp = m_linear;
m_linear = m_anchor;
m_anchor = tmp;
}
if( ( ev == EV_MOUSE_PRESS ) || ( ev == EV_MOUSE_DCLICK ) ) {
if( ( m_anchor != g->anchor ) || ( m_linear < g->start ) ||
( m_linear > g->end ) || ( Pressed != NULL ) ) {
return( ev );
} else {
Pressed = g;
}
}
/* ignore everything if the gadget was not pressed */
if( Pressed != g ) return( ev );
length = g->end - g->start - 1;
/* don't send pagefoward followed by pagebackward, then forward */
/* ignore non-mouse events */
switch( ev ) {
case EV_MOUSE_PRESS :
StartPos = g->pos;
case EV_MOUSE_DCLICK :
RepeatEvent = EV_NO_EVENT;
case EV_MOUSE_REPEAT :
if( Drag ) {
break;
}
if( m_linear == g->start ) {
return( g->backward );
}
if( m_linear == g->end ) {
return( g->forward );
}
/* don't do page up and page down when total size is less than
or equal to the page size */
if( g->total_size <= g->page_size ) break;
start = g->linear; //CalcStart( g, g->pos, length );
if( m_linear < start ) {
if( RepeatEvent == g->pageforward ) {
return( EV_NO_EVENT );
} else {
RepeatEvent = g->pagebackward;
return( g->pagebackward );
}
}
if( m_linear > start ) {
if( RepeatEvent == g->pagebackward ) {
return( EV_NO_EVENT );
} else {
RepeatEvent = g->pageforward;
return( g->pageforward );
}
}
break;
case EV_MOUSE_DRAG :
/* don't do draging if total_size is less than or equal to the
page size or mouse is too far from gadget */
if( ( m_anchor < ( g->anchor -1 ) ) || ( m_anchor > (g->anchor+1) ) ||
( g->total_size <= g->page_size ) ) {
return( EV_NO_EVENT );
} else {
Drag = TRUE; /* so we don't send page events on MOUSE_REPEAT */
if( g->slider == EV_NO_EVENT ) {
return( EV_NO_EVENT );
}
}
case EV_MOUSE_RELEASE :
if( Pressed == NULL ) {
break;
}
if( g->slider == EV_NO_EVENT ) {
Drag = FALSE;
}
if( Drag ) {
if( ( m_anchor < ( g->anchor -1 ) ) || ( m_anchor > (g->anchor+1) ) ) {
/* note : must have got EV_MOUSE_RELEASE */
pos = StartPos;
setgadget( g, pos, FALSE );
m_linear = g->linear;
Drag = FALSE;
} else {
/* mouse drag to first scroll character or further left,
so pos = 0 */
if( m_linear <= ( g->start + 1 ) ) {
m_linear = g->start + 1;
pos = 0;
} else {
/* mouse drag to last scroll character or further right,
so pos = total_size */
if( m_linear >= ( g->end - 1 ) ) {
m_linear = g->end - 1;
pos = g->total_size - g->page_size;
} else {
pos = (int)((long)( m_linear - g->start ) *
(long)( g->total_size - g->page_size ) /
(long)length);
}
}
}
g->linear = m_linear;
uidrawgadget( g );
}
if( ( ev == EV_MOUSE_RELEASE ) || ( g->flags & GADGET_TRACK ) ) {
if( Drag ) {
StartPos = pos;
g->pos = pos;
g->linear = m_linear;
setlinear( g );
if( g->linear < m_linear ) {
g->pos++;
setlinear( g );
}
if( g->linear > m_linear ) {
g->pos--;
setlinear( g );
}
newev = g->slider;
} else {
newev = EV_NO_EVENT;
}
if( ev == EV_MOUSE_RELEASE ) {
Drag = FALSE;
Pressed = NULL;
}
} else {
newev = EV_NO_EVENT;
}
return( newev );
case EV_MOUSE_HOLD :
break;
default :
return( ev );
}
} else {
return( ev );
}
return( EV_NO_EVENT );
}
