大家看看我的编程风格(0分)

procedure TUserInfoFrm.FormCreate(Sender: TObject);
var
//执行的SQL语句
sSqlCommand : WideString;
//执行结果返回集
Vdata: OleVariant;
//循环变量
I : integer;
//CTRwebservice 接口
CTRInterface : ICTRAppFun;
sData : String;
begin
inherited;
iPowerFlag := 255;//初始状态为无
//当前窗体上的编辑框不可用
InvaildComponet(UserInfoFrm);
sSqlCommand := 'select * from CustomerInfo where CUSTOMER_TYPE=0' ;
CTRInterface := (CTRCustomerData.CustomerData.HRIOCtrWebservice as ICTRAppFun);
try
//得到用户组纪录
CTRInterface.GetUserInfoData(sSqlCommand,Vdata);
self.cdsClient.Active := false;
self.cdsClient.XMLData := VData;
//设置字段显示宽度
for i:=0 to cdsClient.FieldCount-1do
begin
dbgShowMsg.Columns.Items.Width := 70;
end;
//得到所有用户用户组
//在调用一次就出错，但在调试模式下就没有问题
sSqlCommand := 'select * from CustomerInfo';
CTRInterface.GetUserInfoData(sSqlCommand,Vdata);
self.cdstemp.Active := false;
self.cdstemp.XMLData := VData;
finally
CTRInterface := nil;
end;

end;

我们经理说的编程有问题，我不信他．．．让大家看看

风格问题不大，主要是注释不好，太繁琐。不需要的注释，只能说是噪音。而且注释与代码的间隔有问题。既然用了//，能注释在语句后面就放在后面。总体说明，有问题的地方，一般是在函数头做说明。总的来说，代码看着比较散，结果就是乱。

同意楼上的，另外补一句：
查询SQL语句尽量避免使用'*'，这是在对数据库访问的习惯问题，不要懒得写那几个字段名

嗯， 我也同意 jhwh 的看法， 我一开始没有注释习惯， 后来学着加， 但是还是没有形成习惯， 看了敏捷的说法之后。 我的代码基本没有注释。 注释太多，看着很罗嗦，烦人。 好的程序， 不需要注释。
干净， 利落， 简单， 准确， 规范。就这样， 代码本身就是文档。

类声明的注释远远比实现代码注释更重要。
代码的注释应该是针对功能块，而不是针对一句两句的代码。当然有特别的地方例外。
还有一个经常被忘的，就是更改了代码要记得更新注释，错误的注释远比没有注释危害更大。