delphi笔记It's long long ago
文章平均质量分 72
blazingfire
哈哈
展开
-
如何在Delphi中用代码来完成计算字段的创建
以前CSDN上有好多人问过这个问题,但是好象没有人给出满意的答案。我也是经过好长时间摸索才找到答案,现在在这给大家分享:procedure TForm1.FormCreate(Sender: TObject);var NewField:TField; i:integer;begin//表中有两字段SName,Birth,现在我们动态生成一个计算字段Age,显示出年龄 NewFie原创 2002-12-16 09:34:00 · 2404 阅读 · 0 评论 -
Delphi中的类和对象
谈谈Delphi中的类和对象1.登不了大雅之堂地理解几个概念 说到类和对象,我们不能不提及这样几个概念:类,对象,实例。就我个人觉得可以这样来理解:对象指的是泛称,自然界的任何实体都可以看成一个对象;而类则是以这些对象某些特征而分成的一系列的种类;实例则是特指属于某一个类的一个对象。好啦,这些大道理我就不用多说了。不如来一个“背道而驰”的作法,我们用Del原创 2002-11-21 10:06:00 · 1040 阅读 · 0 评论 -
高效率从数据库提取数据,创建树形结构图
procedure BuildTree(TreeView: TTreeView; DataSet: TDataSet; KeyField, ParentField, TitleField: string);{ 高效建树过程 by blazingfire 2008-05-21 }type PNodeData = ^TNodeData; TNodeData = record Key: In原创 2008-05-21 14:21:00 · 1950 阅读 · 1 评论 -
如何把一个Word文档流直接加载到OleContainer中?
procedure LoadOleCtnrFromStream(OleContainer: TOleContainer; Stream: TStream);const DataFormatCount = 2; StreamSignature = $434F4442; {BDOC}type TStreamHeader = record case Integer of 0:原创 2008-05-26 17:28:00 · 3227 阅读 · 1 评论