1、java使用jna调用delphi的dll
2、jna依赖包设置
<dependency>
<groupId>com.sun.jna</groupId>
<artifactId>jna</artifactId>
<version>3.0.9</version>
</dependency>
3、delphi代码
unit Unit1;
interface
uses Vcl.Dialogs;
procedure Hello(); stdcall;
function HelloUser(user: PAnsiChar): PAnsiChar; stdcall;
implementation
procedure Hello(); stdcall;
begin
ShowMessage('');
end;
function HelloUser(user: PAnsiChar): PAnsiChar; stdcall;
var
use:AnsiString;
begin
use := user;
Result := PAnsiChar('你好' + use);
end;
end.
4、java代码
interface CLibrary extends Library {
CLibrary INSTANCE = (CLibrary) loadLibrary("C:/Users/Administrator/Desktop/dll/delphiDll", CLibrary.class); // 引入库文件
public void Hello();
public String HelloUser(Stri