- 博客(44)
- 收藏
- 关注
RSS订阅转载 Delphi:利用TreeView 的data属性存储相关数据
TreeView利用data属性存储相关数据在Delphi中，TreeView控件是一款很出色而且很常用的控件。在使用过程中，了解到其TTreeNode对象的data属性存储相关数据很有用，一般情况下，我们先声明一个结构体以及其指针,例如：typePMyRc = ^TMyRc;TMyRc = Recordid:string;name:string;...
2017-09-18 14:06:00
858
转载 根据数据库结构生成TreeView
现在大多数的方法是采用递归，但这种操作会频繁的去select数据库，降低了执行效率，稍微改动一些，效果会好不少，这里介绍一种方法，即一次性select出所有数据，然后按照ParentID排序，逐条添加到TreeView，添加前，先遍历TreeView，查找他的上一级节点，遍历Treeview可比select数据快啊，下面看代码：数据表结构，最顶级parentid值我用的是-1，...
2017-09-18 14:04:00
173
转载 Delphi常用系统函数总结
字符串处理函数Unit System函数原型 function Concat(s1 [, s2,..., sn]: string): string; 说明 与 S := S1 + S2 + S3 ...; 相同. 将字符串相加.函数原型 function Copy(S: string; Index, Count: Integer): string;说明 S : 字符串. In...
2017-09-18 08:38:00
165
转载 Delphi常用内存管理函数
1.New、Dispose、GetMem、FreeMemNewprocedure New(var P: Pointer);：创建一个新的动态变量，并把指针P指向这个新创建的变量。分配的内存大小由P指针表示的类型决定。Disposeprocedure Dispose(var P: Pointer);：用来释放一指针变量所占用的内存地址。如使用{$I+}，会产生一个EInva...
2017-09-15 09:26:00
101
转载 delphi中VirtualStringTree树使用方法
例子：创建了一个树名为VirtualStringTree1，第一列显示数据库字段ID的值，标题为编号；第二列显示字段Name的值，标题为名字。一、【TVirtualStringTree常用属性】 BorderStyle :设置边框选项 bsSingle设置单边框 为TVirtualStringTree添加列及列标题： Header--Columns : ...
2017-09-14 10:15:00
428
转载 Delphi常量
1.DateDelta格式: const DateDelta=693594;说明: DateDelta定义TDateTime和TTimeStamp类型的不同,代表从0001年1月1日开始到1899年12月31日的总天数2.FileMode格式: const fmClosed=$D7B0; //关闭文件 const fmInput=$D7B1; //重置file(...
2017-09-14 09:31:00
130
转载 delphi 中 delete的用法
delete 是删除一个 字符串中的 某部分字符用法是 delete(str,//被删除的字符串 index,//从第几个字符开始删除 count //删除几个 );Delete(S, 2, 2); 就是从S中的第二个开始删除，删除2个字符即2、3.DelphiHelp:var...
2017-09-14 08:56:00
543
转载 字软元件和位软元件的区别
位软元件：只有处理ON/OFF状态的软元件，如X.Y.M.X 字软元件：处理数字数据的元件，如T.C.V.D.Z等 但对位软元件，由Kn加首元件号的组合，也可以处理数字软元件，组成字软元件。位软元件的4位为一组，组合成单元。 K1:4位，K2:8位，K3:12位，K4:16位 比如K1X0表示X3～X0的4位数据，K3M13表示M24～M13的12位数据。注意在表示数据的时候，X3/M2...
2017-09-13 11:03:00
2772
转载 Virtual Treeview使用要点
Virtual Treeview是一套Delphi下优秀的VCL控件，代码质量高，使用灵活、功能强大、性能非常好，可以用于表达Treeview和表格类数据。它的代码现在托管在google code上。这套控件使用了很久了，非常满意其表现，之前一直使用V4版，现在V5正式发布了，新版花了几年时间进行重构， 代码结构更加合理，去除了老版大量的小缺陷，很多功能进行了重新设计，参与维护的人也...
2017-09-12 14:00:00
348
转载 [转载] Delphi StringGrid常用属性和常用操作
StringGrid组件用于建立显示字符串的网格，与电子表格相似。它可使表格中的字符串和相关对象操作简单化。StringGrid组件提供了许多可控制网格外观念的属性，以及利用表格的结构响应用户操作的事件和方法。StringGrid具有关联对象与网格中的每个字符串的作用，这些对象为用户封装了字符串表示的信息或行为。一、Delphi StringGrid控件的属性及使用说明1、...
2017-09-12 09:03:00
208
转载 Delphi StringGrid常用属性和常用操作
StringGrid组件用于建立显示字符串的网格，与电子表格相似。它可使表格中的字符串和相关对象操作简单化。StringGrid组件提供了许多可控制网格外观念的属性，以及利用表格的结构响应用户操作的事件和方法。StringGrid具有关联对象与网格中的每个字符串的作用，这些对象为用户封装了字符串表示的信息或行为。一、Delphi StringGrid控件的属性及使用说明1、...
2017-09-12 09:02:00
272
转载 Delphi 常用属性说明
Delphi组件的常用事件Onclick——当单击时触发这个事件中的代码Onchange——当改变该组件内容时触发其中的代码Oncreate——当创建时触发这个事件中的代码Onclose——当关闭的时候触发其中的代码OnKeyDown——当按下键盘上的键时触发该处代码OnKeyUp——当松开键盘上的键时触发该处代码OnKeyPress——当有键盘动作的时候触发该处代码OnMouseUp—...
2017-09-07 12:57:00
325
转载 DELPHI常见属性说明
常用DELPHI控件属性设置说明目录TForm ClassTPanel组件TToolBar ClassTToolButton ClassTTimer ClassTADOConnection ClassTADOQuery ClassTADODataSet ClassTDBGrid ClassTADOStoredProc ClassTButton ClassTBit...
2017-09-07 12:55:00
482
转载 delphi控件属性和事件
常用【属性】 Action：该属性是与组件关联的行为，允许应用程序集中响应用户命令 Anchors：与组件连接的窗体的位置点 Align：确定组件的对齐方式 AutoSize：确定组件是否自动调整其大小 BiDiMode：（所有组件） 为从右向左写的语言提供支持 BoundsRect：定义组件边框矩形(只适用于运行时） Borderwidth：（窗口化组件）边框的宽度 BorberSt...
2017-09-07 11:18:00
248
转载 delphi控件属性大全-详解-简介
button 组件：CAPTION 属性 ：用于在按钮上显示文本内容Cancel 属性：是否设置成默认的取消按钮，当设置为真的时候（true） 按ESC触发改按钮的事件！Default 属性：是否设置成默认的确认按钮，当设置为真的时候 按ENTER键的时候触发事件Hint 属性：设置当鼠标在按钮上短暂停留是显示的提示内容。Showhint 属性： 是否显示...
2017-09-07 11:17:00
445
转载 delphi Panel上显示窗体
procedure PnlShowForm(ShowForm:TFormClass);procedure PnlShowClear;procedure TFrmMain.PnlShowForm(ShowForm:TFormClass);varMyForm:TForm;beginPnlShowClear;MyForm:=ShowForm.Crea...
2017-09-07 09:57:00
412
转载 Delphi中 StrToIntDef函数的用法：
比如我要判断一个文本框里输入的字符串能不能转换为integer类型,如果能，则返回转换后的整型数据，如果不能，则返回整数0，那么我就可以用strtointdef这个函数.写法如下：假设edit1.text：=‘1000‘;则strtointdef(edit1.text,0)返回值为1000.如果edit1.text：=‘fdafds‘，则返回值为0.(如果你用strt...
2017-09-07 09:08:00
421
转载 Delphi判断文件夹（目录）是否存在，不存在就创建一个，可以一次创建多级目录...
procedure TForm1.Button1Click(Sender: TObject);begin if not FileExists(Edit1.Text) then//if not DirectoryExists(Edit1.Text) then 判断目录是否存在 try begin CreateDir(Edit1.Text); //ForceDire...
2017-09-06 16:25:00
638
转载 Delphi中Format的字符串格式化使用说明
一、Format函数的用法Format是一个很常用，却又似乎很烦的方法，本人试图对这个方法的帮助进行一些翻译，让它有一个完整的概貌，以供大家查询之用：首先看它的声明：function Format(const Format: string; const Args: array of const): string; overload;事实上Format方法有两个种形式，另外一种是三...
2017-09-06 16:23:00
71
转载 Delphi中多线程同步过程Synchronize的一些说明
在windows原生应用程序开发中，经常伴随多线程的使用，多线程开发很简单，难点就是在于线程的同步，在Delphi中提供了VC中不具备的一个过程Synchronize，使用起来非常方便，解决了很多VC开发中碰到的常见问题，但是在看了很多Delphi代码后，发现很多人对于Synchronize的理解还是有问题的，不能很好地正确使用Synchronize过程，本文对Synchronize...
2017-09-06 16:20:00
177
转载 Delphi DBGrid 导出csv
procedure OutPutDBGridToCSV(AGrd:TDBGrid; AQuery: TQuery);var i,ColNum: Integer; Title,Data,SaveName: String; ALst: TStringList;begin try ALst:=TStringList.Create; ALst.Clear; ColN...
2017-09-06 16:19:00
418
转载 property中的read，write是什么意思？
read读取此属性的值write设置此属性的值delfault默认值dynamic表明该方法为动态的方法关于property.在Delphi当中，往往将一个类的变量定义在private或者protected里面，这样外部是访问不到这些变量的。当有需要将某个或者某些变量暴露出来给外界访问，就在pulic区或者published区定义一个property。property后面跟着的...
2017-09-06 16:18:00
581
转载 如何用delphi读写csv文件
varsFile,sLine:TStrings;beginsFile:=TStringList.Create;sFile.LoadFromFile('C:\a.csv');sLine:=TStringList.Create;sLine.CommaText:=sFile[1];ShowMessage(sLine[2]);...
2017-09-06 16:12:00
3154
转载 Delphi 中 TStrings 一些用法
Delphi TStrings是一个抽象类，在实际开发中，是除了基本类型外，应用得最多的。常规的用法大家都知道，现在来讨论它的一些高级的用法。先把要讨论的几个属性列出来：1、CommaText2、Delimiter & DelimitedText3、Names & values & valueFromIndex先看第一个：CommaText。怎么用...
2017-09-06 16:05:00
103
转载 将DBGrid中的数据导入Excel表格中
procedure TForm1.SpeedButton5Click(Sender: TObject);varExcel,WrkBook,WrkSheet:olevariant;BegintryExcel := CreateOleObject('Excel.Application');exceptif Application.MessageBox('对不起，你的...
2017-09-06 16:03:00
125
转载 如何获取combobox显示的值
ComboBox1.Text;ComboBox1.Items.Strings[ComboBox1.ItemIndex];//ComboBox1.ItemIndex>=0的时候才能用转载于:https://www.cnblogs.com/Little-Star/p/7485295.html
2017-09-06 16:02:00
2005
转载 WaitForSingleObject 的返回值
WaitForSingleObject 的返回值有以下三种情况：WAIT_OBJECT_0：表示你等待的对象（比如线程、互斥体）已的正常执行完成或完成释放。WAIT_TIMEOUT：表示你等待的对象在还没完成之前，由 WaitForSingleObject 设置的时间已经超时。WAIT_ABANDONED：这是针对等待对象是互斥体的情况，当互斥体对象虽然没有被占用它的线程释放，但是占用它...
2017-08-22 19:36:00
3559
转载 关于GetOverlappedResult函数的一些知识
之前在写重叠I\O的代码的时候，记得那时是从网络上拷贝的代码例子。在关于重叠操作的等待结果时，一般都是如下的过程：先 调用waitformultipleobject或waitforsingleobject函数来等待某一个I\O请求绑定的事件对象的激活。等到激活事件对象后，再调用GetOverlappedResult函数取得重叠I\O的结果，这里GetOverlappedResult...
2017-08-22 19:35:00
400
转载 串口编程：COMSTAT 结构
COMSTAT结构COMSTAT结构包含串口的信息，结构定义如下：typedef struct _COMSTAT { // cst DWORD fCtsHold : 1; // Tx waiting for CTS signal DWORD fDsrHold : 1; // Tx waiting for DSR signal DWORD fRlsdHold : ...
2017-08-22 19:31:00
197
转载 OVERLAPPED结构与GetOverlappedResult函数
异步I/O调用时，我们会用到OVERLAPPED结构和函数GetOverlappedResult。以前一直对GetOverlappedResult比较困惑，这两天看书和代码才知道这个函数的主要作用不过是将Overlapped返回的结果进行一次简单的分析而已。下面是OVERLAPPED的结构定义：typedef struct _OVERLAPPED { DWORD Interna...
2017-08-22 19:17:00
161
转载 Delphi 数据、文件常用函数
一、数据类型转换函数 在我们编写程序当中，根据不同情况，会使用到多种数据类型。当要对不同的类型进行操作时，必须要将不同的类型转换成同样的类型。因此熟练地掌握数据类型的转换是非常重要的。 1.FloatToStr 功能说明：该函数用于将“浮点型”转换成“字符型”。 参考实例： Edit1.Text := FloatToStr(1.981); 2.IntToStr...
2017-08-22 16:26:00
135
转载 [转载] Delphi 的字符及字符串[2] - Char、AnsiChar、WideChar、PChar、PAnsiChar、PWideChar...
//单字符 Char、AnsiChar (在目前版本(2007)中, 它们是一回事, 只有 1 字节大小)var c: Char; {Char 类型的取值范围是: #0..#255, 用十六进制表示是: #$0..#$FF}begin {用十进制方式赋值:} c := #65; ShowMessage(c); {A} {用十六进制方式赋值:}...
2017-08-22 14:49:00
153
转载 Delphi文件操作函数
文件是同一种类型元素的有序集合，是内存与外设之间传输数据的渠道。文件的本质是一个数据流，所有的文件实际上是一串二进制序列。文件管理包括：1、文件操作。2、目录操作。3、驱动器操作。三部分。1、常见文件操作函数和过程。1.1、AssignFile过程作用：将一个外部文件的文件名与一个File类型的变量关联，并对变量进行初始化。原型：procedure AssignFile(var F;...
2017-08-21 15:53:00
150
转载 Delphi常用关键字用法详解
本文详细介绍了Delphi中常用的各个关键字名称及用法，供大家在编程过程中借鉴参考之用。详情如下：absolute：12345678910//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同. varStr: string[32]; StrLen: Byt...
2017-08-16 12:52:00
176
转载 关于表格控件的OnDrawCell事件
前段时间写一个程序多次用到了表格控件显示数据。一般我们用表格控件来显示字符串和相关对象能使操作简单化。在窗体中添加一个TStringGrid对象，可完成文本数据的表格化。TStringGrid组件提供了许多可控制网格外观的属性，以及利用表格的结构响应用户操作的事件和方法。TStringGrid具有关联对象与网格中的每个字符串的作用，这些对象为用户封装了字符串表示的信息或行为。...
2017-08-16 09:15:00
276
转载 使用 Action 控件
•使用标准 Action 控件实现标准功能 例：制作一个简单的记事本•使用自定义 Action 控件 例：“制作一个简单的记事本” 基础上增加 “保存” 和 “新建” 功能__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner){Show...
2017-08-15 19:35:00
168
转载 Delphi中的Sender：TObject对象解析
Delphi中的Sender：TObject对象解析procedureTForm1.Button1Click(Sender:TObject);beginend;解析：Procedure是过程，TForm是窗体类，加上数字就是某个窗体，像TForm1就是Form1窗体。Button1是你的按钮控件的名称，Button1Click就是按钮的单击事件，（Sender:T...
2017-08-15 19:15:00
109
转载 Delphi中的线程类 - TThread详解
Delphi中有一个线程类TThread是用来实现多线程编程的，这个绝大多数Delphi书藉都有说到，但基本上都是对TThread类的几个成员作一简单介绍，再说明一下Execute的实现和Synchronize的用法就完了。然而这并不是多线程编程的全部，我写此文的目的在于对此作一个补充。线程本质上是进程中一段并发运行的代码。一个进程至少有一个线程，即所谓的主线程。同时还可以有多个子线程。...
2017-08-15 14:53:00
151
转载 Delphi中的Set类型的使用心得
先看例子。如下所示：typeTCharSet = set of char;TEnum = (Monday, Tuesday, Wednesday, Thursday, Friday, Saturday, Sunday);TEnumSet = set of TEnum;procedure TForm1.Button3Click(Sender: T...
2017-08-15 14:52:00
167
转载 CnPack实用功能推荐
已经使用CnPack好几年了，这个插件太好了，现在离开它我都不会写代码了，现在将使用心得与大家分享一下：1.代码助手非常好用，只需要输入几个字符后，自动出现提示列表，真是懒人的福音呀。2.代码高亮很方便，【源代码高亮扩展】->【允许光标处匹配当前标示符背景高亮显示】选项（此选项默认不打开）打开后，鼠标在某个标示符点一下后，屏幕内相同的标示符都会自动背景加亮显示，可...
2017-08-15 14:49:00
134
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人