delphi - 如何在运行时更改TcxGridColumn的PopupWidth？

Question

我正在使用TcxGridColumn作为备忘录（blobEditKinf = bekMemo），PopupHeight上的属性PopupWidth和RepositoryItem固定为200/250，如何在运行时将其更改为另一个值如果我无法在代码中访问这些属性：

MyColumn.RepositoryItem.Properties

Answer 1

通过对列的Properties属性进行适当的转换，可以非常容易地做到这一点。
在下面的内容中，我的BlobEdit列用于Description备注字段
TClientDataSet：

procedure TForm1.FormCreate(Sender: TObject);
begin
  [...]
  if cxGrid1DBTableView1Description.Properties is TcxBlobEditProperties then begin
    TcxBlobEditProperties(cxGrid1DBTableView1Description.Properties).PopUpWidth := 500;
    TcxBlobEditProperties(cxGrid1DBTableView1Description.Properties).PopUpHeight := 500;
  end;
end;

许多TcxGrid列编辑器都具有 Properties类型，这些类型具有特定于类型的子属性，您可以通过与上述类似的方式来访问它们。