delphi编程
文章平均质量分 63
鬼厉飞宏
这个作者很懒,什么都没留下…
展开
-
Delphi中的加密算法(MD5,MD4,MD3...)
在Delphi自带的Indy控件中其实是提供了MD2,MD4,MD5对象的,我们可以直接使用它们来完成MD5的签名算法。而不需要再去找其它的DLL或是Pas了。在Uses单元中引用 IdHashMessageDigest 单元,再写如下代码即可以达到MD5的实现。示例代码procedure TForm1.Button1Click(Sender: TObject);var转载 2014-03-30 10:45:44 · 1503 阅读 · 0 评论 -
Delphi 两个应用程序(进程)之间的通信
两个应用程序之间的通信实际上是两个进程之间的通信。由于本人知识有限,决定应用消息来实现。需要用到的知识:1.RegisterWindowMessage() //参数类型:pchar;返回值:LongInt;2.FindWindow(lpClassName, {窗口的类名}lpWindowName: PChar {窗口的标题}): HWND;转载 2014-03-30 14:09:14 · 584 阅读 · 0 评论 -
delphi 进程间通信的两种方法
WIN下面进程间通信的最常用办法就是消息了.下面记录两种消息通信的方式: --------------------------------------------------------------------------------------------一.第一种办法,利用注册Windows全局的消息.并覆盖wndProc过程来监听消息处理.1. 发送消息方:转载 2014-03-30 14:56:26 · 944 阅读 · 0 评论 -
delphi中cardinal类型
今天又发现读卡程序的一个BUG,读芯片号的时候会读出带符号的字符串,原因在于dc_card(icdev,cardmode,tempint),这个tempint应该是32位无符号整型,然而在转换成字符串的时候带上了符号,所以不能直接用IntToStr函数,我试了IntToStr(cardinal(htonl(tempint))),目前工作正常,也不想花太多时间搞明白,到有问题的时候再说吧。 8位转载 2014-03-30 14:53:28 · 7290 阅读 · 0 评论 -
DES算法Delphi源代码
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Label1: TLabel; Labe转载 2014-04-01 18:50:56 · 678 阅读 · 0 评论