Java JNI 和 Delphi 相互调用分析和总结.docx

JavaJNI和Delphi相互調用（1）-JAVA調用DELPHI

JNI不是什麼新技術，英文全稱是：JavaNativeInterface，JAVA本地化代碼接口。本地化代碼是指直接編譯成的與機器相關的二進制代碼，而不是Java字節碼之類的中間代碼。對於JNI的來龍去脈，不作介紹了，在有介紹，另外BAIDU/GOOGLE搜索，也有大把的。這裏僅僅做一個入門級的介紹和實現。

JAVA發佈的是C/C++的接口文檔，DELPHI想調用，首先要轉換成DELPHI的接口文檔。很幸運，已經有人完成此項工作了，請看網站：/，在網站中下載JNI-JEDI.zip，解出來後，將pas文件放在我們要創建的工程的源文件一塊就可以了。好，下面準備進入主題。

一、先介紹JAVA調用DELPHI的過程

1、創建一個J_Call_D.java，文件的內容：

publicclassJavaCallDelphi {static{

System.loadLibrary(JavaCallDelphi);

}

public

native

voidsayHello(Strings);

public

native

Stringecho(Strings);

public

native

voidshowForm(Strings);

publicstaticvoidmain(String[]args){JavaCallDelphijc=newJavaCallDelphi();

System.out.println(java say:echo()returned:+jc.echo(華夏上下午千年));jc.sayHello(橙子);

jc.showForm(華夏上下午千年);

}

}

為了簡單，這裏就不創建“包”了。我們將這個class保存成無BOM的UTF-8格式文件。再用下面這個命令行進行編譯：javac-encodingutf-8JavaCallDelphi.java

這個class現在是不能執行的，因為還沒有JavaCallDelphi.dll。2、創建Delphi的庫工程

先提一下JAVA的類和方法的命名和DELPHI中的函數的命名的規律。

在DELPHI中的函數，以Java開頭，用下劃線將Java類的包名、類名和方法名連起來。本例中沒有包名，忽略了。同時，在Win32平台上，此過程的調用方式只能聲明為stdcall。

例如，Delphi中的方法：

procedureJava_JavaCallDelphi_sayHello(PEnv:PJNIEnv;Obj:JObject;S:jstring);stdcall;

方法中的參數，前兩個是固定的，有什麼用請看後面的DELPHI的代碼，不深入講解；後面的參數就是JAVA和DELPHI之間傳送的參數。JAVA的數據類型轉換到DELPHI的數據類型，在jni.pas中有定義。

JavaCallDelphi.dpr的代碼：libraryJavaCallDelphi;

useswindows,SysUtils,Classes, jni,Forms,StdCtrls;

procedureJava_JavaCallDelphi_sayHello(PEnv: PJNIEnv;Obj:JObject;S:jstring);stdcall;varJVM:TJNIEnv;

begin

JVM:=TJNIEnv.Create(PEnv);

Writeln(Delphisay:+JVM.UnicodeJStringToString(s)+,您好！看到效果了吧。);JVM.Free;

end;

functionJava_JavaCallDelphi_echo(PEnv: PJNIEnv;Obj:JObject;arg:JString):JString;stdcall;vartmpStr,s1:String; JVM:TJNIEnv;

begin

end;

JVM:=TJNIEnv.Create(PEnv);Write(Delphisay:jvmVersion:);Write(jvm.MajorVersion); Write(.);Write(jvm.MinorVersion);

Writeln();s1:=JVM.UnicodeJStringToString(arg);

tmpStr:=傳入的參數是:+s1+