Как сделать так, чтобы TForm отображал полосы прокрутки, когда BorderStyle = bsNone?

Question

Когда для BorderStyle установлено значение bsNone, в TForms обычно не отображаются полосы прокрутки, даже если AutoScroll имеет значение True, а позиции некоторых дочерних элементов управления превышают значения ClientWidth / ClientHeight.

Итак, есть ли какой-нибудь метод / хак, чтобы "заставить" TForm показывать полосы прокрутки (когда это необходимо), даже если для BorderStyle установлено значение bsNone?

Answer 1

Поместите TScrollBox в форму, сделайте его Align = Client, поместите все свои элементы управления в поле прокрутки.

Я всегда использую TScrollBox, потому что он очень гибкий.Вы можете добавить панель с выравниванием по верху к форме (вне поля прокрутки), и у вас появится не прокрученная область.Наличие прокрутки всей формы не всегда полезно и почти никогда не выглядит хорошо.