
Delphi
文章平均质量分 68
sqymail68
这个作者很懒,什么都没留下…
展开
-
Delphi GetModuleFileName函数的用法(可以获取项目的路径,桌面的路径,我的文档的路径)
function GetModuleFileName(Module: HMODULE; Buffer: PChar; BufLen: Integer): Integer;Module模块的句柄模块,其文件名是必需的。 Buffer是一个缓冲区,它接收文件的名称。 BufLen是在缓冲区的字节数。 GetModuleFileName返回写入缓冲区的字节数。 警告:GetModul转载 2013-02-08 23:33:26 · 3425 阅读 · 0 评论 -
Delphi 运行时错误信息表
错误信息形式为: Run-time error nnn at xxxx; 其中nnn是运行时的错误编号; xxxx是运行时的错误地址. 编号 说明I/O错误: (编号100-149)100磁盘读错误,若要对超过格式文件尾进行读取时101磁盘写错误,若磁盘满时,由CloseFile,Write,Writeln或F转载 2013-07-25 05:18:21 · 820 阅读 · 0 评论 -
Delphi 数据类型列表
分类范围字节备注简单类型序数整数Integer-2147483648 .. 21474836474有符号32位Cardinal0 .. 42949672954无符号32位Shortint-128 .. 1271有符号8位Smallint-32768 .. 327672有符号16位原创 2013-03-23 14:58:51 · 393 阅读 · 0 评论 -
Delphi异常处理总结
以前写delphi程序一直不注意异常处理,对其异常处理机制总是一知半解,昨天程序中的一个bug,让我对异常有了更深入的认识,必须要对可能产生异常的地方进行异常处理,否则可能给程序造成灾难,就像昨天,因为写的filecopy函数没有做异常捕获处理,导致复制文件出错时整个程序崩溃,用户只能通过杀进程的方式重启程序再进行其它操作(汗~)。后来对程序进行异常处理,遇到意外只是提示下用户,然后可以继续运行下原创 2013-03-21 19:19:19 · 553 阅读 · 0 评论 -
Delphi日期函数大全
Delphi里有现成的函数可以实现日期加减,是在DateUtils单元里的。function IncYear(const AValue: TDateTime;const ANumberOfYears: Integer = 1): TDateTime;// function IncMonth is in SysUtilsfunction IncWeek(const AValue: T转载 2013-03-31 13:45:16 · 756 阅读 · 0 评论 -
Delphi 编译错误信息表
; not allowed before ELSEElSE前不允许有“;” clause not allowed in OLE automation section在OLE自动区段不允许“”子句 is not a type identifier不是类型标识符 not previously declared as a PROPERTY前面没有说明P原创 2013-03-12 21:50:41 · 600 阅读 · 0 评论 -
Delphi中TStringList类常用属性方法详解
//TStringList 常用方法与属性:var List: TStringList; i:Integer; begin List := TStringList.Create; List.Add('Strings1'); {添加} List.Add('Strings2'); List.Exchange(0,原创 2013-03-02 00:14:36 · 261 阅读 · 0 评论 -
TClientSocket和TServerSocket 属性,方法,事件
DelphiSockets程序设计ClientSocket和ServerSocket,它们对Winsock的API进行了很好的封装生成了TClientSocket和TserverSocket两个类(控件)。通过这两个控件,可以很方便的生成TCP/IP网络应用程序。TClientSocket类是客户端的Socket类,通过它可以与服务器程序建立TCP连接,并进行数据交换。TserverSocke转载 2013-03-13 09:36:14 · 595 阅读 · 0 评论 -
TMethod用法
TMethod用法 OnClick是TNotifyEvent类型; type TNotifyEvent = procedure(Sender: TObject) of object; 就是说他是一个过程,而且是有一个TObject的参数,并且包含在一个对象里~~ 关于类的方法: (不是类方法,这里指object pascal中的静态方法原创 2013-03-13 10:21:09 · 748 阅读 · 0 评论 -
DELPHI获得系统信息比如系统语言
DELPHI获得系统信息比如系统语言获得系统本地信息Windows API中有一个函数GetLocaleInfo可以用来获得系统信息比如系统语言, 货币符号等代码如下:function TForm1.GetLocaleInformation(Flag: Integer): String;var pcLCA: Array[0..20] of Char;begin原创 2013-03-07 17:01:43 · 760 阅读 · 0 评论 -
delphi字符串操作函数一览
首部 functionSameText(constS1, S2: string):Boolean; $[SysUtils.pas功能 返回两个字符串是否相等 说明 不区分大小写 参考 例子 CheckBox1.Checked := SameText(Edit1.Text, Edit2.Text);━━━━━━━━━━━━━━━━━━━━━转载 2013-02-15 11:07:42 · 326 阅读 · 0 评论 -
Delphi 的运算符列表
分类范围字节备注简单类型序数整数Integer-2147483648 .. 21474836474有符号32位Cardinal0 .. 42949672954无符号32位Shortint-128 .. 1271有符号8位Smallint-32768 .. 327672有符号16位转载 2013-02-13 20:35:05 · 255 阅读 · 0 评论 -
delphi 数组定义
在c语言中有:a[5]={1,2,3,4,5} ;那么在 delphi中,这个数组的赋值该怎么写?? 问题补充:下面有人说的对,我就是想在声明数组的时候赋初值,至于初值的内容你们不需要知道,我想知道的只是申明的时候赋值的格式,而不是通过一个过程去实现var a:=array[1..5] of integer=(1,2,3,4,5)只有全局变量才能赋初始值,而且5个值都要赋转载 2013-02-12 17:20:47 · 1009 阅读 · 0 评论 -
delphi的取整函数round、trunc、ceil和floor
首先引入math单元uses math;1.Round(四舍六入五留双)功能说明:对一个实数进行四舍五入。(按照银行家算法)例:vari, j: Integer;begini := Round(1.5); // i等于2j := Round(2.5); // j等于2end;在Delphi中使用Round函数得到的答案有时与我们所预期的会不太一样:采转载 2013-02-13 23:26:40 · 475 阅读 · 0 评论 -
Delphi对ini文件的操作
一、INI文件的结构:; 注释[小节名]关键字=值INI文件允许有多个小节,每个小节又允许有多个关键字, “=”后面是该关键字的值。 值的类型有三种:字符串、整型数值和布尔值。其中字符串存贮在INI文件中时没有引号,布尔真值用1表示,布尔假值用0表示。 注释以分号“;”开头。 二、定义1、在Interface的Uses节增加IniFiles; 2转载 2013-02-13 20:17:14 · 527 阅读 · 0 评论 -
Delphi 的运算符列表
分类运算符操作操作数结果类型范例算术运算符+加整数,实数整数,实数X + Y-减整数,实数整数,实数Result - 1*乘整数,实数整数,实数P * InterestRate/实数除整数,实数实数X / 2div整数除整数整数Tota转载 2013-02-13 19:09:15 · 282 阅读 · 0 评论 -
Delphi TStringList的用法
TStrings是一个抽象类,在实际开发中,是除了基本类型外,应用得最多的。 TStringList 常用方法与属性:var List: TStringList; i: Integer;begin List := TStringList.Create; List.Add('Strings1'); {添加} List.Add('Strin转载 2013-02-10 00:13:44 · 1244 阅读 · 0 评论 -
delphi中的窗体事件详解
Delphi窗体的事件共有40个,常用的分为5大类 建立窗体时引发的事件:共有4个 OnCreate事件:窗体创建时产生此事件, OnShow事件: 窗体显示前产生此事件 OnPaint事件: 重画窗体、窗体大小改变、窗体上的其他窗体移去时产生此事件 OnActivate事件:窗体激活时(窗体获得焦点时)产生此事件 关闭窗体时引发的事件:共有4个 O原创 2013-02-09 12:44:47 · 1314 阅读 · 0 评论 -
YearsBetween、MonthsBetween ... YearSpan、MonthSpan ... 间隔时间
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); end转载 2013-03-31 14:28:13 · 1062 阅读 · 0 评论