我的Delphi开发经验谈
我的Delphi开发经验谈
作者：Icebird
--------
开发环境
--------
Delphi
7是一个很经典的版本，在Win2000/XP下推荐安装Delphi 7来开发软件，在Vista下推荐使用Delphi 2007开发软件。安装好Delphi
7后，应立即安装Delphi 7 Update Pack 1，Delphi
2007则建议尽量安装最新的版本。工欲善其事，必先利其器，为了提升开发效率，为了能更加得心应手的处理接下来的开发工作，我们有必要安装一些有用的开发辅助工具（Delphi将此类插件以Expert命名）。首先推荐的是DelForExp这个源代码格式化工具，集成在IDE里，使用相当方便。即使我所写代码的风格非常好，但是还是免不了阅读某些人写的乱七八糟的代码，这时DelForExp就能派上用场了，1秒钟就能让代码能看上去顺眼多了。GExperts曾经是一个非常出名的工具，可现在都不怎么更新了，里面有几个功能还是值得一用，比如Grep
Search, Replace Components, Code Proofreader等。强烈推荐安装CnPack IDE
专家包，相信我，它会让你的Delphi更好用。Delphi
7是不支持重构的，因此我还建议安装Castalia，这个工具中某些功能还是很不错的。CodeRush一直都是Delphi下最强大的工具，可是由于安装后比较容易与其他工具冲突，让人不得不忍痛割爱。Delphi
7下建议安装Delphi
SpeedUp这个IDE加速工具，其原理是在Delphi启动前，替换RTL的函数为来自FastCode工程的执行效率更高的函数。ModelMaker Code
Explorer为Delphi增加了一些方便重构代码的功能，值得安装使用。
第一次启动Delphi 7，关闭设置中的Delphi
Direct以禁止Delphi访问Borland服务器，勾选Show Compiler
Progress选项以便编译程序时可以看见编译进度，然后分别设置所安装的专家的选项，再对Delphi的窗体布局按自己的喜好调整，调整好了然后将其保存为默认布局。关闭工程，设置好默认的工程选项。接下来就可以安装控件包了。如果是在项目小组中配置开发环境，因为可能所需的控件比较多，安装比较麻烦，建议由一个有经验的开发人员将那些散装控件预编译后做成安装程序供小组其他成员安装。
--------
软件设计
--------
在整理自己的思路的时候可以采用PersonalBrain来画思维导图，这是一个拓展脑力，激发思维的一个活动，并且将自己的想法全部记录下来，并在整理的过程当中可以发现内在联系与更多的问题，在接下来的设计中加以考虑。做设计�
相关文档：
最近经常会模拟网页提交返回网页源码，然后获得网页中相应的元素，于是需要常常解析Html中相应的各种元素，网络是个好东西，搜索一番，就找到了
好几个Delphi版本的HtmlParser的类库，试着使用了几个，发现解析起来都不完整，或多或少的回出现一些问题！于是想到了如果界面上有一个浏
览器，我们可以通过WebBrowser的Docu ......
转自：http://www.52delphi.com/List.asp?ID=597&Page=1
核心提示：函数需要 uses Direct3D9,D3DX9; 偶然发现一个函数可以直接保存表面到文件1！所以修改了一下，函数为：...
procedure CaptureScreen(Const FileName: string);
var
BitsPerPixel: Byte;
pD3D: IDirect3D9;
pSurface: IDirect3DSurface9;
......
由于项目的需要，近期开始学习用delphi开发一个软电话控件。
以前接触过一些delphi开发方面的东西（当然都是些皮毛啦），但没接触过ocx控件的开发，在此把一些简单的东西记下来，一方面以后自己可以再学习，另一方面希望对刚刚学习delphi开发ocx控件的初学 ......
研究了一下Pop3的邮件接收协议，然后随手写了一个Pop3的邮件接收控件！Pop3的邮件协议实际上是很简单的，知道那几个命令就行了，与服务器之间
的交互是一问一答得方式，控制起来也容易，相对而言邮件格式的解析倒是更加麻烦一点！于是也便顺带着将MIME邮件格式给熟悉了一下！总归说来，规律性比
较强，先获取最大的顶层框 ......
type
TCharStack = class(TStack)
private
function GetTop: Char;
public
function Pop: Char;
function Push(Item: Char): Char;
property Top: Char read GetTop;
end;
const
FindSet = ['(',')'];
implementation
{$R *.dfm}
{ TCharStack }
......
