请告别 TMyXXX 的命名方法吧...

程序名: Demo.exe

窗体：TFrmDemo ,窗体文件 uFrmDemo.Pas

DataModule: TDMDemo, 窗体文件 uDMDemo.Pas

Procedure DoSomeThing(AName:string);

Procedure DoSomeThing(const AName:string);

加 const 为了效率，但不加 const 为了名称简洁。我取后者，以后雷同。

自定义类: TSimpleThread=Class(TThread) ,单元名 uSimpleThread.Pas

对这种通用基本类的扩展，我尝试加 Simple , 有时也加 Super ，但觉得霸道了点儿。

Procedure DoSomeThing(const AName:string); //参数加个A

var

  BCity:TSomeObject; // 对于Object, record, PRecord或Pointer 前面加个B区分

  nNum:Integer; //整数

  sHtml:string; //字串,沿用 c 风格

begin

end;

TButton: btnStart 

TEdit: edtTime

... 请参照常用控件缩写，不再举例

附：delphi 进阶基础技能说明

Delphi群:59129236

把Delphi做为工作的辅助技能，走向幸福人生！

晓不得2013 QQ:26562729