我要将文本导入数据库,这时文本有格式要求。如何捕获输入文本的格式不符的异常?

解决方案 »

  1.   

    try
    adodataset1.LoadFromFile(odtxt.filename);
    except
    Application.MessageBox('有效文件已成功导入','系统提示',mb_ok+mb_iconerror);
    end;
      

  2.   

    try
    adodataset1.LoadFromFile(opendialog1.filename);
    except
    Application.MessageBox('文本格式错误','系统提示',mb_ok+mb_iconerror);
    end;
    这样做有什么错吗?为什么不能在系统提示错误前捕获异常?应该如何做?
      

  3.   

    try
    adodataset1.LoadFromFile(opendialog1.filename);
    except
    on E:Exception do
    Application.MessageBox(E.message);
    end;