07/01/2006

HorzScrollBar e VertScrollBar: pra que serve?

Pra que serve estas duas propriedades do form: HorzScrollBar e VertScrollBar?
como funcionam?


Raserafim

Respostas

07/01/2006

Marcio.theis

Serve basicamente para controlar o rolamento de um form da posição horizontal e vertical. Um exemplo de utilização seria:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
const
    PageDelta = 10;
begin
With VertScrollbar do
    if Key = VK_NEXT then
        Position := Position + PageDelta
    else 
        if Key = VK_PRIOR then
            Position := Position - PageDelta;
end;


Isto fará com que seja possível usar as teclas PgUp ou PgDown em um form.


Responder Citar