cxtreelist问题

rainlovesea 2010-04-25 11:21:21
cxtreelist 的列不能切换是为什么呢
列的Editing, focusing全为True
切换行时，编辑的列是可以修改的，只是同一行，切换列，一点反应没有，这是为什么呢
...全文
447 18 打赏 收藏 转发到动态 举报
写回复
用AI写文章
18 条回复
切换为时间正序
请发表友善的回复…
发表回复
fu444 2012-01-10
  • 打赏
  • 举报
 回复
有可能
fu444 2012-01-10
  • 打赏
  • 举报
 回复
还是不能看到
rainlovesea 2010-05-12
  • 打赏
  • 举报
 回复
0,试试
无语孩童 2010-05-12
  • 打赏
  • 举报
 回复
我怀疑楼主 Tree关系 也就是数据绑定 有错了！
iamduo 2010-05-09
  • 打赏
  • 举报
 回复
OnEdited = DeTreeEdited
OnEditing = DeTreeEditing
OnFocusedColumnChanged = DeTreeFocusedColumnChanged
这几个事件中，应该有什么代码影响了。
比方说，被 cancel 了 或者 Handled 被设置成 true了。
单单是 cxTreeList的话，没有理由不能编辑的。

或许我分析的不对，你可以这样检验。
代码复制一份备份。
然后，把cxTreeList 一个个事件中的代码清掉再运行一下。

除了 单位 那一栏不敢肯定外，其他的肯定是可以编辑的。
wujinyuan 2010-05-07
  • 打赏
  • 举报
 回复
我也顶顶
rainlovesea 2010-05-03
  • 打赏
  • 举报
 回复
object DeTree: TcxTreeList
Left = 0
Top = 0
Width = 692
Height = 319
Align = alClient
Bands = <
item
Caption.Text = 'Band1'
Width = 977
end>
BufferedPaint = False
DragMode = dmAutomatic
LookAndFeel.NativeStyle = True
OptionsBehavior.AlwaysShowEditor = True
OptionsBehavior.CellHints = True
OptionsBehavior.AutomateLeftMostIndent = False
OptionsBehavior.Sorting = False
OptionsBehavior.FocusCellOnCycle = True
OptionsSelection.HideFocusRect = False
OptionsSelection.MultiSelect = True
OptionsView.CellAutoHeight = True
OptionsView.GridLines = tlglBoth
OptionsView.HeaderSingleLine = True
OptionsView.Indicator = True
PopupMenu = PopupMenu1
TabOrder = 0
OnCustomDrawCell = DeTreeCustomDrawCell
OnDragDrop = DeTreeDragDrop
OnDragOver = DeTreeDragOver
OnEdited = DeTreeEdited
OnEditing = DeTreeEditing
OnExit = DeTreeExit
OnFocusedColumnChanged = DeTreeFocusedColumnChanged
OnFocusedNodeChanged = DeTreeFocusedNodeChanged
OnKeyPress = DeTreeKeyPress
object tlcDeBh: TcxTreeListColumn
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnValidate = tlcDeBhPropertiesValidate
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '编号'
DataBinding.ValueType = 'String'
Width = 87
Position.ColIndex = 0
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeMc: TcxTreeListColumn
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '名称'
DataBinding.ValueType = 'String'
Width = 174
Position.ColIndex = 1
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeDw: TcxTreeListColumn
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '单位'
DataBinding.ValueType = 'String'
Width = 49
Position.ColIndex = 2
Position.RowIndex = 0
Position.BandIndex = 0
OnGetEditProperties = tlcDeDwGetEditProperties
end
object tlckey: TcxTreeListColumn
Visible = False
DataBinding.ValueType = 'String'
Width = 93
Position.ColIndex = 14
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeScj: TcxTreeListColumn
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = ',0.0000;-,0.0000'
Properties.ValidateOnEnter = True
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '市场价'
DataBinding.ValueType = 'Float'
Width = 75
Position.ColIndex = 3
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeCbdj: TcxTreeListColumn
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.ValidateOnEnter = True
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '成本价'
DataBinding.ValueType = 'String'
Width = 73
Position.ColIndex = 4
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeRgdj: TcxTreeListColumn
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.ValidateOnEnter = True
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '人工单价'
DataBinding.ValueType = 'String'
Width = 71
Position.ColIndex = 5
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeCldj: TcxTreeListColumn
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = ',0.00;-,0.00'
Properties.ValidateOnEnter = True
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '材料单价'
DataBinding.ValueType = 'String'
Width = 59
Position.ColIndex = 6
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeSbdj: TcxTreeListColumn
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.ValidateOnEnter = True
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '设备单价'
DataBinding.ValueType = 'String'
Width = 71
Position.ColIndex = 8
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeZcdj: TcxTreeListColumn
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.ValidateOnEnter = True
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '主材单价'
DataBinding.ValueType = 'String'
Width = 71
Position.ColIndex = 7
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeJxdj: TcxTreeListColumn
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.ValidateOnEnter = True
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '机械单价'
DataBinding.ValueType = 'String'
Width = 71
Position.ColIndex = 9
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeQtdj: TcxTreeListColumn
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.ValidateOnEnter = True
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '其他费'
DataBinding.ValueType = 'String'
Width = 72
Position.ColIndex = 10
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeGysm: TcxTreeListColumn
PropertiesClassName = 'TcxBlobEditProperties'
Properties.AlwaysSaveData = False
Properties.BlobEditKind = bekMemo
Properties.BlobPaintStyle = bpsText
Properties.MemoScrollBars = ssBoth
Properties.PictureGraphicClassName = 'TMetafile'
Properties.PopupWidth = 413
Properties.ShowExPopupItems = False
Properties.ShowPicturePopup = False
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '工艺说明'
DataBinding.ValueType = 'String'
Width = 294
Position.ColIndex = 11
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeSid: TcxTreeListColumn
Visible = False
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '含量'
DataBinding.ValueType = 'String'
Position.ColIndex = 31
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDePid: TcxTreeListColumn
Visible = False
DataBinding.ValueType = 'String'
Position.ColIndex = 31
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeLb: TcxTreeListColumn
Visible = False
Caption.Text = '节点类别'
DataBinding.ValueType = 'String'
Position.ColIndex = 31
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeIsNew: TcxTreeListColumn
Visible = False
Caption.Text = '是否新建的节点'
DataBinding.ValueType = 'String'
Position.ColIndex = 31
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeLrl: TcxTreeListColumn
Tag = 1
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.ValidateOnEnter = True
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '利润率(%)'
DataBinding.ValueType = 'String'
Width = 72
Position.ColIndex = 12
Position.RowIndex = 0
Position.BandIndex = 0
end
object tlcDeLr: TcxTreeListColumn
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.ValidateOnEnter = True
Caption.AlignHorz = taCenter
Caption.AlignVert = vaCenter
Caption.Text = '利润'
DataBinding.ValueType = 'String'
Width = 70
Position.ColIndex = 13
Position.RowIndex = 0
Position.BandIndex = 0
end
end
end
end
end
iamduo 2010-04-29
  • 打赏
  • 举报
 回复
view as text
iamduo 2010-04-29
  • 打赏
  • 举报
 回复
鼠标右键窗体
View as Form
贴出来。
rainlovesea 2010-04-28
  • 打赏
  • 举报
 回复
每天顶一顶
rainlovesea 2010-04-27
  • 打赏
  • 举报
 回复
就是点来点去，焦点还在以前的列，按说点后面的列，焦点应该移到后面列才对
Harryfin 2010-04-27
  • 打赏
  • 举报
 回复
一点反应都没是什么意思
rainlovesea 2010-04-27
  • 打赏
  • 举报
 回复
不是一列一列的，从一列点到别一列不叫切换吗
iamduo 2010-04-27
  • 打赏
  • 举报
 回复
应该是没人懂你所谓的“切换”是什么意思。
rainlovesea 2010-04-27
  • 打赏
  • 举报
 回复
还没人呀
rainlovesea 2010-04-26
  • 打赏
  • 举报
 回复
不是吧，没人回答
Acro Multi-Language Suite for Delphi Win32 4.0.11.2511(1)
2010/10/11, 4.0.11 ------------------------------------------------------------------------------------... 特别是cxTreeList/cxGrid元件，因为替换Column的Properties时也可能引起cxTreeList/cxGrid反复Repaint
关于NextGrid控件和cxTreeList控件中的子节点问题(未完待续)
关于NextGrid控件和cxTreeList控件中的子节点问题 本文来自http://blog.csdn.net/jqandjq，引用必须注明出处 本文章主要讨论NextSuit控件套件中的NextGrid控件和Express控件套件中的cxTreeList控件...
如何在Delphi 中使用 DevExpressVCL的 CxGrid与CxTreeList，编辑某列后计算另一列的值...
如何在Delphi 中使用 DevExpressVCL的 CxGrid与CxTreeList，编辑某列后计算另一列的值：比如 输入 单价，数量，计算金额。 参考： 1、输入 单价，数量，计算金额 ...
在代码中设置cxTreeList按多列排序
因为cxTreeList比cxGrid更简单易用，所以在一些需要显示非数据绑定列表的场合，我通常都会选择使用cxTreeList。cxTreeList和cxGrid一样，都支持多列排序，只需将OptionsBehavior.MultiSort属性设置成True就可以了。...
treeList关于checkbox常用操作
利用cxTreeList1.FindNodeByText()可以 查找 TopVisibleNode    7. 如何刷新 treelist 重新把数据源加载一遍 . 例如调用此方法 .   8. 如何刷新 treelist 数据源后 , 还让之前选中的选中 . 9. 如何获取 treelist ...
Delphi

5,391

社区成员

262,736

社区内容

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章