delphi package 把函数单元做成bpl调用

本文整理自网络，侵删。

 
unit MYfunction;

interface

function fun(i: Integer):Integer;stdcall;

implementation

function fun(i: Integer):Integer;stdcall;
begin
  Result := i+1;
end;

exports fun;
end.

之后New->Other->Package->Add  MYfunction.pas->save MyPackage.dpk->Compile->生成MyPackage.bpl

EXE调用：
function fun(i: Integer):Integer;stdcall;external 'MyPackage.BPL';

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(fun(1)));
end;
 

相关阅读 >>

Delphi 获取安卓机器码

Delphi 在windows右键菜单中加上关联

Delphi中使用可修改的常量

Delphi xe10 android 界面设计-个人心得

Delphi窗口显示和关闭的时候出现动画效果

Delphi 自带gif控件的动画图片加载和播放

Delphi 把字符串复制到剪贴板

dekphi 智能《疯狂刷新》辅助工具v3.1更新开源

Delphi 解决android 9上无法使用http协议

Delphi 根据扩展名的文件搜索

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi package 把函数单元做成bpl调用