【Delphi】
文章平均质量分 78
火龙岛主
有志者事竟成,破斧成舟,百二秦关终属楚,苦心人天不负,卧薪尝胆,三千越甲可吞吴.
展开
-
把事件保存到列表,然后再取出。
目的:实现动态事件赋值和加载unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; B原创 2013-08-16 11:06:43 · 1292 阅读 · 0 评论 -
MDI窗体的建立及释放方法的探索
地球人都知道的方法1.建立工程2.分别建立两个窗体form1, form2;3.设置form1的formstyle为fsMDIForm,加入工具栏及按钮和状态栏;4.设置form2的formstyle为fsMIDChild; 在按钮中加入如下代码:if not Assign(form2) thenbegin application.createform(Tfo原创 2009-07-07 08:50:00 · 1363 阅读 · 0 评论 -
基本算法(Delphi版本)
打打基础,收藏一个基本算法的帖子! 1.数论算法 求两数的最大公约数 function gcd(a,b:integer):integer; begin if b=0 then gcd:=a else gcd:=gcd (b,a mod B); end; 求两数的最小公倍数 function lcm(a,b:integer):integer; begi转载 2009-06-29 09:57:00 · 1327 阅读 · 0 评论 -
通过类名动态创建Form
主窗体:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, ImgList, ActnList, ToolWin;type TForm1 = class(TForm)原创 2009-06-24 15:45:00 · 1989 阅读 · 2 评论 -
Delphi2007的新功能之调用chm类型帮助
在Delphi2007中的Windows单元增加了许多API函数,其中就包括{$EXTERNALSYM HtmlHelp}function HtmlHelp(hWndCaller: HWND; pszFile: PChar; uCommand: UINT; dwData: DWORD): HWND;{$EXTERNALSYM HtmlHelpA}function HtmlHelpA原创 2009-08-28 08:42:00 · 1145 阅读 · 0 评论 -
动态添加DevExpressBar中的菜单
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, dxSkinsCore, dxSkinsDefaultPainters, dxSkinsdxBarPainter, dxBar, cxLookAnd原创 2009-06-22 16:40:00 · 4067 阅读 · 0 评论 -
字符串驱动技术—— MethodAddress , MethodName , ObjectInvoke
document.domain = "csdn.net"; http://baohaiyin.spaces.live.com/blog/cns!B6440FCAEDDC3149!689.entry转载 2009-06-22 21:52:00 · 1580 阅读 · 0 评论 -
Delphi帮助中的错误例子
IntToHexThe following example uses an edit control, a button, and a label on a form. When the button is clicked, the hexadecimal value of each character in the edit control is displayed in the label原创 2009-06-18 14:12:00 · 811 阅读 · 0 评论 -
Win32全局钩子在Delphi下实现的关键技术
Win32全局钩子在Delphi下实现的关键技术by wecan in 技术文档 at 2007年12月4日00:03星期二 (Windows 3转载 2009-06-16 09:33:00 · 3413 阅读 · 0 评论 -
C++与DELPHI转换规则
C++与DELPHI转换规则一个老外的PAS单元里的描述,感觉不错贴了上来,应该是比较容易理解的.(* Translation notes : ------------------- - Delphi classes are pointers : ----------- Delphi --------------+---------- C --------------转载 2009-07-13 09:11:00 · 2681 阅读 · 0 评论 -
翻译一半的Delphi汇编帮助
The built-in assembler allows you to write assembly code within Delphi programs. It has the following features:内嵌的汇编器允许在delphi程序中书写汇编代码,他有如下特性:Allows for inline assembly允许内嵌汇编 Supports a翻译 2009-11-24 15:03:00 · 1864 阅读 · 0 评论 -
动态创建FastReport4报表2 - 由cxGrid动态创建报表
动态创建FastReport4报表2这次在第一版的基础上增加了对数据集的支持unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, cxGraphics, c原创 2012-12-17 11:38:09 · 2265 阅读 · 1 评论 -
动态创建FastReport4报表
procedure TForm1.Button1Click(Sender: TObject);var vPage: TfrxReportPage; vTitle: TfrxPageHeader; vView: TfrxMemoView; vData: TfrxMasterData;begin frxReport1.Clear; vPage := TfrxReportPa原创 2012-12-03 15:23:30 · 1613 阅读 · 0 评论 -
易博龙找我们了
<br />公司是有买DelphiXE的,只不过也是在美国买的,结果他们电话告知说我们用盗版,没有办法,领导要求全部卸载所有有关Delphi的开发环境。目前只保留了Delphi7,新年新杯具啊!原创 2011-01-05 11:02:00 · 4115 阅读 · 1 评论 -
Delphi XE 彩蛋
Delphi 彩蛋 名单 全家福原创 2010-11-02 09:00:00 · 1848 阅读 · 2 评论 -
实现360或迅雷样式窗体
这个效果是使用DevExpressBar来完成的!先看效果图:具体代码如下:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Buttons, dxBar, cxClasses, Menus, E原创 2010-03-30 17:52:00 · 5469 阅读 · 2 评论 -
Delphi 项目迁移到 Tiburon(Delphi2009,Delphi2010) 中的注意事项
翻译:现有 Delphi 项目迁移到 Tiburon 中的注意事项 CnPack 开源软件项目 2008-08-31 16:45:05现有 Delphi 项目迁移到 Tiburon 中的注意事项 翻译:峪飞鹰2008-08-30随着 Embarcadero 8 月 25 号发布 RAD Studio 2009 (Tiburon转载 2010-02-04 16:16:00 · 3522 阅读 · 0 评论 -
可以按照数字大小排序的列表类
效果图如下: 方法很简单,只要从TStringList继承,覆盖sort方法即可,详见代码吧:unit Unit9;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, frxClass;原创 2010-02-02 12:40:00 · 1631 阅读 · 1 评论 -
Delphi2010启动报告错误的修复方法
不知道什么原因我的Delphi2010启动的时候,报告一个错误: is not a valid integer value. 步骤:1.启动Delphi2010,然后就报告文章先前所说的错误。2.确定之后,仍然可以进入Delphi2010,但不能建立任何project,打开旧的project也报告同样的错误。 解决方法:没办法,搜吧...最后得到结果是没原创 2010-01-25 10:55:00 · 4048 阅读 · 3 评论 -
FastReport问题整理(技巧) 之二
所有内容来源于网络:2009-08-10 FastReport调用Delphi中的自定义函数(人民币大写金额) unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, frx原创 2009-08-10 13:35:00 · 4277 阅读 · 1 评论 -
数据集DataSet导出到Excel
{ 背景:今天要把DataSet导入Excel,查询以前的贴子,一部分用Ole,速度太慢, 一部分用ADO连接到Excel文件,也很慢,一气之下把DBGrigEh的导出部分改了出来, 欢迎大家指教、改进。 功能:将数据集的数据导入Excel; 用法:With TDS2Excel.Create(TDat转载 2009-07-14 09:31:00 · 1564 阅读 · 0 评论 -
Delphi设计模式之单例模式(Singleton Pattern)
SingletonPattern模式的设计意图是:保证一个类仅有一个实例,并提供一个访问他的全局访问点。有人已经实现了这个模式,详见代码如下:interfaceuses classes,SysUtils; type TSingletonList = class(TList); TSingletonl = class public constructor Cr原创 2008-12-24 08:40:00 · 5266 阅读 · 7 评论 -
一个通用的验证类的探索
Normal 0 7.8 pt 0 2 false false false EN-US ZH-CN X-NONE原创 2008-12-09 14:47:00 · 1218 阅读 · 0 评论 -
TeeChart的多坐标系统
Normal 0 7.8 pt 0 2 false false false EN-US ZH-CN X-NONE原创 2008-12-09 14:39:00 · 3531 阅读 · 0 评论 -
FastReport安装(中文版)
TABLE OF CONTENTS内容列表I. IntroductionI. 介绍II. Manual installing of the FastReport packagesII. 手动安装FastReport包。III. Recompiling FastReport Basic Edition and Standard Edition packagesIII. 重新编译FastR翻译 2009-02-18 09:20:00 · 18525 阅读 · 1 评论 -
FastReport4.6程序员手册_翻译(一)
写在前面的话:翻译水平有限,只为更加方便查阅和使用,如果翻译不准确的地方欢迎指正,资料来源于FastReport官方网站。一、使用TfrxReport 组件工作1、加载并存储报表默认情况下,报表窗体同项目窗体构存储在同一个DFM文件中。多数情况下,无须再操作,因而你就不必采用特殊方法加载报表。如果你决定在文件中存储报表窗体或者是数据库的Blob字段(他提供了非常大的弹性,你能够在非编译程序中修翻译 2009-02-04 10:58:00 · 6039 阅读 · 0 评论 -
用RTTI方法获取组件属性的类
最近在写脚本生成,所以用到了RTTI的系列方法,记载记之。class function TSomeClass.GetCtmWnd(Component: TComponent): TPersistent;var PropList: PPropList; ClassTypeInfo: PTypeInfo; classTypeData: PTypeData; vSize: integer; v原创 2008-11-27 19:46:00 · 1488 阅读 · 0 评论 -
FastReport问题整理(技巧)
FastReport问题整理部分来自网上,部分来自网友,部分来自Demo如果有新的内容,会不断更新..更新历史:2009-02-27 加入套打方案全攻略(原:jinzhili博客)2009-03-03 FastReport打印CxGrid数据===================================================================原创 2009-01-07 16:12:00 · 15190 阅读 · 6 评论 -
Delphi多层开发方案比较
Delphi多层开发方案比较转载 2007-03-02 15:26:00 · 7261 阅读 · 0 评论 -
远程调用技术代码追踪(webservice)
最近阅读了SocketConn的源码和WebService 的源码,把追踪的过程写了下来,方便大家学习。毕竟这需要精力,时间和毅力。感谢煮茶待英雄博志区和三层数据库讨论区兄弟们的支持,特别是julian兄弟,不是他,我可能没耐心继续下去。如果有时间,大家可以继续完善。从socket和Websevice的底层实现细节,我们发现BORLAND的工程师们的构思和实现的过程。我觉得这对我们的学习应该是非常转载 2007-02-28 17:53:00 · 2913 阅读 · 0 评论 -
根据TeeChartSeries的Value加入新PointSeries值
Normal 0 7.8 pt 0 2 false false false EN-US ZH-CN X-NONE原创 2008-12-09 15:10:00 · 1218 阅读 · 0 评论 -
关于TcxCheckBox的三种状态
Normal 0 7.8 pt 0 2 false false false EN-US ZH-CN X-NONE原创 2008-12-11 17:23:00 · 2049 阅读 · 0 评论 -
Delphi中使用Hint体验windows的温柔
长时间的编程工作已经养成了一个习惯那就是当有错误发生的时候,就显示一个错误对话框,当需要提示的时候就显示一个提示对话框,当有一个可以忽略的错误的出现的时候,就显示一个警告对话框。 因此就有了当需要验证用户输入的数据时候正确的时候,如果输入的内容不合法,那么就显示一个错误的对话框。本来觉得没有什么,但是我们的测试人员给了我一个建议说:这么做太恐怖了,让用户感觉好像发生了什么不可避免的严原创 2008-12-22 09:41:00 · 4712 阅读 · 9 评论 -
获取SQLServer备份文件的信息
这段过程是获取SQLServer2000备份文件的逻辑信息,备份文件数据库文件的原始路径,备份文件的数据库文件的逻辑文件名,log文件的原始路径及逻辑文件名。其他信息详见SQLServer2000帮助procedure GetDBLogPath(DBName: string; var LogicDBName, LogicLogName, DBPath, LogPath: string);var原创 2008-12-14 09:00:00 · 2280 阅读 · 0 评论 -
XLSReadWriteII21的使用
Normal 0 7.8 pt 0 2 false false false EN-US ZH-CN X-NONE原创 2008-12-09 14:56:00 · 3552 阅读 · 0 评论 -
是什么决定了包(编译后的bpl文件)的大小
Normal 0 7.8 pt 0 2 false false false EN-US ZH-CN X-NONE原创 2008-12-09 14:53:00 · 1505 阅读 · 0 评论 -
重现Delphi的ObjectTreeView
Normal 0 7.8 pt 0 2 false false false EN-US ZH-CN X-NONE原创 2008-12-09 14:49:00 · 1396 阅读 · 0 评论 -
目录选择对话框
Normal 0 7.8 pt 0 2 false false false EN-US ZH-CN X-NONE原创 2008-12-09 14:45:00 · 1417 阅读 · 0 评论 -
TeeChart的ColorEachPoint引起的混乱
Normal 0 7.8 pt 0 2 false false false EN-US ZH-CN X-NONE原创 2008-12-09 14:41:00 · 1766 阅读 · 1 评论 -
cxExportTL4ToExcel的焦點問題
Normal 0 7.8 pt 0 2 false false false EN-US ZH-CN X-NONE原创 2008-12-11 17:31:00 · 1507 阅读 · 0 评论