multirow行中的按钮buttoncell是否具有类似ContainsFocus的属性

收藏

multirow行中的按钮buttoncell是否具有类似ContainsFocus的属性:

在multirow行中有textboxcell T1 以及 buttoncell B1

在multirow的CellValidating事件中对T1做了一些验证,即当焦点从T1移开时,会验证T1的输入是否合法.然后会报个Message,并将焦点返回T1.

现在要求,在当焦点从T1移到B1按钮去按下B1按钮的时候,不做这个验证(移到其他控件时依然要做,只是移到B1不做).
如果B1是Multirow外的按钮,就可以用B1.ContainsFocus来判断,是否T1移开后是到B1.

但B1是Multirow中的buttoncell,它不具备这个ContainsFocus属性,请问怎么来做呢?

barrylei · barrylei

在模板里把ButtonCell的Selectable设置成False，就可以了。

chenke79 · chenke79

非常感谢!

chenke79 · chenke79

追加问一下

我在multirow的CellContentClick中给Cell赋值,,,

有时怎么看不到新赋的值?

Me.GcMultiRow1.Rows(e.RowIndex).Cells("txtSyohinCd").Value = "XXXXX"

barrylei · barrylei

能给我一个小Sample来重现你的问题吗？信息有点少。

chenke79 · chenke79

在做了这步操作后出的问题:
"在模板里把ButtonCell的Selectable设置成False，就可以了。 "

barrylei · barrylei

是不是txtSyohinCd正在编辑状态的时候就看不到新赋的值，如果txtSyohinCd不再编辑状态就可以？

chenke79 · chenke79

似乎是的,怎么解决之?

barrylei · barrylei

参考下面的Codes
第一个条件：单击是一个ButtonCell
第二个条件：你要设置值的Cell是txtSyohinCd
第三个条件：当前GcMultiRow在编辑状态

Private Sub gcMultiRow1_CellContentClick_1(sender As Object, e As CellEventArgs)
If e.CellName = "buttonCell1" AndAlso Me.gcMultiRow1.CurrentCell.Name = "txtSyohinCd" AndAlso Me.gcMultiRow1.IsCurrentCellInEditMode Then
Me.gcMultiRow1.EditingControl.Text = "Your value"
End If
End Sub

复制代码

chenke79 · chenke79

按上面代码改了,还是有点问题

如果我是焦点先落在txtSyohinCd,再按按钮的话,设置值没问题

如果我焦点没有停在txtSyohinCd,再按按钮,值仍保持原来的值,没有变为新的.

		自动登录	找回密码
密码			立即注册

multirow行中的按钮buttoncell是否具有类似ContainsFocus的属性

12 个回复

回复 4# chenke79 的帖子

活字格认证