Ayuda con ScrollBox...

[BuenaOnda]

Claro es el scrollBox de la Paleta Additional, no tengo ningun codigo en especial, solo selecciono un control fuera de los controles contenidos en el scrollBox, y el scrollBox se desplaza al principio(la barra de desplazamiento horizontal vuelve al principio), lo que pasa es que tengo una planilla tipo "Excel", dentro del scrollbox, y necesito que la columa selecionada en el grid, destinado a la planilla, permanesca ahi, pero cuando el usuario selecciona un control fuera del scrollBox, se pierde dicha ubicacion(osea la conserva, pero como el scrollBox, vuelve al principio, pareciera que se pierde.)..muchas gracias espero que me puedan ayudar....

[BuenaOnda]

hola amigos, existe otro componente parecido a este..??(scrollBox)...

[BuenaOnda]

.....

[[cHackAll]]

Solo tienes un componente dentro del ScrollBox? pues puedes manejarlo con la posicion de tal componente... cuando mueves el Scroll, es como si cambiaces la posición de los componentes que contiene...

Intenta con el OnEnter y OnExit del ScrollBox, y fíjate la posicion (Left, Top) del componente que tienes dentro.

Haber que se pinta... Saludos

[BuenaOnda]

Gracias cHackAll , lo voy a probar....

[BuenaOnda]

no.. no me resulta, probe de todas las maneras...

[BuenaOnda]

Hola..al fin solucione mi problemita.., resulta que el problema estaba cuando seleccionaba un TDatePicker y luego seleccionaba un Grid(ambos contenidos en el scrollBox), entonces lo q' hice fue, sencillamente, utilizar una variable booleana, que se evalua en el evento click del grid(que era el del problema)..muchas gracias amigos por su ayuda..

{**************************************************************************************************************************************}
procedure TForm1.dtpFechaUltCompraExit(Sender: TObject);
begin
    DesdeFecha:=True;
end;
{**************************************************************************************************************************************}
procedure TForm1.GrillaArticulosClick(Sender: TObject);
begin
     IF DesdeFecha THEN
     BEGIN
          ScrollBox1.HorzScrollBar.Position:=849;
          DesdeFecha:=False;
     END;
end;
{**************************************************************************************************************************************}
procedure TForm1.FormCreate(Sender: TObject);
begin
     DesdeFecha:=False;
end;
{**************************************************************************************************************************************}
end.