- 博客(13)
- 资源 (61)
- 收藏
- 关注
原创 delphi中New 与 GetMem 形似神不似
如果操作一个 record 指针中的字符串变量,会不会丢失 string 的内存空间,造成内存泄漏?结果是:使用 New() 分配的内存,会自动初始化 record 的内容,并且在 Dispose 时自动清除所有已分配的内存,包括 string 或其他动态数组的内存。GetMem/FreeMem 没有这个性质。事实上,New() 中调用了 GetMem,并且执行了一些初始化
2017-07-27 10:54:19 1411
原创 Delphi 里 FillChar的用法
Fillchar是Turbo/Borland Pascal的System单元的一个标准过程,它的使用格式是:FillChar(var X; Count: Word; value),它的功能是,把指定变量X在内存段中所占的低Count个字节赋为相同的值value, 其中value是填充的值,只能是Byte、Char或Boolean等单字节类型的值。在Free Pascal中稍加扩展为Fill
2017-07-27 10:52:53 8807
原创 Delphi下使用指针的简单总结
1:指针的赋值。 typeRTestInfo = recordAge:Integer;end;PtestInfo = ^ RtestInfo;varTest1,Test2:PtestInfo;Begin New(Test1); New(Test2); Test1^.Age:=12; Test
2017-07-27 10:50:20 2748
原创 Delphi Locate 详解
TDataSet控件以及它的继承控件,例如TSimpleDataSet/TClientDataSet等都可以使用Locate方法在结果数据集中查寻数据。程序首先必须使用SQL命令从后端数据库中取得数据并且形成结果数据集,然后才使用Locate方法查寻数据。当使用Locate方法查寻数据时,开发人员可以使用任何的字段条件来查寻,而无须理会这个字段是不是索引字段。当然,当开发人员使用索引字段来
2017-07-18 15:29:05 1335
原创 delphi 身份证号码相关处理单元
单元用途:身份证号码相关处理 //// 单元作者:池龙 ///////////////////////////////////////////////////////////////
2017-07-15 15:05:19 1672
原创 Delphi中BeginUpdate和EndUpdate作用
许多 Windows 窗体控件(例如,ListView 和 TreeView 控件)实现了 BeginUpdate 和EndUpdate 方法,它们在操纵基础数据或控件属性时取消了控件的重新绘制。通过使用BeginUpdate 和 EndUpdate 方法,您可以对控件进行重大更改,并且避免在应用这些更改时让控件经常重新绘制自身。此类重新绘制会导致性能显著降低,并且用户界面闪烁且不反应。例如,如果
2017-07-14 15:32:57 2521
原创 Delphi程序设计中的鼠标控制
在Windows环境下,鼠标和键盘是主要的输入设备。在Delphi中几乎每个对象都具有反映鼠标控制的事件,这些事件的主要功能包括改变鼠标指针的形状,移动、触发、拖动鼠标等。鼠标控制的三个相关属性是Cursor、DragCursor、DragMode;鼠标控制的三个对象方法是BeginDrag、Dragging、EndDrag;鼠标控制的七个事件包括OnDragDrop等。一、改变鼠标指针的形状
2017-07-14 10:44:40 1043
原创 Delphi 遍历所有目录和子目录下的文件名(可按后缀名遍历)
procedure EnumFileInQueue(path: PChar; fileExt: string; fileList: TStringList); var searchRec: TSearchRec; found: Integer; tmpStr: string; curDir: string;
2017-07-14 09:56:43 1491
原创 Delphi New,Getmem,ReallocMem联系与区别
procedure New(var P: Pointer); {为一个指针变量分配内存,会自动计算指针所指数据结构需要空的空间大小}procedure GetMem(var P: Pointer; Size: Integer); {分配一个指定大小的内存块(连续),并用P指向它}procedure ReallocMem(var P: Pointer; Size: Integer)
2017-07-13 15:43:54 922
原创 delphi Treeview用法
Treeview用于显示按照树形结构进行组织的数据。 Treeview控件中一个树形图由节点(TreeNode)和连接线组成。TtreeNode是TTreeview的基本组成单元。 一个树的节点又包含文本(Text)和数据(Data)。Text为String类,Data则为无定形指针(Untyped Pointer), 可以指向一个与节点相联系的
2017-07-11 16:17:00 7201
原创 Delphi 中的 IfThen 函数
StrUtils 单元和 Math 单元 分别有一个 IfThen 函数, 举例:-------------------------------------------------------------------------------- unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants,
2017-07-05 17:40:34 1501
原创 Delphi的对象注销方法Destroy和free
当您使用完对象后,您应该及时撤销它,以便把这个对象占用的内存释放出来。您可以通过调用一个注销方法来撤销您的对象,它会释放分配给这个对象的内存。Delphi的注销方法有两个:Destroy和Free。Delphi建议使用Free,因为它比Destroy更为安全,同时调用Free会生成效率更高的代码。您可以用下列的语句释放用完的Employee对象: Employee.Free; 和C
2017-07-05 15:02:47 938
原创 造成DELPHI程序的稳定性原因及解决方法
软件质量是一个产品的生命线,也是关乎软件开发者的幸福关键所在,每天有很多程序员都在因为软件质量而通宵达旦的加班,经常遇到的情况是刚发布的程序不停的发布补丁包。软件质量就像一个噩梦一样,不停的在后面追赶着程序员,让他们疲于奔命,甚至于在程序员中流传着一句话:“生命不息,BUG不止”。今天我们要探究的不是哪些可以重现的BUG,我们把哪些可以重现的BUG不定义为BUG,只有哪些不可重现的BUG,会让
2017-07-05 12:14:19 1038
FInalbuilder使用说明
2017-02-16
Desktop.zip
2019-12-17
一键解决sql server2000评估出错及服务启动不起来问题
2017-11-15
Delphi网络通信协议分析与应用实现
2017-10-19
SQL Prompt
2017-10-11
delphi 的ehlib 4.5
2017-09-02
Delphi的Ehlib3.2第三方控件
2017-09-02
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人