逛逛版主RTF列，原帖地址：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=63410&authorid=0&page=0&star=1

例子中的项目事件 ：AfterOpenProject

Dim c1g As C1FlexGrid.C1FlexGrid = Tables("表A").Grid

c1g.Cols("第三列").Editor = New zxbTableRTFCol()

AddHandler c1g.OwnerDrawCell, AddressOf _flex_OwnerDrawCell

我把第一句中的：Tables("表A").Grid   

改成：Forms("窗口1").Controls("RecordGrid1").Tables.Grid

全部代码如下：

Dim c1g As C1FlexGrid.C1FlexGrid = Forms("窗口1").Controls("RecordGrid1").Tables.Grid

c1g.Cols(1).Editor = New zxbTableRTFCol()      ’记录窗口第2列

AddHandler c1g.OwnerDrawCell, AddressOf _flex_OwnerDrawCell

提示出错。请老师指教是否可行？谢谢！

附件：

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:rtf列.table