腾讯云开发者社区-腾讯云

开发者社区

文档建议反馈控制台

最新优惠活动

文章/答案/技术大牛

发布

微卡智享

专栏作者

401

文章

814370

阅读量

60

订阅数

【干货】C#根据类生成签名字符串（附DEMO下载地址）

编程算法 c#delphi

现在第三方支付的接口签名机制都是模仿微信签名方式，把参数按ascii码进行排序后再加上key进行md5的加密，前两天因为做Delphi的接口，所以写了一篇《Delphi对TStrings进行排序》，这次我们写一个C#把类结构生成的签名字符串。

2019-07-25

9190

Delphi对TStrings进行排序

编程算法 delphi

最近在做一个Delphi的对接第三方支付的接口，接口签名机制模仿微信的签名方式，把参数按ascii码进行排序后再加上key进行md5的加密，因为调用接口的的Post里面的参数是TStrings类型的，但是在TStrings类型里面没有Sorted排序这个方法。所以我自己重写了一个函数用于处理这个。

2019-07-25

1.3K0

DELPHI IDE中部分操作快捷方式

DELPHI IDE中部分操作快捷方式 1 代码模板： CTRL+J 2 代码整块移动： CTRL+SHIFT+I（右移） CTRL+SHIFT+U（左移） 3 选中窗体：先选中任一控件，SHIFT+鼠标左键 4 将鼠标指向变量名、单元名、类名，再用 CTRL+鼠标左键可找到相应的说明 5 在过程、函数、事件内部， SHIFT+CTRL+向上的方向键可跳跃到相应的过程、函数、事件的定义 6 相反，在过程、函数、事件的定义处，SHIFT+CTRL+向下的方向键可跳跃到具体过程、函数、事件内部 7 CTRL + SHIFT + C:编写申明或者补上函数 8 SHIFT + CTRL + E 显示 EXPLORER 9 CTRL + SHIFT + N (n=1,2,3,4......)定义书签 10 CTRL + N (n=1,2,3,4......)跳到书签n 11 ALT + 鼠标左键可以块选代码，删除对齐的重复代码非常有用 12 CTRL + PageUp 将光标移至本屏的第一行，屏幕不滚动。 13 CTRL + PageDown 将光标移至本屏的最后一行，屏幕不滚动。 14 CTRL + ↓ 向下滚动屏幕，光标跟随滚动不出本屏。 15 CTRL + ↑ 向上滚动屏幕，光标跟随滚动不出本屏。 16 CTRL + Home 将光标移至文件头。 17 CTRL + End 将光标移至文件尾。 18 CTRL + B Buffer List窗口。 19 CTRL + I 同Tab键。 20 CTRL + M 同Enter键。 21 CTRL + N 同Enter键，但光标位置保持不变。 22 CTRL + T 删除光标右边的一个单词。 23 CTRL + Y 删除光标所在行。 24 CTRL + SHIFT + ↑ 光标在函数体内时，将光标快速移至当前函数声明处。 25 CTRL + SHIFT + ↓ 光标在函数声明行时，将光标快速移至函数定义处。 26 CTRL + SHIFT + C 声明一个过程或函数后，直接生成过程或函数的名称、begin、end; 27 CTRL + SHIFT + E 光标在Edit窗口和Explorer窗口间切换。 28 CTRL + SHIFT + G 插入GUID。 29 CTRL + SHIFT + J 弹出Delphi语句提示窗口，选择所需语句将自动完成一条语句。 30 CTRL + SHIFT + T 在光标行加入To-Do注释。 31 CTRL + SHIFT + Y 删除光标之后至本行末尾之间的文本。 32 CTRL + F3 Call Stack窗口。 33 CTRL + F4 等于File菜单中的Close项。 34 CTRL + 鼠标转轮加速滚屏。 35 SHIFT + F8 调试时弹出CPU窗口。 36 SHIFT + F10 等于鼠标右键（Windows快捷键）。 37 ALT + F4 关闭所有编辑框中打开的源程序文件，但不关闭项目。（如无打开项目时，则关闭DELPHI^_^ ）

2019-07-24

8510

Delphi类型和引用

编程算法 delphi 面向对象编程

概要介绍：类类型和下面要讲到的类引用类型是一种特殊的数据类型，是Object Pascal面向对象编程的基础。　一：类类型概述和以前介绍的几种数据类型相比，类类型具有如下特点：类类型的成员可以是不同的数据类型，这一点跟记录类型相似，因此，类类型首先是由不同的字段组成的。类类型除了包含数据以外，还包含了操纵数据的方法及特性。类类型把数据和方法封装在一起。类类型具有可继承性，所谓继承就是一个新的类类型，不必什么都从新定义，只需要继承一个已有的类型再加上自己的成员就构成一个新的类类型。事实上Delphi中所有的元件都是从一些共同的祖先类继承下来的，利用类的可继承性，您可以编写您自己的类元件，并把它加到Delphi的环境中去。被继承的类我们称为基类，继承下来的类我们称为派生类，基类的成员自动成为派生类的成员。类的继承具有传递性，例如假设T3继承了T2，而T2又是继承了T1，可以认为T3也继承T1。在Delphi中，所有的类都是从一个共同的类TObject继承下来的，TObject类的声明在System单元中，它定义了一些操纵类的最基本的方法，因此，Tobject也被称为缺省祖先类。 TObject是一个抽象类，它的派生类可以对TObject中的方法重载，包括对它的构造 Create 和析构 Destory的重载。二：类类型的声明类类型的声明比较复杂，其语法如下： Type 类＝class(基类) [成员列表] End; 从以上语法可以看出，类类型可以指定一个祖先类型，表示该类型是从这个基类继承下来，如： Type TClass=Class(TObject) 这个例子，声明了一个名叫TClass的类类型，它是从类TObject继承下来的。注意，在Delphi中，类名一般都是以T打头，以区别于其它数据类型。如果省略了指定基类，则表明直接从TObject继承下来。成员列表的定义是这样字段定义方法定义属性定义类类型可以有三类成员分别是字段、方法、特性。字段的声明类型于记录类型中字段的声明，类类型中的方法又可以分为4类，分别是构造、析构、过程和函数。分别用 Constructor、 Destructor、 Procedure、Function这4个保留字声明，类类型中的特性用保留字Property来声明，一个典型的类类型示例如下： Type TClass=Class Private FX,FY,FZ:Integer; FS:String[128]; Public Constructor Create(X,Y,Z:Integer;S:string); Destrutor Destroy;override; Procedure Display;Virtual; Function SetStr(const Value:string); Publish Property Caption:String read FS Write SetStr; End; 上例中，声明了4个字段，数据类型分别是Integer和String。在Delphi中，一般私有变量字段都以 F打头。并且声明了一个构造CREATE，一个析构Destroy，一个过程Display，一个函数SetStr。另外还声明了一个属性Caption。其它的语法元素如Private、Public等将在后面介绍。注意：跟其它数据类型不同的是，类类型的声明只能出现在程序的Type区，而其它数据类型则可以在Var区或过程或函数或方法的Begin语句之前声明。因此类类型的作用域总是全局的。顺便提一下，类类型包括包含类类型分量的构造类型不能作为文件类型的基类型。三:类类型的字段类类型中的字段也就是类的数据部分，其声明方法同记录中字段的声明语法相似：标识符：类型其中字段的类型可以是各种数据类型，甚至是另一个类类型。要访问对象的某个字段，跟访问记录变量中的字段类似，是用对象名加小圆点和字段名。四：类类型的方法类类型中的方法是个特定的名称，从形式上看也不过是一些过程或函数，不同的是方法是在类类型内部声明的并只操纵类本身，因此在Object Pascal中方法有其特定含义。我们姑且都称它为方法。方法的声明和定义方法定义方法首部；方法指示字方法的声明跟变通的过程或函数的声明既相似也有不同的地方，相似的是声明时只需写出方法的首部，不同的是声明方法时可以加上方法指示字。方法分为4种

2019-07-24

2.4K0

Delphi中利用SEH屏蔽退出时的Runtime Error

Delphi写的程序，如果在单元的finalization里出现了一些异常操作会导致退出时抛出Runtime Error ，规范的处理办法当然是解决这些异常，但是有些特殊的情况下，比如用了很多的第三方控件，实在没办法解决问题时，只有把他屏蔽掉，这样给客户的时候就不至于看到满天的Runtime Error 了。做法其实很简单，就是在 END.之前手工调用Halt释放，并且将Halt抛出的错误屏蔽掉，这样做和正常的DELPHI释放过程没有任何区别，因为End.编译后其实就是一句话 Call Halt0，只是VCL自己没有屏蔽Halt0里抛出的错误，而是跳出个Runtime Error 来; 　　首先就是位置的问题，如果是EXE的话，直接在END.之前就行了，如果是Dll的话就麻烦点，需要挂上DllProc，当wReason = DLL_PROCESS_DETACH时处理。然后就是如何屏蔽错误的问题了，第一个最容易想到的做法就是直接 Try 　halt except end; 　　但是这样是不行的，因为try…except end捕获的错误都会放到System单元的_HandleOnException中处理，函数检查错误类型是否是DelphiException，如果不是就不处理，这个时候就会被DELPHI的顶层异常机制捕获，并抛出Runtime error，halt里抛出来的错误恰恰就是非DelphiException，代码如下：　procedure _HandleOnException; … 　　CMP [EAX].TExceptionRecord.ExceptionCode,cDelphiException 　　JE @@DelphiException 　　CLD 　　CALL _FpuInit 　　MOV EDX,ExceptClsProc 　　TEST EDX,EDX 　　JE @@exit 　　 CALL EDX 　　TEST EAX,EAX 　　JNE @@common 　　JMP @@exit … End; 所以，需要借助SHE机制来处理这个问题，代码如下：　　asm 　　 //挂上SEH xor edx, edx 　　 push ebp 　　push OFFSET @@safecode 　　push dword ptr fs:[edx] 　　mov fs:[edx],esp 　　//调用Halt0 　　call Halt0 　　jmp @@exit; 　　@@safecode: 　　 //如果出现异常继续调用Halt0退出 call Halt0; 　　@@exit: 　end; 这个做法的好处就是，不会对DELPHI正常释放过程产生影响，所有的释放操作都是和VCL一致的，只是不会把错误显示出来。以下是完整代码：一、EXE的情况，把代码放在工程文件 procedure Halt0; begin Halt; end; begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; asm 　xor edx, edx 　push ebp 　push OFFSET @@safecode 　 push dword ptr fs:[edx] 　mov fs:[edx],esp 　 call Halt0 　jmp @@exit; 　@@safecode: 　　call Halt0; 　 @@exit: end; end.

2019-07-24

8530

delphi调用webservice问题总结

node.js 编程算法 delphi 网站 http

1.把WSDL的URL地址放到了HTTPRIO的WSDLLocation参数中，然后选择service和port 2.最近一个项目用到了delphi调用C#写的web服务的功能。用了一天的时间找原因，终于测试通过了。这是一个通过web服务把一个照片上传到网站指定位置的方法。先测试了N次都不成功，通过跟踪发现delphi根本没传过来任何值，通过查资料发现VS2005 默认是用的 SoapDocumentProtocol而Delphi 是使用的 SoapRpcProtocol.这会造成所以客户端传过去的字

2019-07-24

2.2K0

没有更多了

社区活动

腾讯技术创作狂欢月

“码”上创作 21 天，分 10000 元奖品池！

Python精品学习库

代码在线跑，知识轻松学

博客搬家 | 分享价值百万资源包

自行/邀约他人一键搬运博客，速成社区影响力并领取好礼

技术创作特训营·精选知识专栏

往期视频·千货材料·成员作品最新动态