说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

Delphi5优化

HTML文档下载 WORD文档下载 PDF文档下载
Delphi5优化

Delphi5.0是非常优秀的RAD开发工具,越来越多的人开始认识到这一点并转而使用它,但它也不是完美无缺的,实际上通过手工优化可以极大的提高它为我们工作的效率,我通过实践摸索出一些经验,借电脑报一角与大家分享:

一:实现控件面板的平滑滚动:

安装过许多控件的朋友都知道,在众多的控件中选择一个实在不是一件轻松的事,鼠标要不停点击,如果能平滑滚动该多好啊,好在Borland的专家早就想到了这一点:

建立一个文本文件,内容为:

REGEDIT4

[HKEY_CURRENT_USER\Software\Borland\Delphi\5.0\Extras]>

AutoPaletteSelect

="1"

AutoPaletteScroll

="1"

保存为tip.reg

然后双击此文件,启动delphi,怎么样?是不是爽多了!

二:加快程序启动速度:

delphi启动确实有点慢,既要显示快闪屏幕,又要读注册表设置,对于配置低的机器简直是一种折磨,实际上我们完全可以通过启动参数来控制它:

建立一个快捷方式,目标为:D:\DELPHI5\Delphi5\Bin\delphi32.exe /ns /np

(我的delphi装在d:\delphi5目录下,你要做相应改变。)

ns:no splash 不显示快闪屏幕

np:no project不加载项目

三.观察内存堆分配情况:

同上,快捷方式目标为:D:\DELPHI5\Delphi5\Bin\delphi32.exe /hm /hv

此后每启动此快捷方式就可看到delphi标题栏上不停变化的堆分配字节数

四.在右键快捷菜单中增加编译及查看功能:

先为dpr文件增加功能:

建立一个文本文件,内容为:

REGEDIT4

[HKEY_CLASSES_ROOT\DelphiProject]

@="Delphi Project"

EditFlags

=hex:00

00

00

00

AlwaysShowExt

=""

[HKEY_CLASSES_ROOT\DelphiProject\DefaultIcon]

@="d:\\DELPHI5\\Delphi5\\Bin\\Delphi32.exe

4"

[HKEY_CLASSES_ROOT\DelphiProject\Shell]

@=""

[HKEY_CLASSES_ROOT\DelphiProject\Shell\Open]

@="&Open"

EditFlags

=hex:01

00

00

00

[HKEY_CLASSES_ROOT\DelphiProject\Shell\Open\command]

@="d:\\DELPHI5\\Delphi5\\Bin\\Delphi32.exe /ns %1"

[HKEY_CLASSES_ROOT\DelphiProject\Shell\Open\ddeexec]

@="[open(\"%1\")]"

[HKEY_CLASSES_ROOT\DelphiProject\Shell\Open\ddeexec\Application]

@="DELPHI32"

[HKEY_CLASSES_ROOT\DelphiProject\Shell\autobuild]

EditFlags

=hex:01

00

00

00

[HKEY_CLASSES_ROOT\DelphiProject\Shell\autobuild\command]

@="D:\\DELPHI5\\Delphi5\\Bin\\delphi32.exe /ns %1 /b"

[HKEY_CLASSES_ROOT\DelphiProject\QuickView]

@="*"

存为Delphiproject.reg

然后双击此文件,以后你就可以在以dpr为后缀的项目文件的右键快捷菜单中发现多了autobuild一项

可以马上编译生成可执行文件了,还多了快速查看一项,可以不打开Delphi而察看文件内容。

再为pas文件增加功能:

建立一个文本文件,内容为:

REGEDIT4

[HKEY_CLASSES_ROOT\DelphiUnit]

@="Delphi Source File"

EditFlags

=hex:00

00

00

00

AlwaysShowExt

=""

[HKEY_CLASSES_ROOT\DelphiUnit\DefaultIcon]

@="d:\\DELPHI5\\Delphi5\\Bin\\Delphi32.exe

5"

[HKEY_CLASSES_ROOT\DelphiUnit\Shell]

@=""

[HKEY_CLASSES_ROOT\DelphiUnit\Shell\Open]

@="&Open"

[HKEY_CLASSES_ROOT\DelphiUnit\Shell\Open\command]

@="d:\\DELPHI5\\Delphi5\\Bin\\Delphi32.exe /ns /np"

[HKEY_CLASSES_ROOT\DelphiUnit\Shell\Open\ddeexec]

@="[open(\"%1\")]"

[HKEY_CLASSES_ROOT\DelphiUnit\Shell\Open\ddeexec\Application]

@="DELPHI32"

[HKEY_CLASSES_ROOT\DelphiUnit\Shell\compile]

EditFlags

=hex:01

00

00

00

[HKEY_CLASSES_ROOT\DelphiUnit\Shell\compile\command]

@="D:\\DELPHI5\\Delphi5\\Bin\\dcc32.exe %1"

[HKEY_CLASSES_ROOT\DelphiUnit\QuickView]

@="*"

存为delphiunit.reg

然后双击此文件,以后你就可以在以pas为后缀的源码文件的右键快捷菜单 中发现多了compile一项

可以马上编译生成dcu文件了,还多了快速查看一项,可以不打开Delphi而察看文件内容。

要注意你的delphi安装路径要做相应更改,对注册表不熟悉的朋友一定要谨慎做好备份。

UPYUN CTO黄慧攀:UPYUN这些年,一段“刚好”的旅程 2015移动游戏重中之重:需成功把握1%付费用户的心 UNITE 2015 BEIJING 20大议题首爆 死路一条?智能硬件免费没有未来 APICloud推出“模块 Store” 公布APP创业 “Time to Market”战略 极路由加入海尔U+联盟 可跨品牌控制多款家居设备 《近匠》Amaze UI:做最懂中国程序员的开源HTML5框架 Testin CTO徐琨:要做测试领域的阿里云! TIOBE 2015年2月编程语言排行榜:JavaScript排名达历史最高点 机智云发布第二代GoKit开发板,兼容Arduino与Intel Edison 计算机视觉,让冰冷的机器看懂这个多彩的世界 昔日学霸反哺教育 打造教育领域今日头条 第三方DevOps实践报告发布 84%中国企业预将受益 《程序员必读之软件架构》作者Simon Brown:架构师与程序员的区别 Xcode 6.3 Beta发布,Swift 1.2带来哪些新变化? 应用生与死:移动测试究竟该怎么搞? Chrome将跟SPDY说再见,拥抱HTTP/2 ImageNet挑战赛中超越人类的计算机视觉系统 微软发布首款Android可穿戴设备人工智能产品 红包大战!双11过后,微信支付宝的又一个营销游戏 O2O大潮来袭,洗牌将至? 谈谈UI架构设计的演化 Node.js 开源基金会成立,Joyent让出领导权 LinkedIn分布式实时性能跟踪与效率优化实例 DIY机器人不是事!软硬两不误的开发平台RoboCORE 详解OS X和iOS图像处理框架Core Image 快的打车联合创始人兼技术副总裁闻诚:CTO要有“334”能力 阿里巴巴正式加入W3C,成为W3C会员 在Swift中,如何像Objective-C定义可选接口? DARPA:4年内推出具备触觉的机械手 Silver:用Swift编写iOS、Android和.NET应用 如何用Daemon解压ISO文件? 请教:怎样解决英文版sql server 2000的中文数据输入问题(英文版win2000也有这个问题) aspimage注册问题 请问GetLocalTime()与GetSystemTime()的区别??? Visual Studio.Net RC2都出来N段时间了,为什么还不使?! 请教:如何将HDLC协议的数据流复原,即我接收到符合HDLC规程数据,怎样去掉0和标志,获取有用的数据? 求助:一个派生类问题 手机的软件测试分那几部分? 这段代码里表格为什么不会出现? 一个关于win2000advanced server升级sp2的问题。 怎么设置Listbox!急!急! 什么地方有关于j2ee的资料? 关于sqlplus的spool功能?(必给分) 关于System.net 浏览器下载怎样设置他不自动打开word,excel,servlet程序怎么写啊? *.iso是什么文件??虚拟光驱用的吗??如何运行?? 局域网内读取(只是读取)服务器内数据库(.MDB) 有什么可行的办法? 谁有aspedit 2001 build 29 的破解与 汉化 偶的win2000p打不开txt文件,说缺少prontpg.exe文件,怎么回事呢?//牛虻 如何更改对话框上的字体大小。。我好象在对话框的属性设置里没有看到关于字体的设置 怎样才能使我的QQ正常上网? 高手注意!!! 谁能精确的告诉我需要哪几个文件就可以在不同的机器(系统不同)上执行编译好的vb6.0程序 勇敢的警察!?!! 各位大侠,小妹问一个关于Property Sheet的问题,怎么把下面的“应用,帮助,取消“设置成不显示 用installshield express制作安装程序,程序有关于SQL Server的连接,应怎样处理? 各位侠士,vc中怎样读取DBGrid Control中的数据?怎样执行sql 语句?就向delphi中一样?拜托!拜托! 版本控制问题[Fatal Error]Internal Error: L519 如何在Exhcnage server 服务器上安装反病毒软件 apache服务器如何同tomcat4.0 结合起来. 字符串中怎么显示“”,例如要显示字符串-----"“ID”是必选字段"。 求助Applet Servlet CreateOleObject('ADODB.Connection')怎么用? 哪位有AIX下的cc,xlC,make的中文使用说明?我的英语太差,看系统的帮助头都大了。 谁有SHA1算法源代码的,给我一份,我很急,一定给分!有网址的,也给分? ODBC SQL SERVER DRIVER timeout expired错误,不知如何解决 请问那位大侠知道哪有北大出版社出版的WINDOWS程序设计这本书的电子版下载 如何控制session的有效时间? VBA下怎样实现...... 很简单的问题,如果得到OS是什么啊? VB怎样调用Oracle没有包的存贮过程? 哪位能提供AIX下的cc,xlC,make的中文使用说明?我的英语太差,看系统的帮助头都大了! 那位有用网叶通过servlet提交数据的例子,越简单越好 救命啊! ----关于漂浮的工具条的隐藏(按钮失踪了!)。 主题:为何我的机子只能进入DOS平台,无法再进入Windows界面? 请问什么地方有《UNIX环境高级编程》的随书源代码下载,谢谢!! 如果得到OS的类型啊?用什么API函数啊? 请问哪有Linux的源代码下载??? 作者如何获得他自己编写的程序的版权及著作权? SOS!!请高手速指点, 立刻要用到,谢谢!! 报表字段过长如何分行打印? 1um等于多少mm 有30千克糖果,每2分之4千克装一袋,现在已经装了总数的3分之2,已近装了多少袋? L与cm^3的换算是什么 1UM等于多少米 有一包糖,如果吃掉6分之1千克,还剩3分之2千克,这包糖原来有多少千克,如果吃掉这包糖的6分之1,还剩3分之2千克,这包糖原来有多少千克做成一个无盖的长方体水箱。做这个水箱至少要用铁皮 七(15)班同学上体育课,排成3行少1人,排成4行多3人,排成5行少1人,排成6行多5人.上体育的同学有多少名 1um等于1丝 4/5米的钢柱质量为1/25吨,同样的钢柱4/5吨长()米 2.5μm=?m 科学计数法 一捆铁丝,第一次剪去百分之四十,第二次剪去第一次的百分之二十五,还剩下8米,这困铁丝长多少米? dm代表什么长度单位 某班同学上体育课,如果每排3人,就多出1人,如果每排6人,就多出4人每排7人择多出5人快这个班至少有多少人 英文名汉语米蕾丝,英文名怎么写? dm数学里代表什么? 用科学计数法表示1、银原子直径为0.0003微米,相当于多少米?2、350毫米^2的芯片上能集成5亿个元件,1个元件占多少平方毫米?3、1纳米相当于一根头发丝直径的六万分之一,一根头发丝的直径大约 把8米长的一根绳子平均分成5段,每段是全长的( ),每段长( )米. dm在数学表示什么长度单位? 七(15)班同学上体育课,排3行少1人,排4行多3人,排成5行少1人,排成6行多5人,问体育课最少有多少人? 1nm=10的-9次M,那么0.05MM=_____nm 长度单位里 dm表示什么 设有理数M,用科学计数法记为M=a×10×5,则M有几位整数? 把2米的绳子平均分成4段,每段长( )米,每段占全长的( ). "dm"是什么长度单位? 小红用160元买了棉花糖和果汁糖各5包.3包棉花糖的售价刚好是5包果汁糖的售价.棉花糖和果汁糖各售多少元请您用中合算式回答! 把3分之2米的绳子平均分成4段,每段占全长的( )分之( ),每段长( )米? mil厚度单位1.6mil等于多少丝?急用! 小红用160元买了棉花糖和果汁糖各五包.三包棉花糖的售价刚好是五包果汁糖的售价 芭比的英文怎么拼?我要查一首英文歌,不晓得芭比怎么拼写. mil是什么单位 小红用160元买了棉花糖和果汁糖各5包,3包棉花糖的售价刚好是5包果汁糖的售价.棉花糖和果汁糖每包各多少 把2米长的绳子平均分成3段,每段占全长的( ---- )每段长( )米 1"等于多少mil?如何换算? 小红拿了160元买棉花糖果汁糖个5包3包棉花糖等于5包果汁糖问果汁糖和棉花糖各多少元? 把2米长的绳了平均分成4段,每段长( ),每段占全长的( ),每段是2米的( ) mil与"的换算关系? 小红用160元买了棉花糖和果汁糖各5包.3包棉花糖的售价刚好是5包果汁糖 把2米长的绳子剪成相等的5段,每段长用小数表示是几米,用证书表示是几分米,每段绳子是全长的几. 1cm等于多少微米 照片所有尺寸和cm的换算 把10米的绳子,平均分成5份,用分数表示每份是()米,用小数表示每份是()米,每份是这根绳子的( / ) 长度单位1nm=10(-9次幂)则25100nm=-----m? 把8/13吨平均分成5份,求每份是多少就是求8/13吨的几分之几是多少?算式是( ). 把4米长的铁丝平均分成5段,每段长用分数表示( )米用小数表示( )米.每段长是1米的( ),是全长的( 三围 36:24:36是个怎样的身材? 1 cm等于多少磅?1mm 等于多少磅? 求铁板重量.四米长,一米五二宽,四毫米厚.有多重?换算成斤 我1.67cm,三围是90 65 87可以吗 要算成36 24 34那样是多少 1mm=( )cm 暗影芭比用英语怎么说 关于长度单位的数学日记怎么写? 1mm方等于多少cm^2 把3米长的绳子平均分成5段,每段长( )米,每段占全长的( ).(括号里填分数) 长度单位数学日记的写作 1微米=()米 用科学计数法吧! 一捆铁丝,第一次剪去三分之七米,第二次比第一次多剪去二分之五米,此时还剩下25米.这捆铁丝原来有多少米? 写一则数学日记(要求带有长度单位和面积单位) 一微米等于多少米?科学计数法 1um等于多少克 您好:我是做纸的,面纸为PVC材质.分两层 面纸加底纸共380um.我想知道um与克的怎么换算的.越详细越好. 写一篇数学日记内容是关于长度单位二年级 1毫米=1000微米,2.5微米可以用科学记数法表示为,(急用
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn