Ir ao topo

Tecnobyte

Logomarca da Tecnobyte
Contato por WhatsApp

WhatsApp

(69) 3421-6756

Contato por Telefone

(69) 3421-6756

(69) 3421-6757

Enviar mensagem

Enviar

mensagem

Contato por Facebook

Facebook

Vídeos

Vídeos

Atendimento de segunda a sexta, das 08h00 às 19h00 (horário de Brasília).

Banner

Delphi - Banco de Dados

Rolagem automática em ListBox

Inclua na seção uses: Windows, Messages
Para rolar o conteúdo de um ListBox automaticamente basta 
enviar uma mensagem WM_VSCROLL para a janela do componente.
No primeiro parâmetro da mensagem devemos passar o tipo de
rolagem que deverá ser feita, ou seja:

SB_LINEDOWN - Uma linha para baixo.
SB_LINEUP - Uma linha para cima.
SB_PAGEDOWN - Uma página para baixo.
SB_PAGEUP - Uma página para cima.
SB_TOP - Topo da lista.
SB_BOTTOM - Fim da lista.

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

Observações

A mensagem WM_VSCROLL aceita outros parâmetros. Pesquise no Help da API do Windows por WM_VSCROLL para obter mais informações.

O conteúdo desta página pode ajudar alguém? Compartilhe!