易语言组件自动注册器源码

易语言组件自动注册器系统结构:注册控件_,程序等待,传输进度条,查找文件,目录是否存在_,取短路径名,取短文件名_,载入动态连接库_,释放动态连接库_,取DLL函数地址_,执行窗口程序_,取文件扩展名_, ======窗口程序集1 || ||------__启动窗口_创建完毕 || ||------注册控件_ || ||------程序等待 || ||------__启动窗口_将被销毁 || ||------__启动窗口_可否被关闭 || ||------_图形按钮1_被单击 || ||------传输进度条 || ||------查找文件 || || ======调用的Dll || ||---[dll]------目录是否存在_ || ||---[dll]------取短路径名 || ||---[dll]------取短文件名_ || ||---[dll]------载入动态连接库_ || ||---[dll]------释放动态连接库_ || ||---[dll]------取DLL函数地址_ || ||---[dll]------执行窗口程序_ || ||---[dll]------取文件扩展名_ 调用的DLL命令: .DLL命令目录是否存在_,逻辑型,"shlwapi.dll","PathIsDirectoryA" .参数路径文本,文本型 .DLL命令取短路径名,整数型,"kernel32","GetShortPathNameA" .参数全路径名,文本型 .参数短路径名,文本型 .参数短路径长度,整数型 .DLL命令取短文件名_,整数型,"comdlg32.dll","GetFileTitleA" .参数文件完整路径,文本型 .参数名称缓冲区,文本型 .参数缓冲区长度,短整数型 .DLL命令载入动态连接库_,整数型,,"LoadLibraryA" .参数name,文本型 .DLL命令释放动态连接库_,,,"FreeLibrary" .参数hddl .DLL命令取DLL函数地址_,整数型,,"GetProcAddress",,失败返回0 .参数hModule,,,为HMODULE结构，是所调用DLL模块的句柄 .参数lpProcName,文本型,,为LPCSTR结构，是函数名称 .DLL命令执行窗口程序_,整数型,"user32","CallWindowProcA" .参数lpPrevWndFunc,整数型 .参数hwnd,整数型 .参数msg,整数型 .参数wParam,整数型 .参数lParam,整数型 .DLL命令取文件扩展名_,整数型,"shlwapi.dll","PathFindExtensionA" .参数文件路径,文本型