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

Java JNI 和 Delphi 相互調用（1）-JAVA 調用 DELPHI JNI 不是什麼新技術，英文全稱是：Java Native Interface，JAVA 本地化代碼接口。本地化代碼是指直接編譯成的與機器相關的二進制代碼，而不是 Java 字節碼之類的中間代碼。對於 JNI 的來龍去脈，不作介紹了，在 有介紹，另外 BAIDU/GOOGLE 有哪些信誉好的足球投注网站，也有大把的。這裏僅僅做一個入門級的介紹和實現。 JAVA 發佈的是 C/C++的接口文檔，DELPHI 想調用，首先要轉換成 DELPHI 的接口文檔。很幸運，已經有人完成此項工作了，請看網站： / ，在網站中下載 JNI-JEDI.zip ，解出來後，將 pas 文件放在我們要創建的工程的源文件一塊就可以了。好，下面準備進入主題。 一、先介紹 JAVA 調用 DELPHI 的過程 1、創建一個 J_Call_D.java，文件的內容： public class JavaCallDelphi { static { System.loadLibrary(JavaCallDelphi); } public native void sayHello(String s); public native String echo(String s); public native void showForm(String s); public static void main(String[] args) { JavaCallDelphi jc = new JavaCallDelphi(); System.out.println(java say: echo() returned:+jc.echo( 華夏上下午千年) ); jc.sayHello(橙子); jc.showForm(華夏上下午千年); } } 為了簡單，這裏就不創建“包”了。我們將這個 class 保存成無 BOM 的 UTF-8 格式文件。再用下面這個命令行進行編譯： javac -encoding utf-8 JavaCallDelphi.java 這個 class 現在是不能執行的，因為還沒有 JavaCallDelphi.dll 。 2、創建 Delphi 的庫工程 先提一下 JAVA 的類和方法的命名和 DELPHI 中的函數的命名的規律。 在 DELPHI 中的函數，以 Java 開頭，用下劃線將 Java 類的包名、類名和方法名連起來。本例中沒有包名，忽略了。同時，在 Win32 平台上，此過程的調用方式只能聲明為 stdcall。 例如，Delphi 中的方法： procedure Java_JavaCallDelphi_sayHello(PEnv: PJNIEnv; Obj: JObject; S: jstring); stdcall; 方法中的參數，前兩個是固定的，有什麼用請看後面的 DELPHI 的代碼，不深入講解；後面的參數就是 JAVA 和 DELPHI 之間傳送的參數。JAVA 的數據類型轉換到 DELPHI 的數據類型，在 jni.pas 中有定義。 JavaCallDelphi.dpr 的代碼： library JavaCallDelphi; uses windows, SysUtils, Classes, jni, Forms, StdCtrls; procedure Java_JavaCallDelphi_sayHello(PEnv: PJNIEnv; Obj: JObject; S: jstring); stdcall; var JVM: TJNIEnv; begin JVM:= TJNIEnv.Create(PEnv); Writeln(Delphi say:+JVM.UnicodeJStringToString(s)+,您好！看到效果了吧。); JVM.Free; end; function Java_JavaCallDelphi_echo(PEnv: PJNIEnv; Obj: JObject; arg: JString): JString; stdcall; var tmpStr, s1: String; JVM: TJNIEnv; begin JVM:= TJNIEnv.Create(PEnv); Write(Delphi say:jvm Version :); Write(jvm.MajorVersion); Write(.); Write(jvm.MinorVersion); Writeln(); s1:=JVM.UnicodeJStringToString(arg); tmpStr := 傳入的參數是: + s1 + 。; Writeln(Delphi sa