Как настроить «Align left», чтобы иметь преимущество над «Align Top» в Delphi 7?

Question

Я хочу выровнять определенный компонент по Align = alLeft на панели, занимая всю левую сторону панели. Затем также установите для другого компонента значение Align = AlTop, но оно не будет иметь преобладания над компонентом, выровненным по левому краю, чтобы он занимал только верхнюю часть панели, где компонент, который выровнен по левому краю, не занимает. (если это имеет какой-то смысл). Дело в том, что я много рисую на панели, поэтому я не могу добавить дополнительные панели поверх моей исходной панели, чтобы разделить панель и выполнить выравнивание, как обычно. Поэтому я хочу изменить работу Align для этой конкретной панели. Это вообще возможно? Я использую Delphi 7. Примерно так:

альтернативный текст http://www.freeimagehosting.net/uploads/2ede3a0023.jpg

Answer 1

Хорошо, если вы не можете добавить дополнительную панель с alClient под панелью с alTop,

тогда мой альтернативный вариант - использовать якоря, просто размещая панели там, где вы хотите, и добавляя akBottom к левой панели и akRight к верхней панели.

Последний вариант - изменить размер панелей самостоятельно в событии OnResize контейнера формы / родительского элемента.

Answer 2

Посмотрите на alCustom.Я не вижу, чтобы это использовалось в наши дни, но Demo2 из здесь может быть тем, что вам нужно.