Foxtable(狐表)用户栏目专家坐堂 → [求助]【查找】、【替换】的窗口名称变了吗?——已解决


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

主题:[求助]【查找】、【替换】的窗口名称变了吗?——已解决

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


加好友 发短信
等级:四尾狐 帖子:977 积分:6835 威望:0 精华:0 注册:2012/4/2 21:49:00
[求助]【查找】、【替换】的窗口名称变了吗?——已解决  发帖心情 Post By:2019/11/11 14:19:00 [显示全部帖子]

以前,为了改变【查找】、【替换】窗口的默认选项,根据论坛意见,对相应的按钮代码进行了以下补充:
Syscmd.Edit.find() ’原始的【查找】代码, 或 Syscmd.Edit.replace() '原始的【替换】代码
static sfrm = Nothing
Dim frm = Windows.forms.Form.ActiveForm
If frm IsNot Nothing Then
    If frm.name = "Class108" AndAlso (sfrm Is Nothing OrElse sfrm.tostring <> frm.tostring) Then
        frm.controls("MatchMode").Text = "任意位置"
        frm.controls("CaseSensitive").checked = False
frm.controls("ReplaceMode").Text = "匹配内容"
        sfrm = frm
    End If
End If
但是升级到最新版之后发现,默认选项并没有改变,再测试,发现frm.name<>"Class108",而是难以表述的符号
现在只能删除上述红色的条件以恢复正常。
请问:【查找】、【替换】的窗口名称悄悄地变了吗?狐爸能不能改进而不需开发者自编上述补充代码呢?

[此贴子已经被作者于2019/11/11 14:55:51编辑过]

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


加好友 发短信
等级:四尾狐 帖子:977 积分:6835 威望:0 精华:0 注册:2012/4/2 21:49:00
  发帖心情 Post By:2019/11/11 14:55:00 [显示全部帖子]

谢谢y2287958
蓝版:我所指的改进是:不需开发者自编上述补充代码。这个意见我已提过多年、多次了,结果很失望。
对于【查找】,【完全匹配】是【任意位置】的特例;对于【替换】,【全部内容】是【匹配内容】的特例。这点怎么就不能学学office呢?

[此贴子已经被作者于2019/11/11 15:00:55编辑过]

 回到顶部