展开

关键词

Delphi 跨平台_delphi调用api接口

DELPHI是怎么实现跨平台的? 也和临界区类一样用跨平台编译开关封装了跨平台代码进来。 从上面的2个例子可以看出,DELPHI为了跨平台,对RTL进行了艰苦卓绝的巨大修改,这个工程无疑是浩大的。

6220

Python For Delphi---

先上相关资源的下载吧: python4delphi: 主页: http://code.google.com/p/python4delphi/ 下载: svn checkout http://python4delphi.googlecode.com 然后在memInput中输入Python代码: Result.Value=int(Num1.Value)+int(Num2.Value) 在执行按钮中填加代码: pyEngine.ExecStrings (memInput.Lines); 当然,可以直接执行上面的Python代码. 这样,我们就完成了Delphi传递参数到Python,Python执行完毕后将结果再返回给Delphi的演示.好了,我们可以好好利用Python,将它很好地嵌入到Delphi中了. 在Delphi中写下面的代码: var PyModule: variant; ....

1.1K10
  • 广告
    关闭

    腾讯云校园大使火热招募中!

    开学季邀新,赢腾讯内推实习机会

  • 您找到你想要的搜索结果了吗?
    是的
    没有找到

    delphi枚举wmi

    55230

    Delphi中使用RTTI

    RTTI是Delphi的组件能够融合到IDE中的关键。它在IDE中不仅仅是一个纯学术的过程。 由于对象都是从TObject继承下来的,因此,对象都包含一个指向它们的RTTI的指针以及几个内建的方法。 假定把AnObject看成是一个TEdit派生类型,并想要改变它所包含的文本,用下列代码: (AnObject as Tedit).text := 'wudi_1982'; 能用比较运算符来判断两个对象是否是相兼容的类型 第一个地方是DELPHI的IDE,这在前面已提到过。通过RTTI,IDE就会知道你正在使用的对象和组件的任何事情。实际上,不只是RTTI,但为了这个讨论,我们只谈RTTI方面。 在观看此例子之时,建议你看看typinfo.pas中的内容(DELPHI安装目录下/source/rtl/common/TypInfo.pas); 下面的例子主要分为两部分,界面上半部分,主要演示通过rtti 窗体文件如下:代码如下: object Form1: TForm1 Left = 150 Top = 161 Width = 639 Height = 372 Caption = '

    60940

    Delphi入门教程

    一、第一章Delphi6介绍 1.1概述 Delphi是基于Pascal语言的RAD快速应用程序开发工具(Rapid Application Development),为Windows系统下的可视化集成开发工具 Delphi中定义的类一般均以大写字母”T”开头,如窗体TForm 2.组件(Component):Delphi常规应用程序开发的基础,类似于积木的作用。实际上是一个完成一定功能的类。 主要包含8个部分:菜单栏、工具栏、组件面板、窗体设计器、代码编辑器、对象查看器、对象树形查看器、代码浏览器 2.2菜单栏(Main Menu) 菜单栏提供了Delphi6集成开发环境的所有功能。 【Object Inspector】:打开/进入对象查看器窗口 【Object TreeView】:打开/进入树形对象查看窗口 【Code Explorer】:打开/进入代码浏览器窗口 【Toggle 【Add to Project】:将各种Delphi6支持的文件加入当前项目 【Remove from Project】:将指定的文件从项目中移走 【View Source】:查看项目文件的源代码 【Compile

    21520

    Delphi类型和引用

    事实上Delphi中所有的元件都是从一些共同的祖先类 继承下来的,利用类的可继承性,您可以编写您自己的类元件,并把它加到Delphi的环境中去。 举例说明,我们在Delphi的可视环境下 建立一个表单窗口时,它实际上是创建了一个从TForm类中继承下的类类型。如果仔细看Delphi为您生成 的代码,你可以完全看到上面的各个规则是如何被实现的。 从功能上讲,虚拟方法和动态方法几乎完全相同,只不过虚拟方法在调用速度上比较愉,但代码长度稍 长,而动态方法在调用速度上稍慢而在代码长度上短一此.一般来说,在虚拟和动态之间还是选择使用 虚拟为好。 这句话的意思是首先调用基类的构造来初始化基类的字 段,接下来的代码才是初始化派生类的字段,当然也可以重新对基类的字段赋值。 ),这样, Delphi会为您自动加上适当的 Read和Write字句,一般情况下您根本不必修改它加入的任何代码

    74430

    Delphi调用驱动打印

    前言 我们做打印小票的时候除了直接对端口发送指令的方式,还有就是调用打印机驱动打印的方式,在Delphi中想要用驱动打印的方式就可以用到TPrinter类 TPrinter类介绍 TPrinter类中封装了 TPrinter: ---- 代码演示 //你必须先得到打印机的实际尺寸: var pointx,pointy:integer; pointx:=getdevicecaps(printer.handle

    75430

    快速对接德尔福Delphi EDI

    本次知行软件为汽车电缆行业某客户提供EDI的技术服务,是同时和三位国外贸易合作伙伴进行EDI对接,在双方的共同努力下,最终成功对接了Nexans, KSD, Delphi三位贸易合作伙伴。 不过也不是完全相同的,例如报文标准存在不同,Delphi使用的报文标准是EDIFACT,而KSD和NEXANS使用的报文标准是VDA标准,这种标准经常用于德国汽车行业。 在进行本次EDI项目实施的时候,我们按照客户要求,将项目以紧急程度分出了优先级,先进行的是Delphi项目的实施,然后进行KSD和Nexans项目的实施。 本文中,我们以Delphi的需求为主,详细聊一聊项目的需求和实施过程中遇到的问题。 项目需求 Delphi EDI项目是Delphi发起的需求。 Delphi发送的DELJIT长期需求预测,并将DELFOR中确认要货的信息作为订单处理,进行发货,发货之后将发货信息回传给DelphiDelphi根据发货通知进行收货。

    19100

    计算器(delphi

    31520

    CrackMe破解之Delphi

    是个Delphi写的程序,无壳,程序要求把"OK"和"Cancella"按钮隐藏掉,以便看到 logo; 因为这是Delphi写的程序,所以用专业Delphi反编译工具Dark分析一下 ? 以上代码先检查Cancella按钮是否隐藏,如果是就将ok按钮激活,否则检查用户名和密码是否匹配,匹配就激活按钮,否则禁用,关键call的代码如下: 00442E04 /. 55 接下来看右边的按钮单击事件,代码如下: 00442A3C /$ 55 push ebp 关键call 00442A3D |. 8BEC C3 retn 以下代码检查用户名与密码是否满足条件,如果满足就隐藏Cencela按钮并且激活OK按钮; 00442AF4 /$ 55 push ebp C3 retn 从这个代码里可以看到,在后面有一个和某个字符串对比的call,如果用户名是这个字符串就可以通过了,而这个字符串是上面的循环中根据密码字符串计算得到,因此只要输入的用户名和密码对应就可以了

    87110

    Delphi对TStrings进行排序

    前言 最近在做一个Delphi的对接第三方支付的接口,接口签名机制模仿微信的签名方式,把参数按ascii码进行排序后再加上key进行md5的加密,因为调用接口的的Post里面的参数是TStrings类型的 实现代码 ---- function GetSign(Params: TStrings): string; var tmpParams: TStringList; str: string; str; finally tmpParams.Free; end; end; ---- 上面的方法就是实现排序后的Tstrings生成的字符串,然后把这个生成的字符串进行MD5的加密,delphi

    27220

    delphi 使用windowsmediaplayer播放视频

    前言 delphi7中原本自带的一个Tmediaplayer控件,但是发现有不少视频是无法播放的,于是就想到了用windowsmediaplayer来进行播放。 安装 在Delphi7中选择“Component ——Import ActiveX Control...”菜单,会弹出“Import ActiveX0”窗口。 窗口大小问题 在DELPHI中使用微软的WindowsMediaPlayer ActiveX控件的时候,如果想让控件随窗口大小一起改变, 最常用的方法就是设置控件的Align属性,但是你会发现,对于ActiveX TLocOleCtrl (WindowsMediaPlayer1).OnPosRectChange (Rect (0, 0, ClientWidth, ClientHeight)); ---- 代码方法

    1.8K20

    学习笔记:delphi之TStringGrid

    1、说明 最近加入了一个项目组,使用的开发工具是delphi6,想想又要开始搞这个工具有点小忧伤,但没办法谁让咱就是个打杂的尼。。。 调用上面那句代码后,cellRect就会计算出文本显示的矩形大小了。同样就得到了宽高。

    45150

    raw socket (DELPHI开发平台)

    { Raw 数据包 Sender 使用:Delphi + Winsock 2 描述: 通过使用Raw sockets我们可以在internet上发送含有任意格式的数据包。

    28120

    重温Delphi之:面向对象

    Delphi当年的迅速走红,是以其RAD快速开发吸引程序员的目光。这无疑是它最吸引人的优势,但同时也让人误以为delphi只是vb的高级版本,从而忽视了其面向对象的特性。 其实Pacscal发展到Delphi,已经完全具备了面向对象的所有特点:允许自定义类,类可以继承(单继承),允许方法重载/覆写,可以定义接口,类可以实现接口,允许定义静态方法(即class方法),虚方法 ,抽象类...等等,对于delphi怀有偏见的朋友,你还会怀疑delphi的面向对象能力吗? 下面是一些演示代码: 1.先定义一个基类TPeople unit UPeople; interface type   TPeople = class(TObject) private

    32260

    delphi调用webservice问题总结

    1.把WSDL的URL地址放到了HTTPRIO的WSDLLocation参数中,然后选择service和port 2.最近一个项目用到了delphi调用C#写的web服务的功能。 先测试了N次都不成功,通过跟踪发现delphi根本没传过来任何值,通过查资料发现VS2005 默认是用的 SoapDocumentProtocol而Delphi 是使用的 SoapRpcProtocol 服务代码: [WebMethod] public int UploadFile(byte[] fs, string FileName) { try { ///定义并实例化一个内存流,以存放提交上来的字节数组 fs, 0, fs.Length); f.Close(); f = null; return 1; } catch { return 2; } } delphi 客户端代码: procedure TFrmUpLoad.btn2Click(Sender: TObject); function ReadFile(fileName:string): TByteDynArray

    1.4K20

    Delphi使用NativeXml处理XML(二)

    前言 我们接着上文的《Delphi使用NativeXml处理XML(一)》继续进行。 >   输入以下代码:   MyXmlDocument.EncodingString := 'UTF-16';   当读取一个文件,EncodingString将包含编码。

    60830

    delphi各个版本编译开关值

    delphi各个版本编译开关值 {$IFDEF VER80} - Delphi 1 {$IFDEF VER90} - Delphi 2 {$IFDEF VER100} - Delphi 3 {$ IFDEF VER120} - Delphi 4 {$IFDEF VER130} - Delphi 5 {$IFDEF VER140} - Delphi 6 {$IFDEF VER150} - Delphi Delphi 2007 and later {$IFEND} Delphi XE5 - 26 Delphi XE4 - 25 Delphi XE3 - 24 Delphi XE2 - 23 Delphi XE - 22 Delphi 2010 - 21 Delphi 2009 - 20 Delphi 2007 - 18.5 Delphi 2006 - 18 Delphi 2005 - 17 Delphi 8 - 16 Delphi 7 - 15 Delphi 6 - 14

    34220

    Delphi异常机制与SEH

    介绍SEH机制的文章很多,但基本都是C++的,关于Delphi的很少。最近项目需要,仔细阅读了VCL关于异常的处理,有些心得体会,希望和大家一起分享。 常见的如,delphi用到的 try exception end, try finally end,C++用到的_try{} _finally{} 和_try{} _except {} 结构都是对SEH 1 、 VCL 的顶层异常捕获 在DELPHI开发的程序中,出错的时候,我们很少看到出现一个错误对话框,提示点确定结束程序,点取消调试。而在VC或VB里就很常见,这是为什么呢? try except end 的实现: PASSCAL代码(使用3个Sleep主要是用了观看汇编代码时比较方便隔开编译器生成的代码): try Sleep(1); try finally end时,首先挂上SEH,如果代码正常执行,取消SEH,将try finally end后的代码地址压入堆栈,再finally里的代码运行完毕后,ret就返回到了该地址。

    40710

    相关产品

    • 腾讯云代码分析

      腾讯云代码分析

      腾讯云代码分析(TCAP),用心关注每行代码迭代、助您传承卓越代码文化!精准跟踪管理代码分析发现的代码质量缺陷、代码规范、代码安全漏洞、无效代码,以及度量代码复杂度、重复代码、代码统计。

    相关资讯

    热门标签

    活动推荐

    扫码关注腾讯云开发者

    领取腾讯云代金券