易语言数据库应用例程源码

系统结构:关闭数据库,打开数据库,读数据,退出数据库,文字到数字类型,数字到文字类型,置高级表格表头,置高级表格序号,EDB到高级表格,高级表格自动列宽,文件关联,取关联文件文件名,设置高级表格类型,插入处理,清空记录,取短路径,置文本长度,生成代码,GetShortPathNameA,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _打开_被选择
           |  |
           |  |------ _保存_被选择
           |  |
           |  |------ _另存为_被选择
           |  |
           |  |------ 关闭数据库
           |  |
           |  |------ _新建_被选择
           |  |
           |  |------ _重建EDB关联_被选择
           |  |
           |  |------ __启动窗口_尺寸被改变
           |  |
           |  |------ _自动列宽_被选择
           |  |
           |  |------ _退出_被选择
           |  |
           |  |------ _向后插入多行_被选择
           |  |
           |  |------ _向前插入多行_被选择
           |  |
           |  |------ _修改_被选择
           |  |
           |  |------ _高级表格1_结束编辑
           |  |
           |  |------ _高级表格1_被单击
           |  |
           |  |------ _删除行_被选择
           |  |
           |  |------ _高级表格1_按下某键
           |  |
           |  |------ _时钟删除_周期事件
           |  |
           |  |------ _刷新_被选择
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ _设置密码_被选择
           |  |
           |  |------ _以文本类型读入_被选择
           |  |
           |  |
======功能集
           |  |
           |  |------ 打开数据库
           |  |
           |  |------ 读数据
           |  |
           |  |------ 退出数据库
           |  |
           |  |------ 文字到数字类型
           |  |
           |  |------ 数字到文字类型
           |  |
           |  |------ 置高级表格表头
           |  |
           |  |------ 置高级表格序号
           |  |
           |  |------ EDB到高级表格
           |  |
           |  |------ 高级表格自动列宽
           |  |
           |  |------ 文件关联
           |  |
           |  |------ 取关联文件文件名
           |  |
           |  |------ 设置高级表格类型
           |  |
           |  |------ 插入处理
           |  |
           |  |------ 清空记录
           |  |
           |  |------ 取短路径
           |  |
           |  |
======窗口程序新建
           |  |
           |  |------ _窗口新建_创建完毕
           |  |
           |  |------ 置文本长度
           |  |
           |  |------ _高级表格1_结束编辑
           |  |
           |  |------ _按钮创建_被单击
           |  |
           |  |------ 生成代码
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetShortPathNameA

调用的DLL命令:

.DLL命令 GetShortPathNameA, 整数型, "kernel32.dll", "GetShortPathNameA", , 返回装载到lpszShortPath缓冲区的字符数量。如lpszShortPath的长度不足，不能容下文件名，就返回需要的缓冲区长度
    .参数 lpszLongPath, 文本型, , 指定欲获取短路径名的那个文件的名字。可以是个完整路径，或者由当前目录决定
    .参数 lpszShortPath, 文本型, , 指定一个缓冲区，用于装载文件的短路径和文件名，需先分配空间。
    .参数 cchBuffer, 整数型, , lpszShortPath缓冲区长度，请设置为260。