习语言实现了动态库调用

习语言实现了动态库调用，可以访问所有WINDOWS API函数了：

示例代码如下：

1. #包含  “习语言系统.接口”
   
2. #包含  “习语言视窗.接口”
   
3. 类型定义  int ( 标准调用 *消息框函数类型)(
   
4.   HWND hWnd,          // handle of owner window
   
5.   LPCTSTR lpText,     // address of text in message box
   
6.   LPCTSTR lpCaption,  // address of title of message box
   
7.   UINT uType          // style of message box
   
8. );
   
9. 
   
10. 整数类型  主函数()
    
11. {
    
12. 消息框函数类型 消息框=空指针;
    
13. 模块证类型 hDLL;
    
14. 
    
15. hDLL=加载动态库("user32.dll");
    
16. 消息框=(消息框函数类型)获取函数地址(hDLL,"MessageBoxA");
    
17. 如果(消息框)
    
18. {
    
19.   消息框( 空指针, "呵呵，动态库调用成功了！" , "动态库调用测试", 0 );
    
20. }
    
21. 释放动态库(hDLL);
    
22. 返回 0;
    
23. }

复制代码

运行结果：

习语言实现了动态库调用