[JNA系列]Java调用Delphi编写的Dll之实例Delphi使用PWideChar
2024-08-27 11:29:15
Delphi代码
unit UnitDll; interface uses
StrUtils, SysUtils, Dialogs; function DoBusinessWide(pvData: PWideChar): PWideChar; stdcall; implementation function DoBusinessWide(pvData: PWideChar): PWideChar; stdcall;
var
lvData: WideString;
begin
ShowMessage(pvData);
lvData := pvData;
ShowMessage(lvData);
lvData := lvData + FormatDateTime('YYYYMMDDHHMMSSZZZ',Now);
Result := PWideChar(lvData);
ShowMessage(Result);
end; end.
Java调用代码
package com.jna.demo; import com.sun.jna.Library;
import com.sun.jna.Native;
import com.sun.jna.WString; public class JnaDemo { public interface RtcPubLibrary extends Library{
RtcPubLibrary instance = (RtcPubLibrary) Native.loadLibrary("JavaDll", RtcPubLibrary.class);
public WString DoBusinessWide(char[] pvData);
} public static void main(String[] args) {
System.setProperty("jna.encoding", "GBK");
StringBuilder sBuilder = new StringBuilder();
sBuilder.append("123测试");
char[] pvData = sBuilder.toString().toCharArray();
WString lvData = RtcPubLibrary.instance.DoBusinessWide(pvData);
System.out.println("Wstring-->" + lvData);
} }
正常返回结果:Wstring-->123测试20160825160441882
最新文章
- .NET LINQ 限定符操作
- 这两年在QQGame写过的游戏(2012.7.15-2014.8.25)
- sdut 2165:Crack Mathmen(第二届山东省省赛原题,数论)
- python入门语法总结 zz
- 关于servlet是在什么时候初始化的个人总结
- python手记(26)
- 如何从google play下载app应用,直接下载apk
- 24C01的IIC 讀寫的c51程式
- [Ubuntu]在Ubuntu下搭建自己的源服务器
- win32 sdk绘制ListBox控件
- SE 2014年4月5日
- android控件 下拉刷新pulltorefresh
- 清空SQL Server数据库中所有表数据的方法
- POJ-3522 Slim Span(最小生成树)
- 多线程:深入Thread.sleep
- java并发编程笔记3-同步容器&;并发容器&;闭锁&;栅栏&;信号量
- Pygal之世界地图绘制from pygal.i18n import COUNTRIES 报错的解决办法
- ns2.34 移植MFLOOD协议时出现的问题
- (Set) 人见人爱A-B HDU2034
- “数学口袋精灵”第二个Sprint计划(第五天)
热门文章
- 事务内执行sql修复的简易模板
- [转]SQL SERVER 函数组合实现oracle的LPAD函数功能
- python学习:Windows 下 Python easy_install 的安装
- ISP图像调试工程师——tone Mapping(ISP)
- SQL 备份还原单个表
- [HTML5] Build Flexible HTML with HTMLTemplates using Slots and Web Components
- Android Annotations浅析
- ffmpeg怎么样处理网络流
- 【转】spring MVC入门示例(hello world demo)
- react 执行 yarn build 后 去除 .js.map 文件