Delphi源程序格式书写规范
1，规范简介
本规范主要规定Delphi源程序在书写过程中所应遵循的规则及注意事项。编写该规范的目的是使公司软件开发人员的源代码书写习惯保持一致。这样做可以使每一个组员都可以理解其它组员的代码，以便于源代码的二次开发记忆系统的维护。
2，一般格式规范
2.1 缩进
缩进就是在当源程序的级改变时为增加可读性而露出的两个空格。缩进的规则为每一级缩进两个空格。不准许使用Tab。因为Tab会因为用户所作的设置不同而产生不同的效果。当遇到begin 或进入判断、循环、异常处理、with语句、记录类型声明、类声明等的时侯增加一级， 当遇到end或退出判断、循环、异常处理、with语句、记录类型声明、类声明等的时侯减少一级。例如：
if TmpInt <> 100 then
TmpInt := 100;
2.2 Begin..End
begin语句和end语句在源程序中要独占一行，例如:
for I := 0 to 10 do begin //不正确的用法
end;
for I := 0 to 10 do //正确的用法
begin
end;
2.3 空格
在操作符及逻辑判断符号的两端添加空格，例如：I := I + 1;，a and b 等，但添加括号时不需要空格。例如：if ( a > b ) then //错误的用法
If (a > b) then //正确的用法
又例如：procedure Test(Param1: integer; Param3: string);
3. Object Pascal 语法书写格式规范
3.1 保留字
Object Pascal 语言的保留字或关键词应全部使用小写字母。
3.2 过程和函数
3.2.1命名及格式
过程和函数的名称应全部使用有意义的单词组成，并且所有单词的第一个字母应该使用大写字母。例如：
procedure formatharddisk;//不正确的命名
procedure FormatHardDisk;//正确的命名
设置变量内容的过程和函数，应使用Set作为前缀，例如： procedure SetUserName;
读取变量内容的过程和函数，应使用Get作为前缀，例如：function GetUserName: string;
3.2.2 过程和函数的参数
3.2.2.1命名
统一类型的参数写在同一句中: procedure Foo(Param1, Param2, Param3: Integer; Param4: string);
3.2.2.2命名
所有参数必须是有意义的；并且当参数名称和其它属性名称重了的时候，加一个前缀‘A’, 例如：
procedure SomeProc(AUserName: string; AUserAge: integer);
3.2.2.3命名冲突
当使用的两个unit中包括一个重名的函数或过程时, 那幺当你引用这一函数或过程时
相关文档：
招聘人数： 4人
学历要求： 不限
工作年限： 不限
薪资范围： 面议
工作地点： 北京通州九棵树
Delphi程序员四名职位要求
要求:
1. 熟练使用DELPHI(C,C++, C#等)进行开发；
2. 具有良好的程序编写习惯；
3. 扎实的基本功，结构清晰、合理；
4. 良好的执行能力，较好的完成预定任务；
5. 上进心强，能吃� ......
摘
要：本文通过使用Delphi和WebServices技术开发短信应用程序的实例详细的介绍了如何在Delphi中开发基于WebServices技术
的应用程序。
关键字：Delphi；WebService；短信应用程序开发
一提起基于WebServices技术的应用程序开发，一般人首先想到的开发工具是VS.net，其实作为快速应用程序开发工具
(RAD)� ......
一个友好的用户界面,必须具有下拉菜单，弹出菜单，工具条和快捷键。同样一个功能，程序员可能要提供几种操作方式，如文本拷贝，菜单命令&Copy,快捷键Ctrl+C,工具条上的拷贝按钮，都是程序员提供给用户的操作，可以大大方便了不同层次的用户。但是，多增加一种操作方式，就意味着增加响应事件的代码� ......
windows几个重要的内核数据结构虽然网上也有相关的定义，但个人觉得不齐全定义不规范，因此用一天时间使用WinDbg+Win2000sourcecode重新定义了常用的内核数据结构，并尽可能还原微软的原结构定义，每个结构都递归到最子层的结构并且通过了测试。通过这次工作过程不仅使自己得到一次学习的机会，而且提高了自己的整体软件架� ......
重载 CreateParams 方法即可
声明：
procedure CreateParams(var Params: TCreateParams);override;
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.WndParent := 0;
end; ......
