1. scroll in win32lib
- Posted by tone.skoda at zapo.net
Nov 20, 2001
This is a multi-part message in MIME format.
------=_NextPart_000_0009_01C171F6.889E8C30
charset="iso-8859-2"
attached is an example with vertical scrollbar. when scroll arrow is pressed
just once there appear 3 message boxes. why? there should be just 1 message
box.
------=_NextPart_000_0009_01C171F6.889E8C30
name="scroll.EXW"
filename="scroll.EXW"
-- ex01.exw
-- Last Changed on 1/06/2001 at 1:22:55 by Derek Parnell --
-- This opens a blank window
without warning
include win32lib.ew
with trace
object VOID
-- Set up the application's name
if setAppName("ex01") then end if
integer SimpleWin
integer Vertical_scroll
SimpleWin =3D create( Window, "Simple Window", 0, 0, 0, 200, 200,0 )
Vertical_scroll =3D create (VScroll, "Vertical scroll", SimpleWin, 0, 0, =
20, 100, 0)
setScrollRange (Vertical_scroll, 1, 10)
setScrollChange (Vertical_scroll, 1, 5)
setScrollPos (Vertical_scroll, 1)
procedure on_scroll (integer pos)
integer hour, minute, second
sequence date_return
date_return =3D date ()
hour =3D date_return [4]
minute =3D date_return [5]
second =3D date_return [6]
VOID =3D message_box (sprintf ("pos=3D%d, time=3D%2d:%2d:%2d", {pos, =
hour, minute, second}), "scroll", 0)
end procedure
onScroll [Vertical_scroll] =3D routine_id ("on_scroll")
procedure xx(atom keycode, atom keymod, atom hotid)
integer aaa
aaa =3D 1
closeWindow(SimpleWin)
end procedure
VOID =3D setWinHotKey({'Q', MOD_CONTROL}, routine_id("xx"))
WinMain( SimpleWin, Normal )
------=_NextPart_000_0009_01C171F6.889E8C30--
2. Re: scroll in win32lib
I just ran your example and i did not get the problem you mentioned.
I only got one message box when I clicked the scroll bar arrows.
-----------
Derek.
----- Original Message -----
From: <tone.skoda at zapo.net>
To: "EUforum" <EUforum at topica.com>
Subject: scroll in win32lib
>
> attached is an example with vertical scrollbar. when scroll arrow is
pressed
> just once there appear 3 message boxes. why? there should be just 1
message
> box.
>
>
>
>
3. Re: scroll in win32lib
- Posted by tone.skoda at zapo.net
Nov 20, 2001
strange
maybe we are using different dlls
----- Original Message -----
From: "Derek Parnell" <ddparnell at bigpond.com>
To: "EUforum" <EUforum at topica.com>
Subject: Re: scroll in win32lib
>
> I just ran your example and i did not get the problem you mentioned.
> I only got one message box when I clicked the scroll bar arrows.
> -----------
> Derek.
> ----- Original Message -----
> From: <tone.skoda at zapo.net>
> To: "EUforum" <EUforum at topica.com>
> Sent: Wednesday, November 21, 2001 5:07 AM
> Subject: scroll in win32lib
>
>
> > attached is an example with vertical scrollbar. when scroll arrow is
> pressed
> > just once there appear 3 message boxes. why? there should be just 1
> message
> > box.
> >
> >
>
>
>
4. Re: scroll in win32lib
I'm running on Windows ME.
----- Original Message -----
From: <tone.skoda at zapo.net>
To: "EUforum" <EUforum at topica.com>
Subject: Re: scroll in win32lib
>
> strange
> maybe we are using different dlls
>
> ----- Original Message -----
> From: "Derek Parnell" <ddparnell at bigpond.com>
> To: "EUforum" <EUforum at topica.com>
> Sent: Tuesday, November 20, 2001 10:45 PM
> Subject: Re: scroll in win32lib
>
>
> > I just ran your example and i did not get the problem you mentioned.
> > I only got one message box when I clicked the scroll bar arrows.
> > -----------
> > Derek.
> > ----- Original Message -----
> > From: <tone.skoda at zapo.net>
> > To: "EUforum" <EUforum at topica.com>
> > Sent: Wednesday, November 21, 2001 5:07 AM
> > Subject: scroll in win32lib
> >
> >
> > > attached is an example with vertical scrollbar. when scroll arrow is
> > pressed
> > > just once there appear 3 message boxes. why? there should be just 1
> > message
> > > box.
> > >
> > >
>
>
>
5. Re: scroll in win32lib
- Posted by tone.skoda at zapo.net
Nov 21, 2001
Well, I'm running Windows 2000.
Can anyone who is reading this with Windows 2000 test that program?
----- Original Message -----
From: "Derek Parnell" <ddparnell at bigpond.com>
To: "EUforum" <EUforum at topica.com>
Subject: Re: scroll in win32lib
>
> I'm running on Windows ME.
>
> ----- Original Message -----
> From: <tone.skoda at zapo.net>
> To: "EUforum" <EUforum at topica.com>
> Sent: Wednesday, November 21, 2001 10:25 AM
> Subject: Re: scroll in win32lib
>
>
> > strange
> > maybe we are using different dlls
> >
> > ----- Original Message -----
> > From: "Derek Parnell" <ddparnell at bigpond.com>
> > To: "EUforum" <EUforum at topica.com>
> > Sent: Tuesday, November 20, 2001 10:45 PM
> > Subject: Re: scroll in win32lib
> >
> >
> > > I just ran your example and i did not get the problem you mentioned.
> > > I only got one message box when I clicked the scroll bar arrows.
> > > -----------
> > > Derek.
> > > ----- Original Message -----
> > > From: <tone.skoda at zapo.net>
> > > To: "EUforum" <EUforum at topica.com>
> > > Sent: Wednesday, November 21, 2001 5:07 AM
> > > Subject: scroll in win32lib
> > >
> > >
> > > > attached is an example with vertical scrollbar. when scroll arrow is
> > > pressed
> > > > just once there appear 3 message boxes. why? there should be just 1
> > > message
> > > > box.
> > > >
> > > >
>
>
>
