Buscar por:

Enviando comandos de rolagem vertical para um memo

Código

//Inclua na seção uses: Windows 

SendMessage(Memo1.Handle, WM_VSCROLL, SBPAGEDOWN, 0); 

{Onde:

Memo1.Handle = manipulador da janela do Memo1.

WM_VSCROLL = Mensagem do Windows - rolagem vertical.

SB_PAGEDOWN = Comanndo de rolagem - página para baixo.

Outros exemplos:

}

{ Página para cima } 

SendMessage(Memo1.Handle, WM_VSCROLL, SB_PAGEUP, 0); 

{ Linha para baixo } 

SendMessage(Memo1.Handle, WM_VSCROLL, SB_LINEDOWN, 0); 

{ Linha para cima } 

SendMessage(Memo1.Handle, WM_VSCROLL, SB_LINEUP, 0); {Além desta técnica existem API's do Windows que fazem um trabalho equivalente. }