with ABuilder.AddContainer(amHorizRight) do begin Height := 32; AddControl(TButton, '{"Caption":"确定","ModalResult":1}'); AddControl(TButton, '{"Caption":"取消","ModalResult":2}'); end; ABuilder.ShowModal; if ABuilder.ModalResult = 1 then begin // ABuilder.Count = 1 ?