TScaledLayout锚点

时间:2013-09-05 03:38:01

标签: delphi firemonkey

在一个表格中,我将布局对齐为alContent,在里面我有一个新的按钮对齐为alRight。问题是当我缩小比例时,方向总是从右到左。当我减小布局的比例时,是否有任何方法按钮继续右对齐,相对于从左到右改变方向的窗体?

enter image description here

1 个答案:

答案 0 :(得分:0)

我认为这不是一个明确的解决方案,但到目前为止,我没有找到另一种替代方案,当我改变比例时按比例重新定位TScaledLayout。

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
  with ScaledLayout1
  do Position.X := OriginalWidth - (OriginalWidth / (1 / TrackBar1.Value));
end;