Problema con el vertScrollBar en un componente scrollBox

[federico1]

en un Formulario en el evento onMouseWhelDown pongo el siguiente codigoCódigo Delphi [-]whith form1.scrollBox1.VertScrollbar do
position := position +10



y anda de maravillas puedo mover el scroll vertical, pero cuando quiero hacer lo mismo en un scrollbox no pasa naranja, alguien me podría ayudar con este problema..
Muchas gracias

[Albano]

No se porqué este componente no "agarra el foco" (setfocus) automaticamente al darle click sobre el, pero lo que yo hice para que fucionara lo que quieres es poner el siguiente código en el evento on click del componente scrollbox:

Código Delphi [-]
procedure TForm2.ScrollBox1Click(Sender: TObject);
begin
  scrollbox1.SetFocus;
end;

Espero que te sirva.

[federico1]

un espectaculo te felicito, anduvo de maravillas.
Saludos.