Miroirs/xwords
1
0
Fork 0
mirror of git://xwords.git.sourceforge.net/gitroot/xwords/xwords synced 2025-02-05 20:45:49 +01:00
Code Issues Projects Releases Packages Wiki Activity

don't scroll when menu's frontmost

Browse source
This commit is contained in:
ehouse 2004-11-13 16:01:30 +00:00
parent 4dd83e59dd
commit fbb08f7d84
2 changed files with 21 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
palm/funcfile.txt
View file

@ -209,3 +209,4 @@ FtrPtrFree
SysUIAppSwitch
FntBaseLine
WinSetScalingMode
WinGetDrawWindow

39
palm/palmmain.c
View file

@ -2714,6 +2714,8 @@ handleScrollInAsk( EventPtr event )
FieldPtr field;
UInt16 endPosition;
XP_ASSERT ( !!globals );
field = getActiveObjectPtr( XW_ASK_TXT_FIELD_ID );
switch ( event->eType ) {
@ -2727,20 +2729,23 @@ handleScrollInAsk( EventPtr event )
break;
case keyDownEvent:
switch ( event->data.keyDown.chr ) {
case pageUpChr:
case vchrRockerUp:
direction = winUp;
break;
case pageDownChr:
case vchrRockerDown:
direction = winDown;
break;
default:
result = false;
/* don't scroll a menu if open! */
if ( FrmGetWindowHandle( FrmGetActiveForm() ) == WinGetDrawWindow() ) {
switch ( event->data.keyDown.chr ) {
case pageUpChr:
case vchrRockerUp:
direction = winUp;
break;
case pageDownChr:
case vchrRockerDown:
direction = winDown;
break;
default:
result = false;
}
linesToScroll = 3;
scrollFromButton = true;
}
linesToScroll = 3;
scrollFromButton = true;
break;
case sclRepeatEvent: {
@ -2860,12 +2865,8 @@ palmask( PalmAppGlobals* globals, XP_UCHAR* str, XP_UCHAR* yesButton,
centerControl( form, XW_ASK_YES_BUTTON_ID );
}
/* if we're running before the first form goes up, globals won't be
available via the refcon, so don't install handler than requires 'em.
That or move globals to a Ftr.... */
if ( !!prevForm ) {
FrmSetEventHandler( form, handleScrollInAsk );
}
FrmSetEventHandler( form, handleScrollInAsk );
globals->prevScroll = 0;
if ( globals->isLefty ) {