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

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安装路径要做相应更改,对注册表不熟悉的朋友一定要谨慎做好备份。

国外一学生发明新计算机系统,用微芯片代替硬盘 《近匠》第12期:Yeelink——智能硬件云服务 三星Galaxy S5:home键内置指纹识别传感器、5.25寸2K屏幕 Google发布Google Glass使用守则 三星将发布新款智能手表 搭载Tizen系统抛弃Android 从Camera360 V5版本发布,看现代相机应用趋势 索契冬奥会API:赛事的数据直播 为什么开源企业的开源大旗正在褪色 尘埃落定 腾讯确认投资大众点评,获20%股份 Unite China·2014:上千Unity开发者狂欢、五大精品课程全面开启 下载4万首歌曲仅需几秒——蓝色巨人IBM发布新传输技术 15核芯片+数据平台,Intel软硬兼备的Hadoop战略 Facebook以160亿美元收购50名员工、4.5亿月活跃用户的WhatsApp 2014年全美最吃香职业TOP100,程序员排第一 LinkedIn向所有用户开放博客发布平台 Google与Facebook的产品研发之道 小米海外扩张第一步 红米进军新加坡 Google I/O大会时间已定,Google Glass真的来了? 精英团队PK全能型数据科学家,拼的可不只是数量 专攻移动支付?PayPal将面向全球开放移动SDK CoconutKit:iOS开发必备的开源组件库 个人隐私是如何“泄漏”的:国内外互联网企业隐私策略对比 惠普2014年Q1财报:净利润同比增16% PC业务逆势好转 “阅后即焚”挖谷歌墙角,GAE技术大牛跳槽Snapchat 日800万访客、20万RPS网站的5个9可用性架构 程序员想找好工作?那就学好Linux吧! 一周消息树:开源专家袁萌,国产COS操作系统是“杂种”,不是中国软件梦 移动周报:对话智能硬件云服务平台Yeelink Node.app:用Node.js API开发iOS“原生”应用 Google Project Tango:能3D捕捉的智能手机 成功打造Evernote API生态系统的五大经验 推荐一些适合初学者看的书吧 一家位于Montreal, Canada的公司,求购一个程序 如何保存UNICODE的字符串到硬盘上 如何将HTML文本直接显示在CppWebBrowser中?(不使用临时表) 如何保存UNICODE的字符串到硬盘上 redhat第4第5两个iso文件是做什么的 关于jsp做客户端调用ejb的问题?????望各位兄弟们救救我吧!!!!! COOL!将所有菜单设置为半透明的代码(只适用于WIN2000以下版本) 请问谁知道如何用jakarta-jmeter进行压力测试? 如何判断文件夹是否存在 在Win2K Server安装Oracle817时,没有安装数据库,后在创建数据库时出现"ORA-12560:TNS:协议适配器错误"... 请教.net服务器问题 解决这个问题,给你200分!!!!!!!!!!(回头追加给你!) 我是初学者,请问.net framework先进性在哪里? 有谁试过用JAVA编FTP软件? 很简单的listBox问题,HELP 今年大四,现在找工作,求助,我怎么样………UP有分。 寻找!! IE的文本输入框,输入一字符会联想,请问怎样去掉这个联想?(Win2K) 哪位大俠能賜教 哪位大俠能賜教 你们说VC到底要学些什么?VC更偏底层,总做这种纯技术总也做不完。迷茫~~~ 请问,在Oracle里建trigger是不是有什么说法呢?一个正常的不能在正常的trigger在Oracle里运行也说compilation errors. 请教:提取字符串里每个字符首字母,谢谢!!! aa模块代码 关于强烈要求恢复可用分增长、可用分转移、非技术区得分转换为可用分的建议!! SOS:如何找到窗口中多个进程其中我所需要的那一个? SOS:如何找到窗口中多个进程其中我所需要的那一个? 笑的人再发几个 query1.next是将指针移向下一条,啊向上条一记录是用什么命令呢? 对话框中使用工具栏如何进行更新? 关于文件指针的问题 ASP中SELECT 查询中前几条的查询如:TOP 的用法哪位讲解一下. 如何查找到两个不同数窗的不同数据 诚招ASP老师一名(请版主不要删) 提问!(欢迎讨论) 停电重启 原来已经编译通过的程序,再重新编译竟然出现了150个错误 一个很奇怪的想法 请问怎么转换以空格为分割符的文本文件转换为以TAB为分割符的文本文件?急! WIN2000下怎么设CLASSPATH (散分):BDE,ADO,dbExpress的前景如何? 关于VB调用asp的问题 如何关闭office2000文件优化器? 怎么知道combobox选中的序号如combobox.item[i]中的i 怎么知道一张图片的有效宽度及长度 浙大1082的几个疑问 系统快成功了,有个大问题 请问98是不是自带了一个局域网聊天工具? 求助!VC中起动现有的Windows程序的语句。谢谢! 请教:如何在DATAGRID控件的行标头上,写上1,2,3....的顺序号?? 请C++语言高手回答:一个有关C++语言派生的简单问题! 不能用汉字制作电脑系统,为什么不能用汉语注音符号做电脑系统呢?比如VB语言的“input”可以用“ㄕㄨˉㄖㄨˋ”(就是输入的注音符号,拼音‘shū rù’翻译过来就是了) PS和AI实质上的区别是什么.为什么PS那么普遍的使用.AI的使用面很小.他们有什么区别. 遗失的幸福用英语怎么说 续写句子 书是钥匙,能开启智慧之门; 书是良药,__________; 书是_____,__________;在_____ 填 我的书屋,我的梦 .400字作文 我的书屋,我的梦征文怎么写?结合新中国成立65周年 左边一个米右边一个少是什么字 求,写压岁钱的作文 写出歇后语的后半部分.矮子坐高登—()稻草人救火—()炒咸菜放盐巴—()擦胭脂进棺材—()各位...写出歇后语的后半部分.矮子坐高登—()稻草人救火—()炒咸菜放盐巴—() 左边一个米字 右边一个甚字 是什么字 骑马与砍杀和骑马与砍杀战团哪个好玩,有什么不同? 歇后语棺材头上雕花的下一句是什么? This shirt is cheaper ____ that one.填上合适的单词. 毛泽东的座车变迁史的第2题怎么写 18 ST.LEONARDS CL.NOBLE PARK VIC 3174 AUSTRALIA这个英文地址翻译成中文是什么意思 一个者字下面一个羽字读什么一个者字下面一个羽字读什么 英语翻译当你还是很小的时候.妈妈花了很多时间教你用勺子、用筷子,教你怎麼吃饭.教你穿衣服、系鞋带、扣扣子.教你洗脸,梳头发.我爱我的妈妈!你在渐渐长大,而妈妈渐渐的老了有一天 当 有哪个英语单词是9个字母,且第2个是l, 表事拼搏的词 毛泽东的座车变迁史练习题的第1小题怎么写? 请你更换下面各单词中的某个字母,使其成为另一个单词求大神帮助safe 、 meet 、road、hand 快来 急 食盐在20摄氏度,100摄氏度时的为36克,40克.若将100克水在100摄氏度时制成饱和溶液,溶解食盐——克,从中析出食盐固体_克;若降降温后所得溶液保持20克,50克水,则析出食盐的质量分别为_克,_克 《毛泽东的座车变迁史》 1、说说下列词语在文中的意思.横空出世 鲜为人知 y=lg(mx2-mx+1),要使定义域为R,求m 取值范围? 韩国蔚山与美国底特律都是著名的汽车城,它们有何异同? 毛泽东的座车变迁史:“这辆加长型‘大红旗’矫车堪称‘国宝’”.作者为什么要赞叹这辆车堪称“国宝”? 【欢乐女神】表达了作者什么样的精神 世界上纬度最高,跨经度最多大洲和大洋分别是?北冰洋和南极洲共同的特点? 要一篇精彩!的我的书屋我的梦作文,500字以上 欢乐女神蝶的描写片段 七年级上册历史的三次改革都起到了怎样的作用 1、桂林山水美得像() 2、他听到()从那边传来 3、大海里的鱼非常多(改夸张句) 欢乐颂中的欢乐女神是什么含义 左边一个月字旁,右边一个会是什么字? 大海掀起巨浪改成夸张句十万火急啊 大海里的鱼非常多.改夸张句 左边一个女子 右上边一个公下面是一个羽 这个字怎么读啊!急 最长的英文单词是什么求大神帮助 大海里的鱼很多 改成夸张句 英语翻译麻烦翻一下(谢绝翻译器答案 ):"欢迎留下你的脚印"(就是欢迎你留言的意思) 改夸张句:大海里的非常多. 语文人教版四年级上册语文园地七的习作怎么写? 英语翻译1.上课认真听讲2.课后认真完成作业3.考前认真复习4.有恒心,有毅力,敢于钻研5.遇到问题及时询问老师取得好成绩就这么简单! 最长的英文单词是什么?求大神帮助 大海里的鱼非常多.(改为夸张句) 人工智能与智能的定义和本质区别是什么? Sydney Australia是什么意思 Welcome to china when you have free time,I will be your guide for 10 pounds one hour.Is that OK? 英语翻译我所居住的地方是中国冬天最多雪的地方,但今年雪下的特别少.很多国家都拍了以A 为主角的电影 ,但是我觉得J扮演的最形象.我也十分欣赏J.谢绝翻译软件 australia,sydney,amazing什么意思? 海洋里的鱼非常多.(改为夸张)只要写出鱼多就可以了! 检查一下我做的对不对31、I was bad at English last term, I will try my best to learn it _D_____. A. from then on B. from last term C. from on D. from now on 32.—I think that China will win the World Cup one day. —I__A_____. The Chine 60摄氏度时,将30克硝酸钾溶于210克水中,该溶液中溶质的质量分数为---,若将该溶液平均分成三等份,则:(1)取第一份,温度升高到90℃,此时溶液溶质的质量分数为---.(2)取第二份,要使溶液的 Sydney Australia 帮我检查一下我做的对不对-1 I called____you five times yesterday.Where are you?(at)2 It's too late to go to the pictures.Why don't we call the whole thing____?(out)3 We called____to him but he could not hear us.(out)4 I called____the post 上面一个羽字,下面一个佳字.是什么字拼音字母拼 北京和澳大利亚的sydney的四季有什么不同 恐怕像这样的黑色鞋子在两个月前就不流行了.用英文翻译 AI和PS的区别 Sydney.Australia用英语怎样读?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘