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;
end;
end;
end;
nuevamente gracias, he aprendido de ti.