#1 cnpack 有这个功能没? ErrorCode 递增
很简单也很实用的
就是为每个工程设置个变量 (做ErrorCode)

达到这个效果
{函数}
function MemoMsgAddMsg(Msg:string;Level:byte=0):integer;
begin
if Msg = '' then begin
ErrorCode:=1;//一个错误代码对应一个问题这样一下就知道是在哪出错了
exit;
end;
FrmMain.StatusBar.Panels[0].Text:=Msg;
if Level >= ProcessConfig.MemoMsgLevel then begin
with FrmMain.MemoMsg.Lines do begin
if Count > ProcessConfig.MemoMsgMa ..

#1 >>Next Page

Forum:CnPack IDE 专家包（CnW ...
Thread:cnpack 有这个功能没? ...
Next Thread:Fisher反映的MSDN专家 ...

Home
Login

Powered by Discuz!