A abeng_2002 Unregistered / Unconfirmed GUEST, unregistred user! 2004-06-04 #1 我想在dataGrid的Column里增加一个属性 我自定义了一个TMyColumn继承TColumn， 然后在Published里面添加属性，但是没有效果 急，谢谢了
D duhai_lee Unregistered / Unconfirmed GUEST, unregistred user! 2004-06-04 #5 你不会是直接修改delphi源码吧， 那必须的做店工作。 重新建个.pas。 继承tcolumn。 应该没有问题的。
H hygsxy Unregistered / Unconfirmed GUEST, unregistred user! 2004-06-04 #8 我自定义了一个TMyColumn继承TColumn， 然后在Published里面添加属性，但是没有效果 //// 把它的属性，以及读写对象方法贴出来。
A abeng_2002 Unregistered / Unconfirmed GUEST, unregistred user! 2004-06-04 #9 TMyColumn = class(TColumn) private function GetListSource: TDataSource; procedure SetListSource(const Value: TDataSource); published property ListSource: TDataSource read GetListSource write SetListSource; end; 我使这么声明的 但是在那个属性编辑器产生的Column属性页里还是没有ListSource
TMyColumn = class(TColumn) private function GetListSource: TDataSource; procedure SetListSource(const Value: TDataSource); published property ListSource: TDataSource read GetListSource write SetListSource; end; 我使这么声明的 但是在那个属性编辑器产生的Column属性页里还是没有ListSource
P pr80 Unregistered / Unconfirmed GUEST, unregistred user! 2004-06-04 #10 function CreateColumns: TDBGridColumns;override; ... function XXGrid.CreateColumns：TDBGridColumns； begin Result := TDBGridColumns.Create(Self, TMyColumn); end； 搞掂!我没有测，不应该有什么问题
function CreateColumns: TDBGridColumns;override; ... function XXGrid.CreateColumns：TDBGridColumns； begin Result := TDBGridColumns.Create(Self, TMyColumn); end； 搞掂!我没有测，不应该有什么问题
