CnPack Forum

#1 TCnSQLAnalyzer 的问题
在 CnRunSQLUnit.pas 单元中

第 247 行 " FConnection.BeginTrans;//开始事务"
第 248 行 " try"
第 250 行 " ExeRecord := FCommand.Execute(RecordAffected,EmptyParam);”
...

第 319 至 328 行...
except
on E: Exception do
begin
FNewTime := GetTickCount;
UseTime := usetime + (FNewTime - FOldTime);
msg := E.Message + #13#10#13#10;
FMsgList.Add(strNew(pchar(msg)));
Result := false;
end ..

#1 >>Next Page

Forum:CnVCL 组件包
Thread:TCnSQLAnalyzer 的问 ...
Next Thread:CnPack 组件包 200808 ...

Home
Login

Powered by Discuz!