Pascal & Delphi « TPanel внутри TScrollBox — как сделать ширину 100% с учетом прокруток?

Итак, есть скроллбокс, в котором динамически (т.е. в runtime!!!) создаются панели, выстраиваемые друг за дружкой по вертикали, причем высота каждой панели индивидуальна и вычисляется на основании содержимого и ширины панели. А ширина панели, в свою очередь, должна быть максимальной внутри скроллбокса. Так вот, когда суммарная высота панелей превышает высоту скроллбокса, появляется вертикальная полоса прокрутки, которая находится НАД панелями, перекрывая их!
Как сделать так, чтобы ширина вложенных панелей всегда была равна клиентской ширине скроллбокса за вычетом прокруток (которые то видны, то нет)?

1 ответов


В событие OnResize() компонента проверяй, видима полоска прокрутки или нет, И если есть, то увеличивай ширину компонента на ширину полосы прокрутки