delphi文章/教程

方法1： 在Delphi自带的Indy控件中其实是提供了MD2,MD4,MD5对象的，我们可以直接使用它们来完成MD5的签名算法。而不需要再去找其它的DLL或是Pas了。在Uses单元中引用 IdHash，IdHashMessageDigest 单元，再写如下代码即可以达到MD5的实现。 示例代码procedure TForm1.Button1Click(Sender: TObject);var  »

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1 »

    这两天一直在琢磨自动化测试，自动化测试，其实与单元测试有一些相同之处，单元测试的目的也是可以一次写，多次运行，对于测试驱动及后期维护真是有非常多的好处，用自动化测试工具也是如何，主要目的是为了回归测试。单元测试的时候，我们要先准备数据，再测试，最后再进行数据清理，自动化测试也是如此，大家千万别觉得自动化测试就是开个测试工具，然后就不用动手了之类的云云。更多的准备知识，就暂时不需要了。    »

在windows系统中，可以通过Regsvr32来实现注册ocx或者dl， 编程时，调用Regsvr32来注册，却不能正常执行。尤其是在Win7系统中，需要管理员身份才能运行。 使用下面的代码则能正常注册。   [delphi] view plain copy   //注册   function RegisterDllServer(FileName: string): boolean; »

Delphi制作DLL一 Dll的制作一般步骤二 参数传递三 DLL的初始化和退出清理[如果需要初始化和退出清理]四 全局变量的使用五 调用静态载入六 调用动态载入七 在DLL建立一个TForM八 在DLL中建立一个TMDIChildForM九 示例：十 Delphi制作的Dll与其他语言的混合编程中常遇问题：十一 相关资料一 Dll的制作一般分为以下几步：1 在一个DLL工程里写一个过程 »

在三层结构中，TClientDataSet的地位是不可估量的，她的使用正确与否，是十分关键的，本文从以下几个方面阐述她的使用，希望对你有所帮助.1.动态索引procedure TForm1.DBGrid1TitleClick(Column: TColumn);begin    if (not column.Field is Tblobfield) then//Tblobfield不能索引，二进制  »

最近学习DelphiXE7下Intraweb开发，Intraweb完全服务器端运行使得FastReport报表系统无法在客户端运行，当然网上也有一大堆解决方案，例如导出到PDF后，给出连接，让客户点击下载等，个人感觉不完美。由于我做的B/S系统主要运行在windows平台，所以还是考虑ActiveX插件，来的直观。一、DelphiXE7下 ActiveX开发1、new-other-打开窗口，选择A »

本文转至http://blog.sina.com.cn/s/blog_976ba8a501010vvf.html 这个单元包含高性能的算术、三角、对数、统计和金融方面的计算及FPU程序函数用于补充Delphi语言System.pas 单元中的数学常规程序函数注意1) 对于有些函数，这个单元中涉及的概念或常数由Earl F. Glynn (www.efg2.com) 和 Ray Lischner ( »

Delphi 窗体函数GetWindowLong-获取指定窗口的信息 原型：Long GetWindowLong(HWND hWnd,int nlndex); 参数： hWnd　　目标窗口句柄，间接指向其窗口类。nlndex　　若指定值大于0，返回窗口内存中指定偏移量的32位值。　　也可指定以下值来获得其它数据：　　宏定义 　　　　　　　　　　常量 　　描述　　GWL_EXSTYLE　　　　　　- »

这是一个在窗体标题栏添加自定义按钮的组件（TTitleBarButton）开发实例，标题栏按钮组件TTitleBarButton以TComponent为直接继承对象，它是一个可以在窗体标题栏上显示按钮的组件，像最大化、最小化和关闭按钮等。 1、首先确定组件的属性。 属性是组件的重要组成部分，它相当于组件的门面，因为一旦一个组件被置于窗体中时，用户必然想到去设置组件的各种属性，编写各种事件的处理过程 »

线程话题太大，又都是些坑，不知从哪方面讲起，所以，想一出是一出了。    　　不管怎样，我们从开始使用D，不管有没有用线程，其实它已经帮我们做了一个最完整的线程执行处理：Application.Run. 　　这行App.Run，在dpr，想来各位都经常能够看到，如果跟踪下去，我们就会发现，它其实就是一个最完整的线程执行体的结构了： 　我将里面一些代码删除掉了，再将HandleMessage的代码复 »

1) 删除文件: C:\documents and settings\<username>\.borland\registry.slm，如果在win8或在win7下，即C:\Users\HiWin8\.borland2) 运行 c:\program files\borland\delphi7\bin\D7Reg.exe3) 一路单击下一步即可...4) 打开 Delphi7 »

  if SysUtils.CompareStr(Str,'dashan_zhang')=0 then …   使用CompareStr 函数 »

Delphi 数据类型 C/C++ ShorInt 8位有符号整数 char Byte 8位无符号整数 BYTE,unsigned short SmallInt 16位有符号整数 short Word 16位无符号整数 unsigned short Integer,LongInt 32位有符号整数 int,long Cardinal,LongWord/DWORD 32位无符 »

Delphi编程地一些小程序 1、用Enter键代替Tab键 在实际的程序开发中我们经常有这样的要求，用户不喜欢用Tab键，他希望用Enter键来代替。我们应该什么做呢？ 首先：设定Form的KeyPreview属性为True。 其次：把Form上的所有Button的Default属性设为False。 最后：在Form的onKeyPress事件中添加如下代码： procedure TForm1.F »

procedure CreatRepSheet(SheetName:String;PageSize,PageLay:Integer); {新建Excel工作簿、进行页面设置} begin {新建Excel工作簿} if ExlApp.WorkBooks.Count < 1 then begin ExlBook := ExlApp.Workbooks.Add; »

1.Delphi VCL新版本的Cxgrid滚动条默认是触屏模式（如下图），很细的滚动条，在电脑版显示非常不方便。 2.如果需要改成传统的滚动条模式，需要设置一下LookAndFeel里面的ScrollbarMode的属性，sbmClassic就是传统滚动条模式（如下图） 3.设置后运行效果如下图：   不忘初心，如果您认为这篇文章有价值，认同作者的付出，可以微信二维码打赏任意金额给作者（微 »

原文连接 http://www.delphibbs.com/keylife/iblog_show.asp?xid=23590   展应用程序一般都会使用插件系统，往往是提供开发包，然后开发出dll来。 实际上脚本系统更好，特别是动态脚本语言，如python。 在delphi中嵌入python很容易的，只要安装一个python4delphi就行了。 地址：http://mmm-experts.com »

unit NetFunc; interface uses SysUtils, Windows, dialogs, winsock, Classes, ComObj, WinInet, Variants; // 错误信息常量 const C_Err_GetLocalIp = '获取本地ip失败'; C_Err_GetNameByIpAddr = '获取主机名失败'; C_Er »

1 ** 3dFromFundamentalMatrix( Rows1, Cols1, Rows2, Cols2, CovRR1, CovRC1, CovCC1, CovRR2, CovRC2, CovCC2, FMatrix, CovFMat, out X, out Y, out Z, out W, out CovXYZW); 2 说明, 从矩阵建立3d对象 3 4 ** Ab »