delphi - 如何创建自定义形状更改对话框表单

Question

如何使用 Delphi XE3 在 Firemonkey 中创建自定义形状更改对话框表单。

我想创建两个布局，其中任何一个布局中都包含一些组件(按钮、编辑)，并且第一个布局中的一个按钮名为“显示/隐藏更多详细信息”， 所以这个按钮会做: 布局2.visible:=false

使用此layout2组件隐藏但不自动对齐和自动调整大小表单。 我该怎么做？ 这是关于我想做的事情的图像示例

Answer 1

看下面的代码:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form1.Height:=40;
end; 

使用此功能，当您单击更多(在本例中该按钮称为 Button1)时，表单会更改其高度。我设置了 40，但当然你可以使用其他整数值。