cxGrid動態建立的列裡動態建立事件的方法
阿新 • • 發佈：2019-02-01
......
private
{ Private declarations }
procedure cxGrid1DBTableView1ColumnPropertiesButtonClick(
Sender: TObject; AButtonIndex: Integer);
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.cxGrid1DBTableView1ColumnPropertiesButtonClick(
Sender: TObject; AButtonIndex: Integer);
begin
//.......
end;
procedure TForm1.cxButton1Click(Sender: TObject);
begin
//設定第3列為按鈕屬性:
cxGrid1DBTableView1.Columns[3].PropertiesClass:=TcxButtonEditProperties;
//關聯點選事件：
(cxGrid1DBTableView1.Columns[3].Properties as TcxButtonEditProperties).OnButtonClick
:=cxGrid1DBTableView1ColumnPropertiesButtonClick;
end;
......