TGroupBox + скроллинг

← →
ой (2005-10-14 11:05) [0]

как правильней научить TGroupBox скролить свой контент?

С одной стороны, хочется сохранить groupbox как контрол винды, с другой - чтобы контролы, помещаемые на него, на самом деле ложились на TScrollBar, который лежит на GroupBox"е (или что-то вроде этого).

← →
REA (2005-10-14 12:18) [1]

и в чем сложность?

← →
ой (2005-10-14 12:38) [2]

Сложность в том, что если я кладу на GroupBox TScrollBox (align=client и пр.), то потом, при создании контента в рантайме, все контролы распалагаются на GroupBox"е а не на ScrollBox"е

← →
Amoeba © (2005-10-14 12:39) [3]

> при создании контента в рантайме, все контролы распалагаются
> на GroupBox"е а не на ScrollBox"е

А какой Parent присваеваешь?

← →
ой (2005-10-14 13:28) [4]

В этом вся проблема, что Parent нужно подменять незаметно.

← →
Amoeba © (2005-10-14 15:15) [5]

> ой (14.10.05 13:28) [4]
> В этом вся проблема, что Parent нужно подменять незаметно.
>

Незаметно от кого? Почему это нужно делать тихой сапой?

← →
ой (2005-10-14 15:35) [6]

незаметно для контролов, которые размещаются на GroupBox"e...
потому что трудоемкость переписывания готового функцианала превышает даже реализацию контрола идентичнего GroupBox"у, но на основе ScollBox"a (отрисовать рамочки/заголовочки и не забыть про стили XP)... Поэтому хочется просто расширить мой MyGroupBox = class(TGroupBox) чтобы он сам содавал внутри себя скролл и всех детей складывал на него.

> незаметно для контролов, которые размещаются на GroupBox"e.
> ..

LOL

TGroupBox + скроллинг Найти похожие ветки