![](https://img-blog.csdnimg.cn/20201014180756757.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
Delphi
文章平均质量分 81
hedylin
这个作者很懒,什么都没留下…
展开
-
DELPHI中DBGrid中行的定位及着色实现
DELPHI中DBGrid中行的定位及着色实现 1 问题的提出 在对一个数据库系统进行操作的时候,发现不能对DBGrid控件中的数据行定位及在定位到某行后无法对当前行进行明显的标志(例如改变颜色),在往上查找了很多资料,发现基本没有对这个内容的介绍,包括一些动态设顶行的颜色等文章讲的都是在数据初始化时做的操作,而没有在数据源刷新后的重新定位功能,所以下决心解决这个问题,通过一上原创 2005-01-02 13:25:00 · 1048 阅读 · 0 评论 -
用DELPHI在状态栏中显示进程条
经常上网的朋友可能早就已经发现,在一些浏览器的底部会在某些情况下动态显示一个进程条,比如在显示网页的时候,如果时间比较长,就会出现一个一格一格前进的,用以提醒用户已经有多少数据被下传下来。它不仅仅出现在浏览器中,还经常被用于下载软件中,比如现在最热门的BT下载软件,都使用了这一技术。技术的改进源于工作的需要,现在编写网络软件那么流行,上面的小技巧应该是每个像我们这样的编程爱好者都需要的吧。原创 2006-10-20 15:46:00 · 1237 阅读 · 0 评论 -
在Delphi程序中维护DBF数据库
由于Delphi 开发的易用性和快速性, 很多原来使用Foxpro 和Visual Foxpro编程的程序员转向了Delphi . 但由于 工作上或其它的原因,原来的应用系统尤其是应用数据,不可能被一下丢弃,因而需要用Delphi 来维护xBase 数 据库的应用系统 .本文总结了在工作和学习中的经验,与广大Delphi 程序员和爱好者共享. ---- 在下面讨论中,主要应用了B转载 2006-05-25 09:40:00 · 1584 阅读 · 0 评论 -
对文件的操作
九 对文件的操作:●文本文件: 定义: var TextFileVar: Text ; 1. 文本文件的打开需要两个步骤:(1). 文件变量与文件名关联;AssignFile ( TextFileVar , FileName ) ; (2). 初始化读写(三种方式)1>. Reset : 为读打开文件并把文件指针移动到文件首;2>. Rewrite : 为写创建一个新文件;3>. Append :原创 2005-11-28 20:45:00 · 2178 阅读 · 0 评论 -
几个获取Windows系统信息的Delphi程序
本文所有的窗体界面略去,读者可根据程序自行添加各窗口组件。1、获取windows版本信息可以通过Windows API函数GetVersionEx来获得。具体程序如下:Procedure Tform1.Button1Click(sender:TObject);VarOSVI:OSVERSIONINFO;beginOSVI.dwOSversioninfoSize:=Sizeof(OSVERSIONI原创 2005-08-08 17:06:00 · 1449 阅读 · 0 评论 -
共享软件防破解的实用招法
1、检测主程序大小,防止破解补丁之类:Function TForm1.GesSelfSf: integer;varF: file of byte;beginFilemode:=0;Assignfile(F,./FileName.exe);Reset(f);Result:=Filesize(F);Closefile(F);end;2、检测创建日期和时间,让破解补丁实效:Function TFor原创 2005-07-13 17:17:00 · 2035 阅读 · 0 评论 -
Delphi中的Win32 API应用六例
1、刷新桌面在使用计算机的过程中,经常会碰到在Windows桌面上残留有程序运行后的留下一些痕迹,这时我们往往在Windows桌面上单击鼠标右键,然后选择刷新,使桌面变得干净、整洁。其实自己编代码来实现这个功能也很简单,调用一个函数SHChangeNotify即可。首先,在Delphi的单元文件的Uses部分手动添加上ShlObj,然后在按钮点击事件中加上代码如下:procedure TForm1原创 2005-07-10 11:08:00 · 1092 阅读 · 0 评论 -
Delphi常用日期函数
Day 开头的函数●UnitDateUtilsfunction DateOf(const AValue: TDateTime): TDateTime;描述使用 DateOf 函数用来把一个 TDateTime 类型的变量转变成一个只带有日期的 TDateTime 类型变量。例如:showmessage(DateTimetostr(dateof(now())));你得到的是 2003/03/19而原创 2005-07-02 10:21:00 · 3418 阅读 · 0 评论 -
用DBGrid控件的Sort属性实现“点击标题栏自动排序功能”
用DBGrid控件的Sort属性实现“点击标题栏自动排序功能” 很多朋友在使用DBGrid控件时,抱怨没有点击标题栏便可自动排序的功能,实际上通过ADOQuery或其它数据集组件的Sort属性配合DBGrid的OnTitleClick事件,可以方便地实现此功能。因为Sort属性可以让活动数据集按指定的字段进行排序,也可以选择排序方式(升序/降序),所以我们只要在OnTitl原创 2005-01-02 13:34:00 · 1240 阅读 · 0 评论 -
用Delphip写新型QQ木马
现在大多的QQ木马都是通过钩子函数监控用户的输入,监控到的密码通过EMAIL方式发送到指定的邮箱里。这样如果你黑了好多人以后我会发现邮件会很多,一封封地收会很麻烦。那么有没有其它更好的办法呢? 其实可以通过ASP的数据库功能将取得的密码与到网上的ACCESS数据库里,具体方法如下: 1。我不用钩子函数,因为只是监控QQ不必用钩子。我用的语言是DELPHI,建立一个TIMER控件,每10微秒原创 2006-06-29 10:10:00 · 2010 阅读 · 1 评论