|
函数 整型 入口函数_窗口() //窗口程序入口函数, 程序启动优先进入此函数
//在进入UI前需要运行的代码写在这里
系统消息框(0, "启动窗口_开始绘制", "", 1)
// 1. 从资源中查找名为 "界面dll" 的资源
正整型 资源大小 = 0
空类型 *资源地址 = RC资源查找文件("界面dll", &资源大小) // 假设资源 ID 已定义为 "界面dll"
调试输出("资源大小 " + 到文本(资源大小))
调试输出("资源地址 " + 到文本(资源地址))
如果 (资源地址 == NULL)
调试输出("资源加载失败")
返回 -1
// 2. 获取程序运行目录
文本型 运行目录 = 取运行目录()
文本型 文件路径 = 运行目录 + "\\XCGUI.dll"
//"D:" + "\\XCGUI.dll"
调试输出("文件路径 " + 文件路径)
// 3. 写入文件到运行目录
文件类 文件对象
逻辑型 打开状态 = 文件对象.打开写入(文件路径)
调试输出("打开状态 " + 到文本(打开状态))
整型 写入大小 = 文件对象.写入数据(资源地址, 资源大小)
调试输出("写入大小 " + 到文本(写入大小))
文件对象.关闭()
如果 (写入大小 != 资源大小)
调试输出("文件写入不完整")
返回 -3
调试输出("资源已成功释放到:", 文件路径)
炫彩_初始化(真) //初始化设计器使用的炫彩界面库
炫彩_启用自动重绘UI(真) //当修改UI后将自动调用重绘函数更新UI
#加载资源文件 //指示在此处自动加载资源文件, 根据项目属性设置, 从文件 或 从内存
主窗口.运行() //运行上面设计器生成的类中的运行()函数
//在进入UI后需要运行的代码写在这里
炫彩_运行() //运行消息循环
炫彩_退出() //程序退出释放界面库资源
返回 0
|
|