优化delphi5.0秘籍大曝光

2019-11-18 18:50:52

字体：大中小

来源：转载

供稿：网友

本文转帖至天极网程序方舟http://itdreamer.yesky.com/
Delphi5.0是非常优秀的RAD开发工具，越来越多的人开始认识到这一点并转而使用它，但它也不是完美无缺的，实际上通过手工优化可以极大的提高它为我们工作的效率，我通过实践摸索出一些经验，借电脑报一角与大家分享：
一：实现控件面板的平滑滚动：
安装过许多控件的朋友都知道，在众多的控件中选择一个实在不是一件轻松的事，鼠标要不停点击，如果能平滑滚动该多好啊，好在Borland的专家早就想到了这一点：
建立一个文本文件，内容为：
REGEDIT4
[HKEY_CURRENT_USERSoftwareBorlandDelphi5.0Extras]>
"AutoPaletteSelect"="1"
"AutoPaletteScroll"="1"
保存为tip.reg,然后双击此文件，启动delphi，怎么样？是不是爽多了！
二：加快程序启动速度：
delphi启动确实有点慢，既要显示快闪屏幕，又要读注册表设置，对于配置低的机器简直是一种折磨，实际上我们完全可以通过启动参数来控制它：
建立一个快捷方式，目标为：D:DELPHI5Delphi5Bindelphi32.exe /ns /np
（我的delphi装在d:delphi5目录下，你要做相应改变。）
ns:no splash 不显示快闪屏幕
np:no PRoject不加载项目
三.观察内存堆分配情况：
同上，快捷方式目标为：D:DELPHI5Delphi5Bindelphi32.exe /hm /hv
此后每启动此快捷方式就可看到delphi标题栏上不停变化的堆分配字节数
四.在右键快捷菜单中增加编译及查看功能：
先为dpr文件增加功能：
建立一个文本文件，内容为：
REGEDIT4
[HKEY_CLASSES_ROOTDelphiProject]
@="Delphi Project"
"EditFlags"=hex:00,00,00,00
"AlwaysShowExt"=""
[HKEY_CLASSES_ROOTDelphiProjectDefaultIcon]
@="d:/DELPHI5/Delphi5/Bin/Delphi32.exe, 4"
[HKEY_CLASSES_ROOTDelphiProjectShell]
@=""
[HKEY_CLASSES_ROOTDelphiProjectShellOpen]
@="&Open"
"EditFlags"=hex:01,00,00,00
[HKEY_CLASSES_ROOTDelphiProjectShellOpencommand]
@="d:/DELPHI5/Delphi5/Bin/Delphi32.exe /ns %1"
[HKEY_CLASSES_ROOTDelphiProjectShellOpenddeexec]
@="[open("%1")]"
[HKEY_CLASSES_ROOTDelphiProjectShellOpenddeexecapplication]
@="DELPHI32"
[HKEY_CLASSES_ROOTDelphiProjectShellautobuild]
"EditFlags"=hex:01,00,00,00
[HKEY_CLASSES_ROOTDelphiProjectShellautobuildcommand]
@="D:/DELPHI5/Delphi5/Bin/delphi32.exe /ns %1 /b"
[HKEY_CLASSES_ROOTDelphiProjectQuickView]
@="*"
存为Delphiproject.reg,然后双击此文件，以后你就可以在以dpr为后缀的项目文件的右键快捷菜单中发现多了autobuild一项,可以马上编译生成可执行文件了，还多了快速查看一项，可以不打开Delphi而察看文件内容。
再为pas文件增加功能：
建立一个文本文件，内容为：
REGEDIT4
[HKEY_CLASSES_ROOTDelphiUnit]
@="Delphi Source File"
"EditFlags"=hex:00,00,00,00
"AlwaysShowExt"=""
[HKEY_CLASSES_ROOTDelphiUnitDefaultIcon]
@="d:/DELPHI5/Delphi5/Bin/Delphi32.exe,5"
[HKEY_CLASSES_ROOTDelphiUnitShell]
@=""
[HKEY_CLASSES_ROOTDelphiUnitShellOpen]
@="&Open"
[HKEY_CLASSES_ROOTDelphiUnitShellOpencommand]
@="d:/DELPHI5/Delphi5/Bin/Delphi32.exe /ns /np"
[HKEY_CLASSES_ROOTDelphiUnitShellOpenddeexec]
@="[open("%1")]"
[HKEY_CLASSES_ROOTDelphiUnitShellOpenddeexecApplication]
@="DELPHI32"
[HKEY_CLASSES_ROOTDelphiUnitShellcompile]
"EditFlags"=hex:01,00,00,00
[HKEY_CLASSES_ROOTDelphiUnitShellcompilecommand]
@="D:/DELPHI5/Delphi5/Bin/dcc32.exe %1"
[HKEY_CLASSES_ROOTDelphiUnitQuickView]
@="*"
存为delphiunit.reg, 然后双击此文件，以后你就可以在以pas为后缀的源码文件的右键快捷菜单中发现多了compile一项,可以马上编译生成dcu文件了，还多了快速查看一项，可以不打开Delphi而察看文件内容。
要注意你的delphi安装路径要做相应更改，对注册表不熟悉的朋友一定要谨慎做好备份。
如有任何意见及建议欢迎到bbs.netease.com中的delphi论坛我们共同讨论。

上一篇：用Delphi实现BP机、手机短讯

下一篇：用Delphi编写VxD设备驱动程序

学习交流

索泰发布一款GTX 1070 Mini迷你版本:小机

索泰发布一款GTX 1070 Mini迷你版本:小机箱大爱...

热门图片

猜你喜欢的新闻

猜你喜欢的关注