易语言数据库代码自动生成系统

系统结构:结构管理器,填充字段数据,询问保存,设置是否需要保存,插入字段,显示字段数,设置窗口标题,保存,改文件后缀,转存记录数据,记录管理器,取单独文件名,取文件名,设置窗口是否接受拖放,结束拖放,取被拖放文件名,SetWindowLong,CallWindowProc,外部_获得程序句柄,ChooseColor,

======结构管理器
           |  |
           |  |------ 结构管理器
           |  |
           |  |------ _字段名编辑框_内容被改变
           |  |
           |  |------ _字段类型组合框_列表项被选择
           |  |
           |  |------ _字段长度编辑框_内容被改变
           |  |
           |  |------ _字段列表框_列表项被选择
           |  |
           |  |------ _新建按钮_被单击
           |  |
           |  |------ _保存按钮_被单击
           |  |
           |  |------ _关闭按钮_被单击
           |  |
           |  |------ _结构管理窗口_创建完毕
           |  |
           |  |------ _结构管理窗口_可否被关闭
           |  |
           |  |------ 填充字段数据
           |  |
           |  |------ 询问保存
           |  |
           |  |------ 设置是否需要保存
           |  |
           |  |------ _删除按钮_被单击
           |  |
           |  |------ _插入按钮_被单击
           |  |
           |  |------ _向后插入按钮_被单击
           |  |
           |  |------ 插入字段
           |  |
           |  |------ _上移按钮_被单击
           |  |
           |  |------ _下移按钮_被单击
           |  |
           |  |------ 显示字段数
           |  |
           |  |------ _字段列表框_按下某键
           |  |
           |  |------ 设置窗口标题
           |  |
           |  |------ _打开按钮_被单击
           |  |
           |  |------ 保存
           |  |
           |  |------ 改文件后缀
           |  |
           |  |------ 转存记录数据
           |  |
           |  |------ _新建索引按钮_被单击
           |  |
           |  |------ _保存按钮1_被单击
           |  |
           |  |
======索引创建
           |  |
           |  |------ _索引创建窗口_创建完毕
           |  |
           |  |------ _创建按钮_被单击
           |  |
           |  |------ _关闭按钮_被单击
           |  |
           |  |
======记录管理器
           |  |
           |  |------ 记录管理器
           |  |
           |  |------ _记录管理窗口_创建完毕
           |  |
           |  |
======窗口程序集_易库代码自动生成
           |  |
           |  |------ _按钮_重新生成_被单击
           |  |
           |  |------ 取单独文件名
           |  |
           |  |------ 取文件名
           |  |
           |  |------ _按钮_一键生成_被单击
           |  |
           |  |------ _编辑框_全部路径_内容被改变
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮_加入常量_被单击
           |  |
           |  |------ _按钮_到首记录_被单击
           |  |
           |  |------ _按钮_上一记录_被单击
           |  |
           |  |------ _按钮_下一记录_被单击
           |  |
           |  |------ _按钮_到尾记录_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   设置窗口是否接受拖放
           |  |
           |  |---[dll]------   结束拖放
           |  |
           |  |---[dll]------   取被拖放文件名
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   CallWindowProc
           |  |
           |  |---[dll]------   外部_获得程序句柄
           |  |
           |  |---[dll]------   ChooseColor

调用的DLL命令:

.DLL命令 设置窗口是否接受拖放, 逻辑型, "shell32.dll", "DragAcceptFiles", , 设置窗口是否接受拖放
    .参数 hWnd, 整数型
    .参数 isAccept, 逻辑型, 传址, true:接收拖放

.DLL命令 结束拖放, , "shell32.dll", "DragFinish", , 结束拖放
    .参数 hDrop, 整数型, , hDrop取自WM_DROPFILES消息的wParam参数

.DLL命令 取被拖放文件名, 整数型, "shell32.dll", "DragQueryFileA"
    .参数 hDrop, 整数型, , hDrop取自WM_DROPFILES消息的wParam参数
    .参数 index_of_file, 整数型, , 如果为 -1,DragQueryFile返回已传送文件数
    .参数 buf, 文本型
    .参数 size_of_buf, 整数型, 传址

.DLL命令 SetWindowLong, 整数型, , "SetWindowLongA"
    .参数 hwnd, 整数型
    .参数 nIndex, 整数型
    .参数 dwNewLong, 子程序指针

.DLL命令 CallWindowProc, 整数型, , "CallWindowProcA"
    .参数 lpPrevWndFunc, 整数型
    .参数 hwnd, 整数型
    .参数 wmsg, 整数型
    .参数 wparam, 整数型
    .参数 lparam, 整数型

.DLL命令 外部_获得程序句柄, 整数型, , "GetModuleHandleA"
    .参数 模块名, 整数型

.DLL命令 ChooseColor, 整数型, "comdlg32.dll", "ChooseColorA"
    .参数 pChoosecolor, CHOOSECOLOR