- 博客(60)
- 资源 (1)
- 收藏
- 关注
RSS订阅转载 Delphi的编译指令
一个程序从无到有的过程是这样的: 编辑代码 -> 预处理 -> 编译(成dcu等) -> 链接(为exe等).一、什么是预处理?譬如 VCL 中有很多代码是兼容 Linux 的, 在 Windows 下就需要在编译之前预处理掉那些 for Linux 的代码.1、判断操作系统: 其中的 "MSWINDOWS" 和 "LINUX" 就是 Delphi 预定义的 "条件标识符".beg
2015-04-20 11:23:17
841
转载 delphi控件安装与删除
基本安装1、对于单个控件，Componet-->install component..-->PAS或DCU文件-->install;2、对于带*.dpk文件的控件包，File-->Open(下拉列表框中选*.dpk)-->install即可；3、对于带*.bpl文件的控件包，Install Packages-->Add-->bpl文件名即可；4、如果以上Install按钮为失效的话
2015-04-15 13:33:24
752
原创 Warning: Unknown: Your script possibly relies on a session side-effect which existed until PHP 4.2.3
Warning: Unknown: Your script possibly relies on a session side-effect which existed until PHP 4.2.3. Please be advised that the session extension does not consider global variables as a source of dat
2015-04-10 11:54:16
1740
转载 Delphi之TPersistent类
TPersistent类 TPersistent类是由TObject直接派生的。凡是由TPersistent派生的对象都能够进行流操作。因为所有的组件都是由TPersistent派生的，所以它们都具有流属性。TPersistent没有定义特殊的属性或事件，虽然它定义了一些对于组件用户和编写者有用的方法。下面列举了TPersistent类定义的一些方法。 TPersistent类
2014-11-26 08:16:15
828
1转载 Shell的文件操作函数SHFileOperation
功能:1.复制一个或多个文件2.删除一个或多个3.重命名文件4.移动一个或多个文件有一样的Win32API功能函数是:CopyFile(),DeleteFile(),MoveFile()MoveFile可以对文件重命名!Win32 API 的层次比SHFileOperation低SHFileOperation的重要参数1.wFunc //对pFr
2014-08-04 14:59:32
562
转载 delphi2007中如何安装ActiveX控件
(1).打开Delphi2007, File-New-Package Delphi for win32.(2).Component-Import Component,选择 Import ActiveX Control.(3).在控件列表,或Add添加选择相应Active控件后,点next.(4).选择安装ActiveX控件所在的面板页,单元,包等.(5)点next,最后一步,选
2014-06-24 17:00:39
599
转载 Delphi中destroy, free, freeAndNil, release用法和区别
1)destroy：虚方法释放内存,在Tobject中声明为virtual,通常是在其子类中override 它，且要加上inherited关键字，才能保证派生类对象正确地被销毁;但destroy一般不能直接用，为什么？当一个对象为nil，我们仍然调用destroy，会产生错误。因为destroy是虚方法,它要根据对象中的头四个字节找到虚拟方法表Vmt的入口地址，从而找到destr
2014-06-18 22:24:37
468
转载 MySql查询结果按照指定顺序排序
select * from test where id in(3,1,5) order by find_in_set(id,'3,1,5');select * from test where id in(3,1,5) order by substring_index('3,1,2',id,1);
2014-06-16 18:40:56
711
转载 Firebird常用系统表Sql语句
--得到数据库的所有者名称SELECT distinct RDB$OWNER_NAME AS DATABASE_OWNERFROM RDB$RELATIONSWHERE (RDB$SYSTEM_FLAG = 1);--根据表名得到表的主键SELECT RC.RDB$CONSTRAINT_NAME AS CONSTRAINT_NAME,I.RDB$RELATIO
2014-06-11 17:16:56
414
转载 delphi reintroduce作用
当在子类中重载或者重新声明父类的虚方法时,使用 reintroduce 关键字告知编译器,可以消除警告信息. 如: TParent = class procedure proc;virtual; end; TChild = class(TPar
2014-01-08 20:26:20
2005
转载 SysUtils单元函数
首部 function Languages: TLanguages; $[SysUtils.pas 功能 返回系统语言对象 说明 通过此函数可以得到系统的语言环境 参考 type SysUtils.TLanguages 例子 ///////Begin Languages procedure TForm1.Button1Click(Sender: TObject)
2013-12-31 19:03:56
514
原创 获取MAC地址
function MacAddress: string;var Lib: Cardinal; Func: function(GUID: PGUID): Longint; stdcall; GUID1, GUID2: TGUID;begin Result := ''; Lib := LoadLibrary('rpcrt4.dll'); if Lib
2013-12-31 18:46:53
435
转载 delphi formate
一、Format函数的用法Format是一个很常用，却又似乎很烦的方法，本人试图对这个方法的帮助进行一些翻译，让它有一个完整的概貌，以供大家查询之用： 首先看它的声明：function Format(const Format: string; const Args: array of const): string; overload;事实上Format方法有两个种形式，另外一种
2013-12-16 22:46:18
539
转载 phpmailer发邮件常见的一些问题总结
PHPMailer邮件类使用错误分析一，没有定义发送邮箱$mail->From或格式不正确，错误提示：Language string failed to load: recipients_failed [email protected]，注意，这个配置一定要正确，而且是正确的邮箱二，没有定义邮件服务主机$mail->Host或连接失败，错误提示：Language string failed to
2013-11-22 14:07:15
679
转载 ShellExecute, WinExec, CreateProcess区别
ShellExecute ShellExecute的功能是运行一个外部程序（或者是打开一个已注册的文件、打开一个目录、打印一个文件等等），并对外部程序有一定的控制。 有几个API函数都可以实现这些功能，但是在大多数情况下ShellExecute是更多的被使用的，同时它并不是太复杂。 ShellExecute函数原型及参数含义如下： ShellExecute( HWND
2013-05-07 10:42:42
746
原创 对表格进行操作，WPS与Office的差别
WPS：CreateOleObject('ET.Application')office：CreateOleObject('Excel.Application')
2013-03-14 12:54:34
1671
原创 php获取主机IP地址
php获取主机IP地址：gethostbyname($_ENV['COMPUTERNAME']);$_ENV['COMPUTERNAME']是获取本机的名字，gethostbyname()则是获取域名的IP
2013-01-23 11:04:27
578
转载 Delphi Menu Designer（菜单设计器）之一
菜单包括大多数Windows应用程序的大部分内容。一些Windows应用程序没有菜单，但绝大多数都有。Delphi使用Menu Designer使得创建菜单变得容易。Menu Designer有如下特点：可以创建主菜单和弹出菜单（快捷菜单）。 为菜单项处理提供OnClick事件。 从模板或源文件插入菜单。 以模板形式保存客户菜单。 所有Menu Designer命令通过其快捷菜单或者使
2012-01-17 11:33:46
787
转载 静态方法，虚方法和动态方法
（1）虚方法和动态方法一样： 它的结果只和谁创建它有关系，和其它转换没有关系；（2）静态方法 和它的当前类型有关系 1 类方法 2 type 3 TClassA = class 4 public 5 function AAA():string;virtual;//虚方法 6 function BBB():
2012-01-04 10:39:36
416
转载 delphi中Assigned的含义
assigned 是用来判断某一指针(pointer)或过程引用是否为nil(空)，如果为空则返回假（false）。用法示例(防止窗体被实例化多次)：procedure TForm1.Button1Click(Sender: TObject);begin if (Not assigned(form2)) then //判断form2是否被创建 begin
2012-01-04 10:14:59
619
转载 delphi 进度条
1.progressbar进程控制条主要的属性：Max，Min，Step与Timer一起使用 while(pb1.Position begin pb1.StepIt; end;2.Gauge与progressbar用途完全相同，所不同的是Gauge具有多种表现形式，如圆形，方形等。主要的属性：Max，Min，Process与Timer一起使
2012-01-04 10:14:14
1375
转载 delphi DLL动态链接库
假设有两个应用程序，它们都要调用一个单元中的一个方法，那么这两个应用程序都要在Uses语句中引用该单元。如果同时运行这两个应用程序，这个方法就会在内存中存在两份，这显然是内存的一种浪费，使用动态链接库就可以解决这个问题。动态链接库DLL与其他应用程序通过动态链接技术来共享代码。如果一个应用程序使用了动态链接库，Win32系统保证内存中只有DLL的一份复制品，这是通过内存映射文件实现的。DLL首
2012-01-04 09:54:30
357
转载 delphi关闭程序 Close,application.Terminate与halt有什么区别
在有多个Form窗体时可以体现出来.用close是只关闭本窗体,而用Application.terminate是关闭整个程序,包括所有窗体.（1）当Close是一个主窗体时,程序会退出。Close会发生FormClose事件,FormCloseQuery事件。close，只是针对窗体。主窗体close以后程序就Application.Terminate了。子窗体close以后。没释放，
2012-01-04 09:01:57
1283
转载 Delphi编译错误信息对照表
******************************* * 编 译 错 误 信 息 * ******************************* ';' not allowed before 'ELSE' →ElSE前不允许有“;”'' clause not allowed in OLE automation sectio
2011-12-23 15:44:16
759
转载 delphi 常见问题集锦
1.form.Free - 释放Form占用的所有资源。Free后，Form指针不能再使用，除非对Form重新赋值。 form.Hide - 隐藏Form。可以调用form.Show再一次显示。 form.close - 关闭Form，实际的结果取决于OnCloseQuery和OnClose,
2011-12-23 15:43:06
1003
转载 Delphi的OverRide、OverLoad和Virtual方法
1.方法的重写Overriding和重载Overloading是Java多态性的不同表现。重写Overriding是父类与子类之间多态性的一种表现，重载Overloading是一个类中多态性的一种表现。如果在子类中定义某方法与其父类有相同的名称和参数，我们说该方法被重写 (Overriding)。子类的对象使用这个方法时，将调用子类中的定义，对它而言，父类中的定义如同被“屏蔽”了。如果在一
2011-12-23 15:42:07
945
转载 delphi中exit,abort,break,continue 的区别
exit: 退出函数体abort: 遇到异常,安静处理,就是不显示不提示break: 退出当前循环体,包括for ,while, repeat等循环体continue: 结束循环内的本次处理,继续从循环体的开始位置继续执行Exit 是跳出当前代码块，也就是当前函数，跳出后是要继续向下执行的（如果有后续代码）。Abort 是从 EAbort 过来的，可以激发 exceptio
2011-12-23 15:41:24
373
转载 Delphi中destroy, free, freeAndNil, release用法和区别
1)destroy:虚方法释放内存,在Tobject中声明为virtual,通常是在其子类中override 它，且要加上inherited关键字，才能保证派生类对象正确地被销毁;但destroy一般不能直接用，为什么？假如当一个对象为nil，我们仍然调用destroy，此时会产生错误。因为destroy是虚方法,它要根据对象中的头四个字节找到虚拟方法表Vmt的入口地址，从而找到des
2011-12-23 15:39:15
620
转载 delphi中对象的create和free
在D中每个应用程序可以获得的内存空间分为两种：堆（heap）和栈（stack）。 堆又称为“自由存储区”，其中的内存空间的分配与释放是必须由程序员来控制的。例如，用GetMem函数获取了一定大小的内存空间，则在使用完后，必须调用FreeMem函数将空间释放，否则就会发生所谓的“内存泄漏”。“借债还钱，天经地义”。 栈又称为“自动存储区”，其中的内存空间的分配与释放是由编
2011-12-23 15:37:16
655
转载 运行期包与设计期包详解
======================================================================1. 内容简介====================================================================== 本文档深入明了的阐述了什么是运行期包、设计期包 同时解释了产生 Design
2011-12-22 14:38:13
688
转载 Delphi指针的认识
大家都认为，C语言之所以强大，以及其自由性，很大部分体现在其灵活的指针运用上。因此，说指针是C语言的灵魂，一点都不为过。同时，这种说法也让很多人 产生误解，似乎只有C语言的指针才能算指针。Basic不支持指针，在此不论。其实，Pascal语言本身也是支持指针的。从最初的Pascal发展至今 的Object Pascal，可以说在指针运用上，丝毫不会逊色于C语言的指针。以下内容分为八个部分，
2011-12-22 14:37:11
257
转载 delphi学习点滴—几个关闭函数
表示关闭的有如下函数：hide、close、free、release、destrory、terminate、freeandnil()、halt 详解：free:先判断不为空再destroy。释放对象，对于窗体来说，只会释放对象，而不将窗体对象的指针指向nil，所以free后用assigned函数来判断还是返回true．只有freeandnil或free后再将指针指向nil。de
2011-12-22 14:36:17
398
转载 delphi学习点滴—exit、abort比较
delphi中表示跳出的有break，continue, exit，abort, halt, runerror。1、break 强制退出循环（只能放在循环中），用于从For语句，while语句或repeat语句中强制退出。2、continue 用于从For语句，while语句或repeat语句强行结束本次称称循环，并开始下一次循环。3、exit 用于从当前代码块中退出。若该代码为主
2011-12-22 14:35:06
361
转载 delphi学习点滴——类似query的实
用Delphi做过数据库编程的朋友肯定熟悉Query控件，这个控件实现的功能是执行一条SQL语句或一个SQL脚本，在我们进行数据库开发中使用的频率非常高。使用过程中发现用好这个控件有两点要非常注意。 第一点是：区分好Query控件的Open方法和ExecSQL方法。这两个方法都可以实现执行SQL语句，但要根据不同情况分别使用。如果这条SQL语句将返回一个结果集，必须使用Open方法，如果
2011-12-22 14:33:44
497
转载 delphi学习点滴—dbgrideh一个技巧
有几个事件使你能够在绘制单元格前定制单元格字体和颜色。1、用TDBGridEh的OnDrawColumnCellEvent事件句柄来在控制在网格单元中绘制数据。可以使用Canvas属性的方法来绘制单元格。但是如果你只想改变字体或颜色的属性，我建议使用下面的事件。(只是单个单元格变色，整行并没有变) 代码如下：procedure TForm1.DBGridEh1DrawColumnC
2011-12-22 14:33:05
1703
转载 delphi学习点滴——操作excel的几个控件使用说明
在Form中分别放入ExcelApplication, ExcelWorkbook和ExcelWorksheet。1) 打开ExcelExcelApplication1.Connect;2) 显示当前窗口:ExcelApplication1.Visible[0]:=True;3) 更改 Excel 标题栏:ExcelApplication1.Caption := '应用程序
2011-12-22 14:32:06
837
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人