FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour ScrollBar
Posts: 172
Joined: Fri Oct 07, 2005 12:00 PM
ScrollBar
Posted: Wed Jan 18, 2006 05:11 PM

Hola

¿Alguien sabe como cambiar el tamaño del botón deslizante del scrollBar?

Un saludo

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
ScrollBar
Posted: Wed Jan 18, 2006 08:17 PM
Paco,

Descomenta estas líneas en la clase TScrollBar:

METHOD SetPage( nSize, lReDraw ) CLASS TScrollBar

/*
   local nFlags

   DEFAULT lRedraw := .f.

   if ! Empty( ::hWnd )
      nFlags = SB_CTL
   else
      if ::lVertical
         nFlags = SB_VERT
      else
         nFlags = SB_HORZ
      endif
   endif
   SetScrollInfo( If( ! Empty( ::hWnd ), ::hWnd, ::oWnd:hWnd ),;
                  nFlags, nSize, lReDraw )
*/

return nil
regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion