quarta-feira, 17 de junho de 2009

Enviando comandos de rolagem vertical para um memo

//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. }

Nenhum comentário:

Postar um comentário