delphi中使用MD5
方法1: 在Delphi自带的Indy控件中其实是提供了MD2,MD4,MD5对象的,我们可以直接使用它们来完成MD5的签名算法。而不需要再去找其它的DLL或是Pas了。在Uses单元中引用 IdHash,IdHashMessageDigest 单元,再写如下代码即可以达到MD5的实现。 示例代码procedure TForm1.Button1Click(Sender: TObject);var »
Delphi Length函数
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1 »
QTP之delphi试用感想一(自动化测试)
这两天一直在琢磨自动化测试,自动化测试,其实与单元测试有一些相同之处,单元测试的目的也是可以一次写,多次运行,对于测试驱动及后期维护真是有非常多的好处,用自动化测试工具也是如何,主要目的是为了回归测试。单元测试的时候,我们要先准备数据,再测试,最后再进行数据清理,自动化测试也是如此,大家千万别觉得自动化测试就是开个测试工具,然后就不用动手了之类的云云。更多的准备知识,就暂时不需要了。 »
delphi中用代码实现注册Ocx和Dll(有点怪异,使用CallWindowProc来调用指定函数DllRegisterServer)
在windows系统中,可以通过Regsvr32来实现注册ocx或者dl, 编程时,调用Regsvr32来注册,却不能正常执行。尤其是在Win7系统中,需要管理员身份才能运行。 使用下面的代码则能正常注册。 [delphi] view plain copy //注册 function RegisterDllServer(FileName: string): boolean; »
转一篇Delphi下写DLL的文章
Delphi制作DLL一 Dll的制作一般步骤二 参数传递三 DLL的初始化和退出清理[如果需要初始化和退出清理]四 全局变量的使用五 调用静态载入六 调用动态载入七 在DLL建立一个TForM八 在DLL中建立一个TMDIChildForM九 示例:十 Delphi制作的Dll与其他语言的混合编程中常遇问题:十一 相关资料一 Dll的制作一般分为以下几步:1 在一个DLL工程里写一个过程 »
DELPHI ClientData使用详解
在三层结构中,TClientDataSet的地位是不可估量的,她的使用正确与否,是十分关键的,本文从以下几个方面阐述她的使用,希望对你有所帮助.1.动态索引procedure TForm1.DBGrid1TitleClick(Column: TColumn);begin if (not column.Field is Tblobfield) then//Tblobfield不能索引,二进制 »
Delphi XE7 开发ActiveX 及在IntraWeb下调试
最近学习DelphiXE7下Intraweb开发,Intraweb完全服务器端运行使得FastReport报表系统无法在客户端运行,当然网上也有一大堆解决方案,例如导出到PDF后,给出连接,让客户点击下载等,个人感觉不完美。由于我做的B/S系统主要运行在windows平台,所以还是考虑ActiveX插件,来的直观。一、DelphiXE7下 ActiveX开发1、new-other-打开窗口,选择A »
Delphi Math单元函数
本文转至http://blog.sina.com.cn/s/blog_976ba8a501010vvf.html 这个单元包含高性能的算术、三角、对数、统计和金融方面的计算及FPU程序函数用于补充Delphi语言System.pas 单元中的数学常规程序函数注意1) 对于有些函数,这个单元中涉及的概念或常数由Earl F. Glynn (www.efg2.com) 和 Ray Lischner ( »
Delphi 窗体函数GetWindowLong-获取指定窗口的信息
Delphi 窗体函数GetWindowLong-获取指定窗口的信息 原型:Long GetWindowLong(HWND hWnd,int nlndex); 参数: hWnd 目标窗口句柄,间接指向其窗口类。nlndex 若指定值大于0,返回窗口内存中指定偏移量的32位值。 也可指定以下值来获得其它数据: 宏定义 常量 描述 GWL_EXSTYLE - »
Delphi组件开发-在窗体标题栏添加按钮(使用MakeObjectInstance(NewWndProc),并处理好多消息)
这是一个在窗体标题栏添加自定义按钮的组件(TTitleBarButton)开发实例,标题栏按钮组件TTitleBarButton以TComponent为直接继承对象,它是一个可以在窗体标题栏上显示按钮的组件,像最大化、最小化和关闭按钮等。 1、首先确定组件的属性。 属性是组件的重要组成部分,它相当于组件的门面,因为一旦一个组件被置于窗体中时,用户必然想到去设置组件的各种属性,编写各种事件的处理过程 »
delphi.thread.线程循环执行体结构
线程话题太大,又都是些坑,不知从哪方面讲起,所以,想一出是一出了。 不管怎样,我们从开始使用D,不管有没有用线程,其实它已经帮我们做了一个最完整的线程执行处理:Application.Run. 这行App.Run,在dpr,想来各位都经常能够看到,如果跟踪下去,我们就会发现,它其实就是一个最完整的线程执行体的结构了: 我将里面一些代码删除掉了,再将HandleMessage的代码复 »
Delphi出现“borland license information was found,but it is not valid for delphi”的错误,无法运行的解决方法
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 »
Delphi中的字符串比较(CompareStr)
if SysUtils.CompareStr(Str,'dashan_zhang')=0 then … 使用CompareStr 函数 »
Delphi 与 C/C++ 数据类型对照表(转)
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编程地一些小程序
Delphi编程地一些小程序 1、用Enter键代替Tab键 在实际的程序开发中我们经常有这样的要求,用户不喜欢用Tab键,他希望用Enter键来代替。我们应该什么做呢? 首先:设定Form的KeyPreview属性为True。 其次:把Form上的所有Button的Default属性设为False。 最后:在Form的onKeyPress事件中添加如下代码: procedure TForm1.F »
Delphi导出Excel的设置操作
procedure CreatRepSheet(SheetName:String;PageSize,PageLay:Integer); {新建Excel工作簿、进行页面设置} begin {新建Excel工作簿} if ExlApp.WorkBooks.Count < 1 then begin ExlBook := ExlApp.Workbooks.Add; »
一、Delphi中Cxgrid表格滚动条粗细设置
1.Delphi VCL新版本的Cxgrid滚动条默认是触屏模式(如下图),很细的滚动条,在电脑版显示非常不方便。 2.如果需要改成传统的滚动条模式,需要设置一下LookAndFeel里面的ScrollbarMode的属性,sbmClassic就是传统滚动条模式(如下图) 3.设置后运行效果如下图: 不忘初心,如果您认为这篇文章有价值,认同作者的付出,可以微信二维码打赏任意金额给作者(微 »
如何在delphi中加入自己的脚本
原文连接 http://www.delphibbs.com/keylife/iblog_show.asp?xid=23590 展应用程序一般都会使用插件系统,往往是提供开发包,然后开发出dll来。 实际上脚本系统更好,特别是动态脚本语言,如python。 在delphi中嵌入python很容易的,只要安装一个python4delphi就行了。 地址:http://mmm-experts.com »
delphi 获取本机IP地址和MAC地址
unit NetFunc; interface uses SysUtils, Windows, dialogs, winsock, Classes, ComObj, WinInet, Variants; // 错误信息常量 const C_Err_GetLocalIp = '获取本地ip失败'; C_Err_GetNameByIpAddr = '获取主机名失败'; C_Er »
《zw版·Halcon-delphi系列原创教程》 Halcon分类函数008,matrix,矩阵函数
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 »
- FastASR——PaddleSpeech的C++实现 2022-07-11
- 有关golang信道的面试笔记 2022-07-11
- 全面吃透JAVA Stream流操作,让代码更加的优雅 2022-07-11
- 《吐血整理》保姆级系列教程-玩转Fiddler抓包教程(4)-会话面板和HTTP会话数据操作详解 2022-07-11
- 密码学系列之:使用openssl检测网站是否支持ocsp 2022-07-11
- CMU15445 (Fall 2019) 之 Project#3 - Query Execution 详解 2022-07-11
- C++20 以 Bazel & Clang 开始 2022-07-11
- Three.js系列: 在元宇宙看电影,享受 VR 视觉盛宴 2022-07-11
- Ant Design Vue 走马灯实现单页多张图片轮播 2022-07-11
- 你被离职员工投诉过吗? 2022-07-11
- 看起来是线程池的BUG,但是我认为是源码设计不合理。 2022-07-11
- C#实现FFT(递归法) 2022-07-11
- 2022年暑期集训记录--7月11日 2022-07-11
- Deep Learning-深度学习(二) 2022-07-11
- Deep Learning-深度学习(二) 2022-07-11
- 浅析拉格朗日乘数法及其对偶问题 2022-07-11
- 体验SRCNN和FSRCNN两种图像超分网络应用 2022-07-11
- vue2升级vue3指南(一)—— 环境准备和构建篇 2022-07-11
- SpringBoot之MongoDB附件操作 2022-07-11
- 【cartographer_ros】六: 发布和订阅路标landmark信息 2022-07-11