![](https://img-blog.csdnimg.cn/20201014180756927.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
delphi
阿尔萨斯
I believe in the fairy story u wrote for me, and myself becomes the faint flower in the story
展开
-
格式化输出函数: Format
FORMAT函数var s: string;begin //指令类型 type s := Format(最大整数是: %d; 最小整数是: %d,[MaxInt,Low(Integer)]); //返回: 最大整数是: 2147483647; 最小整数是: -2147483648 { 提示: 格式指令必须以 % 开始, 不区分大小写, %d 代表一个整数; 第二个参数是一个变体数原创 2009-07-24 09:03:00 · 451 阅读 · 0 评论 -
用Delphi来编写蠕虫病毒浅析
一个病毒程序首先要短小,我们的目标是经过压缩后控制在30k以下。用过delphi的朋友都知道,如果在uses里面加入forms,classes.....等就会使目标文件非常的大,所以,在我们的程序里,我们要尽可能的不用这些库。我们只用windows,winsock,shellapi,sysutils(这个里面包含了一些常用的函数,比如对文件的操作,对字符串的操作,如果用自己的程序来代替,目标文原创 2009-08-26 12:45:00 · 572 阅读 · 0 评论 -
感染SysConst.dcu,delphi梦魇病毒解析
好有趣的感染方式,够可爱了~今天群的人发了一条链接,关于许多人SysConst.dcu被感染.被感染后的SysConst.dcu体积是18KB左右,正常的SysConst.dcu是12KB左右.偷偷瞄了一下偶的SysConst.dcu,竟然被感染了,而且潜伏的时间应该超过4个月~ 只是前两天卡巴更新病毒库,卡巴报病毒名为:Virus.Win32.Induc.a,大家才发觉有所原创 2009-08-26 13:46:00 · 1230 阅读 · 0 评论 -
Delphi第三方控件大测评
古人云∶“工欲善其事,必先利其器。” 这句话,我想凡是用Delphi的朋友,应该都有很深切的体会吧。的确,如果Delphi没有了控件的支持,那么人气度一定会大大的降低,不会有现在这样多的Fan了呵呵。但是,现在控件满天飞,不要说DSP(Delphi Super Page)了,光一个深度历险上面的控件就已经洋洋洒洒上万数了,而且每天还在更新,多恐怖啊∶)然而,选择多了以后,烦恼也就随之而来了原创 2009-08-22 09:02:00 · 515 阅读 · 0 评论 -
显示窗体中所有控件的函数
//显示窗体中所有控件的函数function GetCtrls(Control: TWinControl; List: TStringList): Boolean;var i: Integer; obj: TWinControl;begin for i := 0 to Control.ControlCount-1 do begin obj := TWinControl(Cont原创 2009-08-17 14:40:00 · 484 阅读 · 0 评论 -
TScreen 类 - 程序中窗体的个数
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; proced原创 2009-08-17 14:29:00 · 331 阅读 · 0 评论 -
LockType 属性
LockType 属性指示编辑过程中对记录使用的锁定类型。设置和返回值设置或返回以下某个 LockTypeEnum 的值。常量说明adLockReadOnly默认值,只读。无法更改数据。adLockPessimistic保守式记录锁定(逐条)。提供者执行必要的操作确保成功编辑记录,通常采用编辑时立即锁定数据源的记录的方式。原创 2009-08-17 14:08:00 · 541 阅读 · 0 评论 -
关于函数指针
delphi编程中如何使用函数指针呢?指针又又什么作用呢?看下面的文章: delphi中可以通过函数指针把一个函数作为参数来传递,然后在另外一个函数中调用。 1) 首先,申明函数指针类型TFunctionParameter。 type TFunctionParameter = function(const value : int原创 2009-08-12 09:22:00 · 433 阅读 · 0 评论 -
dbgrideh组件使用
一、如何在程序中确定Ehlib定义的报表表头颜色? 在执行打印之前,加上下面的语句:DBGridEh1.FixedColor:=clLime;//clLime可以换成你想要的颜色比如clRed是红色等等PrintDBgridEh1.Options:=[pghColored,pghFitingByColWidths];//方括号里的"pghColored"是必需的,其它的根据你的需要决定取舍==原创 2009-07-30 13:12:00 · 2357 阅读 · 0 评论 -
delphi封装DLL总结
一 Dll的制作一般分为以下几步:1 在一个DLL工程里写一个过程或函数2 写一个Exports关键字,在其下写过程的名称。不用写参数和调用后缀。二 参数传递1 参数类型最好与window C++的参数类型一致。不要用DELPHI的数据类型。2 最好有返回值[即使是一个过程],来报出调用成功或失败,或状态。成功或失败的返回值最好为1[成功]或0[失败].一句话,与windows c++兼容。3 用原创 2009-07-26 21:51:00 · 1142 阅读 · 0 评论 -
从数据库读取树形资料,并在treeview中显示,非常精练的广度优先算法
表名为TB,字段如下编号:code名称:name所属:belong算法核心代码,为增强算法通用性,将窗体的一个treeview和ADOQuery引用到局部变量中,作为对象引用,不创建,也不释放,相当于别名 1procedure Tfrm.FmtTree(); 2var 3 i,j :integer; 4 leafList,leafListPlus: TList; 5 leaf原创 2009-09-14 15:54:00 · 567 阅读 · 0 评论