找回密码
 立即注册

QQ登录

只需一步,快速开始

chcchb
论坛元老   /  发表于:2012-9-3 14:40  /   查看:5616  /  回复:8
如题,combobox 在不锁住的情况下,不允许拷贝,剪切,(从combobox拷贝到文本框时,会把文本框改成combobox类型,;剪切后只剩下一个空的combobox)

同时还需屏蔽  文本框值 拷贝到 combobox (会出现,清空combobox现象)

8 个回复

倒序浏览
chcchb
论坛元老   /  发表于:2012-9-3 14:57:00
沙发
我现在是这样做的,还有其他方法吗?
  1.     Private Sub FpSpread1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles FpSpread1.KeyDown
  2.         Try
  3.             Dim col As Integer = FpSpread1_Sheet1.ActiveColumnIndex
  4.             If e.Control Then
  5.                 If e.KeyCode = Keys.X Then
  6.                     If (col - 4) Mod 5 = 0 OrElse (col - 6) Mod 5 = 0 Then
  7.                         e.Handled = True
  8.                     End If
  9.                 ElseIf e.KeyCode = Keys.C Then
  10.                     Dim inputMap As FarPoint.Win.Spread.InputMap
  11.                     inputMap = FpSpread1.GetInputMap(FarPoint.Win.Spread.InputMapMode.WhenAncestorOfFocused)
  12.                     inputMap.Put(New FarPoint.Win.Spread.Keystroke(Keys.V, Keys.Control), FarPoint.Win.Spread.SpreadActions.ClipboardPasteValues)
  13.                 ElseIf e.KeyCode = Keys.V Then
  14.                     Dim inputMap1 As FarPoint.Win.Spread.InputMap
  15.                     inputMap1 = FpSpread1.GetInputMap(FarPoint.Win.Spread.InputMapMode.WhenFocused)
  16.                     inputMap1.Put(New FarPoint.Win.Spread.Keystroke(Keys.V, Keys.Control), FarPoint.Win.Spread.SpreadActions.ClipboardPasteValues)
  17.                 End If
  18.             End If
  19.       
  20.         Catch ex As Exception
  21.            
  22.         End Try
  23.     End Sub
复制代码
回复 使用道具 举报
chcchb
论坛元老   /  发表于:2012-9-3 15:13:00
板凳
有没有在combobox列剪切时触发拷贝啊,我现在是把剪切给屏蔽了.
回复 使用道具 举报
chcchb
论坛元老   /  发表于:2012-9-3 16:13:00
地板
又发现一个问题,一开始没点查询时,combobox拷贝时只是值拷贝,如果查询后,再拷贝,就会把combobox单元格形式带过去...
回复 使用道具 举报
ZenosZeng讲师达人认证 悬赏达人认证
超级版主   /  发表于:2012-9-4 09:04:00
5#
chcchb 你好

从你的需求来看,还有一种解决方法供你参考,就是在拷贝/粘贴时,将ComboBox单元格设置为锁定,在拷贝/粘贴完成时在设置为之前的值。
回复 使用道具 举报
chcchb
论坛元老   /  发表于:2012-9-4 15:23:00
6#
唉,暂时先这样改吧..
回复 使用道具 举报
ZenosZeng讲师达人认证 悬赏达人认证
超级版主   /  发表于:2012-9-4 15:53:00
7#
回复 6楼chcchb的帖子

通常类型的需求,我们可以通过自定义的键盘快捷键操作来完成。但是你这个需求涉及的约束条件比较多,自定义需要考虑的因素也比较繁杂,所以给你推荐了以上方法。
回复 使用道具 举报
chcchb
论坛元老   /  发表于:2012-9-6 14:59:00
8#
今天再改障碍时,发现有个同事做的其中一版是通过设置属性来控制的..可以实现我说的要求,就是不知道是那几个属性的功能..
回复 使用道具 举报
ZenosZeng讲师达人认证 悬赏达人认证
超级版主   /  发表于:2012-9-6 15:51:00
9#
你在开发过程中,有没有使用源代码管理工具,你可以对之前版本和现在版本进行对比,看这期间都进行了哪些修改。
回复 使用道具 举报
您需要登录后才可以回帖 登录 | 立即注册
返回顶部