|
楼主 |
发表于 2024-8-16 18:27:57
|
显示全部楼层
我用的就是大漠综合工具,版本号是7.2336,权限为真 该32位都改了也不行找不到,我用 我的文档些了两个很简的字偶找不到 就一个字库 点击就生成了,这个是点击生成字库里面的东西l4808851D21E4388C0313C2E04808011820C407843106614C64188610820000000000000001002004009012024448891122244488911A23444889110007FCC0801000004018010$登录$2.1.273$26
下面是代码
<火山程序 类型 = "通常" 版本 = 1 />
包 火山.程序
类 启动类 <公开 基础类 = 窗口程序类>
{
变量 主窗口对象 <类型 = 我的主窗口>
方法 启动方法 <公开 类型 = 整数>
{
主窗口对象.创建主窗口 ()
返回 (1)
}
}
# ===0
类 我的主窗口 <基础类 = 窗口 注释 = "样例主窗口" @视窗.布局 = "client_size = \"500, 300\"" 标题 = "我的主窗口">
{
变量 按钮1_识字 <类型 = 按钮 折叠2 隐藏值属性 = "0" @视窗.布局 = "id = 101\r\npos = \"21, 14, 104, 40\"" 标题 = "识字">
变量 大漠 <类型 = 大漠类>
方法 我的主窗口_创建完毕 <接收事件 类型 = 整数 注释 = "当本组件及其中所有子组件均被创建完毕后发送此事件.">
参数 来源对象 <类型 = 我的主窗口 注释 = "提供事件产生的具体来源对象">
参数 标记值 <类型 = 整数 注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
{
免注册大漠 (取运行目录 () + "\\DmReg.dll", 取运行目录 () + "\\dm.dll", 1)
大漠.创建对象 ()
调试输出 ("取大漠的版本号", 大漠.Ver ())
大漠.置全局路径 (取运行目录 () + "\\res")
大漠.字库_置文件 (0, "自定义字库.txt")
返回 (0)
}
方法 按钮_被单击 <接收事件 类型 = 整数 注释 = "当按钮被单击后发送此事件">
参数 来源对象 <类型 = 按钮 注释 = "提供事件产生的具体来源对象">
参数 标记值 <类型 = 整数 注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
{
如果 (来源对象 == 按钮1_识字)
{
变量 x <类型 = 整数类>
变量 y <类型 = 整数类>
大漠.置全局路径 (取运行目录 () + "\\res")
大漠.字库_置序号 (0)
大漠.字库_置文件 (0, "自定义字库.txt")
大漠.找字 (391, 225, 449, 265, "登录", "c9211e-202020,-1|-12|db6d6b-202020", 1, x, y)
调试输出 (x)
调试输出 (y)
}
返回 (0)
}
}
|
|