topic-24092

Board index FiveWin for Harbour/xHarbour touch.prg

Posts: 6983

Joined: Fri Oct 07, 2005 07:07 PM

touch.prg
Posted: Tue May 15, 2012 12:52 PM

Hello Antonio,
if you slide a bit and then click you see the input dialog. Then if you enter PW and user you get into metroUI.
But metroUI is not operable any more.
If you slide till you see the icon and then click on the icon all is working.
Best regards,
Otto

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: touch.prg
Posted: Tue May 15, 2012 02:26 PM

Otto,

You may oWnd:Disable() the main window until the slider ends and then oWnd;Enable() it

regards, saludos

Antonio Linares
www.fivetechsoft.com

Otto

Posts: 6983

Joined: Fri Oct 07, 2005 07:07 PM

Re: touch.prg
Posted: Tue May 15, 2012 03:28 PM

Hello Antonio,
can you please show me where to put oWnd:Disable() and oWnd:Enable().
Best regards,
Otto

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: touch.prg
Posted: Tue May 15, 2012 05:56 PM

Otto,

I placed them insize Class TSliderMetro:

Code (fw): Select all Collapse

METHOD GoTop() CLASS TSliderMetro

   ::oBmp:oWnd:Disable()

   while ::oBmp:nTop > -ScreenHeight() - 100
      ::oBmp:nTop -= 10
      SysRefresh()
   end

   ::oBmp:oWnd:Enable()

return nil

Here it seems to be working fine, please test it, thanks

regards, saludos

Antonio Linares
www.fivetechsoft.com

FiveTech Support Forums

Continue the discussion