ScrollBox1.HorzScrollBar.Visible := true howto

[arrayman]

Bueno casi que me da verguenza decir esto. en fin el asunto es que al estar los componente internos con align alclient(o altop) nunca llegan a ser mas grandes que la superficie del scrollbox (upss)

al final quedo sin hacer uso el codigo ecfisa (muchisimas gracias)
y aunque es un poco ñapa hago esto.

Código Delphi [-]
procedure TVisorFra.ScrollBox1Resize(Sender: TObject);
var
  i:integer;
  oResItem:TResItemFra;
begin
  for i := 0 to ScrollBox1.ControlCount - 1 do
  begin
    if ScrollBox1.Controls[i] is TResItemFra  then
    begin
      oResItem := TResItemFra(ScrollBox1.Controls[i]);
      oResItem.Align := alNone;
      oResItem.Top := i*oResItem.Height;
      oResItem.Width := 1980;
      //oresItem.Width := ScrollBox1.Width+ 2;
    end;
  end;
end;

nuevamente gracias, he aprendido de ti.

[ecfisa]

Hola arrayman.

No tenés por que disculparte. Me alegra mucho que hayas resuelto el problema y te agradezco que nos hayas presentado la solución.

Un saludo.