XInitXCGUI ({ }) ' 初始化界面库
.如果真 (是否为调试版 () ＝ 假)
XC_EnableDebugFile (假) ' 关闭界面调试文件输出
.如果真结束
XC_LoadResource (L (取运行目录 () ＋ “资源文件resource.res”), L (取运行目录 () ＋ “”)) ' 加载资源文件
hwindow ＝ XC_LoadLayout (L (“布局文件layout.xml”), 0) ' 加载布局文件
XWnd_AdjustLayout (hwindow) ' 调整窗口布局
' XWnd_RegEventC (hwindow, 5, &窗口拖动) ' 注册窗口拖动事件
XWnd_RegEventC (hwindow, #XWM_PAINT_DISPLAY, &窗口改变位置) ' 注册窗口改变位置事件
代码编辑框初始化 ()
XWnd_ShowWindow (hwindow, #SW_SHOW) ' 显示窗口
XRunXCGUI () ' 运行界面库
XExitXCGUI () ' 释放界面库