依星源码资源网,依星资源网

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 570|回复: 0

Python入门:Python调用Delphi写的Dll

[复制链接] |主动推送主动推送

3718

主题

3757

帖子

4609

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
4609
发表于 2022-6-17 16:15:49 | 显示全部楼层 |阅读模式
Python入门:Python调用Delphi写的Dll

Delphi版本Delphi 10 Seattle

Delphi代码


  1. unit Unit1;

  2. interface

  3. function testint(): integer; stdcall;
  4. function testpchar(): PChar; stdcall;

  5. implementation

  6. function testint(): integer; stdcall;
  7. begin
  8.   result := 666;
  9. end;

  10. function testpchar(): PChar; stdcall;
  11. begin
  12.   result := '中文';
  13. end;
复制代码
  1. library Project1;

  2. { Important note about DLL memory management: ShareMem must be the
  3.   first unit in your library's USES clause AND your project's (select
  4.   Project-View Source) USES clause if your DLL exports any procedures or
  5.   functions that pass strings as parameters or function results. This
  6.   applies to all strings passed to and from your DLL--even those that
  7.   are nested in records and classes. ShareMem is the interface unit to
  8.   the BORLNDMM.DLL shared memory manager, which must be deployed along
  9.   with your DLL. To avoid using BORLNDMM.DLL, pass string information
  10.   using PChar or ShortString parameters. }

  11. uses
  12.   System.SysUtils,
  13.   System.Classes,
  14.   Unit1 in 'Unit1.pas';

  15. {$R *.res}

  16. exports
  17.   testint,
  18.   testpchar;

  19. begin

  20. end.
复制代码
Python调用
  1. import ctypes

  2. dll = ctypes.windll.LoadLibrary("Project1.dll")
  3. ri = dll.testint()
  4. print(ri)

  5. rc = dll.testpchar()
  6. rc = ctypes.c_wchar_p(rc)
  7. print(rc.value)
复制代码

备注:


ctypes定义了一系列基本C数据类型:


00000000.png

扫码关注微信公众号,及时获取最新资源信息!
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

免责声明:
1、本站提供的所有资源仅供参考学习使用,版权归原著所有,禁止下载本站资源参与商业和非法行为,请在24小时之内自行删除!
2、本站所有内容均由互联网收集整理、网友上传,并且以计算机技术研究交流为目的,仅供大家参考、学习,请勿任何商业目的与商业用途。
3、若您需要商业运营或用于其他商业活动,请您购买正版授权并合法使用。
4、论坛的所有内容都不保证其准确性,完整性,有效性。阅读本站内容因误导等因素而造成的损失本站不承担连带责任。
5、用户使用本网站必须遵守适用的法律法规,对于用户违法使用本站非法运营而引起的一切责任,由用户自行承担
6、本站所有资源来自互联网转载,版权归原著所有,用户访问和使用本站的条件是必须接受本站“免责声明”,如果不遵守,请勿访问或使用本网站
7、本站使用者因为违反本声明的规定而触犯中华人民共和国法律的,一切后果自己负责,本站不承担任何责任。
8、凡以任何方式登陆本网站或直接、间接使用本网站资料者,视为自愿接受本网站声明的约束。
9、本站以《2013 中华人民共和国计算机软件保护条例》第二章 “软件著作权” 第十七条为原则:为了学习和研究软件内含的设计思想和原理,通过安装、显示、传输或者存储软件等方式使用软件的,可以不经软件著作权人许可,不向其支付报酬。若有学员需要商用本站资源,请务必联系版权方购买正版授权!
10、本网站如无意中侵犯了某个企业或个人的知识产权,请来信【站长信箱312337667@qq.com】告之,本站将立即删除。
郑重声明:
本站所有资源仅供用户本地电脑学习源代码的内含设计思想和原理,禁止任何其他用途!
本站所有资源、教程来自互联网转载,仅供学习交流,不得商业运营资源,不确保资源完整性,图片和资源仅供参考,不提供任何技术服务。
本站资源仅供本地编辑研究学习参考,禁止未经资源商正版授权参与任何商业行为,违法行为!如需商业请购买各资源商正版授权
本站仅收集资源,提供用户自学研究使用,本站不存在私自接受协助用户架设游戏或资源,非法运营资源行为。
 
在线客服
点击这里给我发消息 点击这里给我发消息 点击这里给我发消息
售前咨询热线
312337667

微信扫一扫,私享最新原创实用干货

QQ|免责声明|依星源码资源网 ( 鲁ICP备2021043233号-3 )|网站地图

GMT+8, 2024-3-28 19:27

Powered by Net188.com X3.4

邮箱:312337667@qq.com 客服QQ:312337667(工作时间:9:00~21:00)

快速回复 返回顶部 返回列表