優化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迷你版本:小機箱大愛...

熱門圖片

猜你喜歡的新聞

猜你喜歡的關注