Delphi：各コントロール間のTFlowPanelマージン

Question

TFlowPanelを使用しています。実行時に可変数のコントロール（この例ではTButton）を作成しています。 各コントロール間に余白を作成したいが、それはまだ動作しません。

procedure TForm1.FormCreate(Sender: TObject); 
var 
    i: Integer; 
    LButton: TButton; 
begin 
    for i := 0 to 10 do 
    begin 
    LButton := TButton.Create(flwpnl1); // flwpnl1 is the TFlowPanel 
    LButton.Parent := flwpnl1; 
    LButton.Height := 20; 
    LButton.Caption := Format('Status%d', [i]); 
    LButton.Margins.Left := 20; 
    LButton.Margins.Top := 20; 
    LButton.Margins.Right := 20; 
    LButton.Margins.Bottom := 20; 
    end; 
end; 

任意のアイデアなぜですか？

よろしくと感謝、であろうと、あなたのコード内のようにするには、trueにAlignWithMarginsを設定する必要が デニス

Answer 1

：

LButton.AlignWithMargins := true;