Ярослав может запилить типа маркета компонентов, с удовольствием бы покупал за разумную цену, многие замечал делают так удобно отсортировать все по категориям и выставить за денюжку, и всем хорошо, у людей и смысл был бы писать компоненты, и зарабатывать., и Delphi развивалась бы
TScrollBox автоматически высчитывает размер скролируемого контента. Поэтому, когда вы помещаете в него контрол и перемещаете его за видимые границы контрола (ViewPort), то TScrollBox пересчитывает размеры контента и добавляет полосы прокрутки. Отсюда следует важный факт, что размер контента TScrollBox зависит от внутернний контролов.
Вы пытаетесь добавить внутрь контента Layout, выравненный по всей области скроллбокса. Что вы вы этом случае ожидаете получить на выходе? Как я думаю, вы догадываетесь, что это выравнивание зависит от размер родительского контрола. А сам скролл бокс (предок), использует ваш Layout для определение размера контента. Так что в вашей ситуации TScrollBox для контента возьмет размер самого скролл бокса.
Чтобы вам добавить прокрутку нужно:
Взять за основу TVertScrollBox
Поместить внутрь TLayout (если хотите, можно без него напрямую складывать контролы). Выравнять его по верхнему краю. В этом случае вы сможете руками задать требуемую высоту, при получении новых данных
Когда вы будите знать размер вашего изображения, пересчитать высоту и обновить ее для вашего Layout.
kidrock1 получил реакцию от Brovin Yaroslav в Текст плюс картинка. Какие компоненты лучше выбрать