怎样对VSFlexGrid的单元格进行设置下拉框(不是对整列)?

时间:2022-10-29 16:22:48
请问,VSFlexGrid我想控制某个具体单元格使用下拉框,比如CELL(3,4)出现下拉框,其他cell不出现.请问该怎么设置.VSFlexGrid好像只能对col设置.

10 个解决方案

#1


如果按照在BeforeEdit时对需要的cell设置下拉框,不需要的就取消的思路,可是怎么取消呢?

#2


希望得到解答,自己顶

#3


没有人知道吗?自己再顶!

#4


1.在界面上加一下combobox,開始時.visible=false
2.當點到那相應的單元格時,combobox.visible=true
3.然後調節combobox.left=單元格.left,combobox.top=單元格.top
步驟就是這樣了,代碼我想難不到樓主吧。

#5


谢谢wing013 的回答。如果只能这样那我就不用这个控件了。难道VSFlexGrid自己不能实现吗?继续寻求解决办法。

#6


需要:ColComboList(col)="x|y|z"
不要:ColComboList(col)=""

#7


按照txyyanis说的搞定了!你就是俺的大救星啊!感谢wing013的参与。马上结帖。

#8


有与楼主同样的问题,看结贴了,却没见到合适的答案,楼主如果按照6楼的答案,岂不还是一列全都是下拉框吗
具体怎么回事请楼主在解释一下

#9


和8楼一样想法

#10


With fg
  lCol = .MouseCol
  lRow = .MouseRow
  
  If lRow = 1 Then
        .Editable = flexEDKbdMouse
        .SelectionMode = flexSelectionListBox
        .ColComboList(1) = fg.BuildComboList(m_DS.m_RS, "customerid")
        .ShowComboButton = flexSBFocus
        .ComboSearch = flexCmbSearchLists         
        .EditCell
        
  Else
         fg.ColComboList(1) = ""
  End If
End With

#1


如果按照在BeforeEdit时对需要的cell设置下拉框,不需要的就取消的思路,可是怎么取消呢?

#2


希望得到解答,自己顶

#3


没有人知道吗?自己再顶!

#4


1.在界面上加一下combobox,開始時.visible=false
2.當點到那相應的單元格時,combobox.visible=true
3.然後調節combobox.left=單元格.left,combobox.top=單元格.top
步驟就是這樣了,代碼我想難不到樓主吧。

#5


谢谢wing013 的回答。如果只能这样那我就不用这个控件了。难道VSFlexGrid自己不能实现吗?继续寻求解决办法。

#6


需要:ColComboList(col)="x|y|z"
不要:ColComboList(col)=""

#7


按照txyyanis说的搞定了!你就是俺的大救星啊!感谢wing013的参与。马上结帖。

#8


有与楼主同样的问题,看结贴了,却没见到合适的答案,楼主如果按照6楼的答案,岂不还是一列全都是下拉框吗
具体怎么回事请楼主在解释一下

#9


和8楼一样想法

#10


With fg
  lCol = .MouseCol
  lRow = .MouseRow
  
  If lRow = 1 Then
        .Editable = flexEDKbdMouse
        .SelectionMode = flexSelectionListBox
        .ColComboList(1) = fg.BuildComboList(m_DS.m_RS, "customerid")
        .ShowComboButton = flexSBFocus
        .ComboSearch = flexCmbSearchLists         
        .EditCell
        
  Else
         fg.ColComboList(1) = ""
  End If
End With