习语言实现了动态库调用,可以访问所有WINDOWS API函数了:
示例代码如下:
#包含 “习语言系统.接口”
#包含 “习语言视窗.接口”
类型定义 int ( 标准调用 *消息框函数类型)(
HWND hWnd, // handle of owner window
LPCTSTR lpText, // address of text in message box
LPCTSTR lpCaption, // address of title of message box
UINT uType // style of message box
);
整数类型 主函数()
{
消息框函数类型 消息框=空指针;
模块证类型 hDLL;
hDLL=加载动态库("user32.dll");
消息框=(消息框函数类型)获取函数地址(hDLL,"MessageBoxA");
如果(消息框)
{
消息框( 空指针, "呵呵,动态库调用成功了!" , "动态库调用测试", 0 );
}
释放动态库(hDLL);
返回 0;
}
运行结果: