Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Как заставить появляться ScrollBox


Автор: Delphist 20.6.2009, 23:24
Есть форма TForm на ней расположен GroupBox внутри которого есть TButton, если я сужаю форму так, чтобы она нашла на кнопку, то скролбар почему-то не появляется. Как для моего примера заставить появляться горизонтальный скролбар, если контрол не вмешается на форме. см. рис.

Автор: Keeper89 20.6.2009, 23:38
Код

Form1.AutoScroll := True;

Автор: Delphist 21.6.2009, 00:01
Цитата(Keeper89 @  21.6.2009,  00:38 Найти цитируемый пост)
Form1.AutoScroll := True;

У меня и так это св-во = True, но не помагает, GroupBox.Align = alTop

Автор: Keeper89 21.6.2009, 00:09
Цитата(Delphist @  21.6.2009,  01:01 Найти цитируемый пост)
GroupBox.Align = alTop 

Тогда полоса прокрутки будет появляться только, если кнопка не находится в GroupBox'е. Иначе GroupBox подстраивается по размеры формы и полосы прокрутки эта "невидимость" кнопки уже его дело, а не формы.

Автор: hawkins 23.6.2009, 21:50
внутрь TGroupBox поместить TScrollBox, убрать у него бордюр и в него кидать компоненты

Автор: Delphist 24.6.2009, 09:32
Цитата(hawkins @  23.6.2009,  22:50 Найти цитируемый пост)
внутрь TGroupBox поместить TScrollBox, убрать у него бордюр и в него кидать компоненты 

Спасибо, я так понимаю это единственный возможный способ или есть еще?

Автор: hawkins 24.6.2009, 19:07
Цитата(Delphist @  24.6.2009,  09:32 Найти цитируемый пост)
Спасибо, я так понимаю это единственный возможный способ или есть еще?

а этот чем не нравится ? Если полоса прокрутки нужна внутри групбокса, по-моему самое оно.

Добавлено через 9 минут и 56 секунд
ну щас взглянул на рисунок. Тут можно и без скроллбокса, я в таких случаях включаю у кнопки провый анкор, левый выключаю  и у эдита
 включаю правый анкор. И при ресайзе все само выравнивается.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)