Foxtable(狐表)用户栏目专家坐堂 → 关于系统查找命令


  共有2872人关注过本帖树形打印复制链接

主题:关于系统查找命令

帅哥哟,离线,有人找我吗?
lk15502
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:706 积分:4908 威望:0 精华:0 注册:2016/5/17 12:03:00
关于系统查找命令  发帖心情 Post By:2016/12/6 13:53:00 [只看该作者]

菜单设计时增加了系统的查找命令:syscmd.edit.find()
使用时,打开的窗口太小,下面“区分大小写”的勾选只显示一半,请问老师如何解决?
还有外来禁止查找窗口的替换按钮,在计划管理加了以下代码,不知道和这个有没有关系:
Dim frm = windows.Forms.Form.activeform
If frm IsNot Nothing Then
    If frm.name = "class108" Then
        frm.controls("button2").enabled = False
    End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/12/6 14:21:00 [只看该作者]

屏蔽这段代码看效果不就知道了

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/6 14:43:00 [只看该作者]

加上控制窗口大小的代码不就好了?

 

Dim frm = windows.Forms.Form.activeform
If frm IsNot Nothing Then
    If frm.name = "class108" Then
        frm.controls("button2").enabled = False
        frm.Height = 200
    End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
lk15502
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:706 积分:4908 威望:0 精华:0 注册:2016/5/17 12:03:00
  发帖心情 Post By:2016/12/6 16:31:00 [只看该作者]

谢谢,frm.Height = 200正常列

 回到顶部