Ver Mensaje Individual
  #2  
Antiguo 27-09-2005
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
Mas o menos puedes enfocarlos así:
Código Delphi [-]
 if RealizandoDragDrop then
 if (Y > frmppal.clientHeight -10) and // si estamos en el borde inferior
 (frmppal.VertScrollBar.Position >=10) then //si la barra no está al principio

    frmppal.VertScrollBar.Position:=frmppal.VertScrollBar.Position-10;
        // movemos la barra

Quizás tengas que poner un timer para que no corra mucho la barra.

EDITO: Esto lo pones en el FrameMouseMove

Un saludo

Última edición por Lepe fecha: 27-09-2005 a las 12:53:55.
Responder Con Cita