如何在没有固定宽度的情况下左右对齐控件?

时间:2016-08-13 16:32:05

标签: delphi alignment controls delphi-10.1-berlin

我在ScrollBox中有6个RichEdit控件。它们需要从上到下依次对齐,但我需要宽度不固定,因此当文本长度超出ScrollBox宽度时,我可以使用滚动条滚动查看全文。

如果我设置:

RichEdit1.Align := alTop;
RichEdit2.Align := alTop;
RichEdit3.Align := alTop;
RichEdit4.Align := alTop;
RichEdit5.Align := alTop;
RichEdit6.Align := alTop;

它们完美对齐并保持固定设计,因此无法意外移动它们,但宽度得到修复。不好。

如果我手动对齐它们,那么点击它们时它们就不会被修复并且可以移动,我需要一直重新安排。烦。

图片显示在所有RichEdits上,Align = alTop和width固定为ScrollBox宽度。 下面的示例是手动对齐所有RichEdits,宽度可以超出ScrollBox的宽度,但它们可以在设计中移动:

enter image description here

所以,我想把它们固定在左边,顶部和alTop一样,但不是要修复宽度。我怎样才能做到这一点?

0 个答案:

没有答案