procedure TRepairThread.Execute; 
begin
  while not bQuit do 
  begin
    if bRun then 
    begin
      EnterCriticalSection(MyCsVal);
      try
        try
          RepairBet;
        except on E: Exception do
            Debug_File('try\Main0012.txt', formatdatetime('HH:NN:SS.ZZZ', now) + ' ' + E.Message);
        end;
      finally
        LeaveCriticalSection(MyCsVal);
      end;
    end;
    Sleep(MyOption.iRepairTime[1]);
  end;
  FreeOnTerminate := true;
end;








try
    //代码

    finally


异常
    end;

你好.我是全职网赚工作者.
如果你有时间有电脑.
想在网络上创业.请联系我..
项目绝对真实.详情QQ空间资料
加盟请联系 QQ908889846