我写了如下代码
   try
      i:=StrToDate(sObj); // 这句话执行后有系统错误提示,之后才提示我想要的消息。
    except
      begin
        messagedlg('格式不正确',mtconfirmation,[mbok],0);
        DateCheck:= 0;
        exit;
      end;
    end;
怎么才能把那个系统提示消息去掉呢?

解决方案 »

  1.   

    独立在Windows下运行就是了
    IDE上当然会处理异常的http://lysoft.7u7.net
      

  2.   

    修改版:
      i:=StrToDateDef(sObj, 0);
      if i=0 then
      begin
        MessageDlg('格式不正确',mtconfirmation,[mbok],0);
        DateCheck:= 0;
        Exit;
      end;
      

  3.   

    直接运行.exe文件的确不出现系统提示消息,如果那位有可以去除那个讨厌的消息
    不要吝啬哦,我暂时先结了,上面这位热心人回答的速度太快了,忍不住现在不给分了
      

  4.   

    正解:
    Toos->Debugger Options->Language Exceptions页-〉去掉 Stop on Delphi Exceptions的钩。
      

  5.   

    非常感谢大家的热心帮助,我觉得
    gobiz(拔剑容易收剑难)的解决方法比较好
    lili1(离奇)那种方法应该也可以,不过在开发的过程中去掉异常提示感觉不是很好