再来看几个基本数据转换函数 function JStringToString(const JStr: JString): string; begin if JStr = nil then Result := ‘‘ else Result:= JNIStringToString(TJNIResolver.GetJNIEnv, JNIString((JStr as ILocalObject).GetObjectID)); end; 将Java的字符串转换到Delphi中来,可见这个主要的还是通过TJNIResolver这个辅助类,获得实际JVM环境,然后通过这个来进行联系实现