本文整理自网络,侵删。
创建并调用 DLL(1)
//通过 DLL Wizard 建立:
library TestDLL;
uses
SysUtils,
Classes,
Dialogs;
{$R *.res}
//建立过程
procedure Test;
begin
ShowMessage('TestDLL.Test');
end;
//输出
exports
Test;
begin
end.
//在其他工程调用,如果不在一个工程组,需要在相同目录下、System32下或指定路径;
//声明可以在实现区或接口区,这里的函数名要一致,甚至大小写。
//调用测试:
procedure Test; external 'TestDLL.dll';
procedure TForm1.Button1Click(Sender: TObject);
begin
Test;
end;
相关阅读 >>
Delphi文件 fileopen 、fileseek等的用法(看红色字体)
Delphi: ttreeview 中禁止双击事件展开或关闭节点
Delphi tadodataset 加载数据到fdmemtable1
Delphi 10 seattle的android应用程序中使用参数启动服务
Delphi 如何在stringgrid中嵌入控件,如按钮等等
Delphi中如何判断mediaplayer控件所播放的文件是否播放完毕?
Delphi 判断uefi与 legacy bios启动模式
更多相关阅读请进入《Delphi》频道 >>