错误提示是什么?你的程序中在执行了MessageDlg之后的代码都作了些什么工作?这个错误有可能是你调用MessageDlg之后的代码引起的。

解决方案 »

  1.   

    messagedlg用做输入一段要查找的字符,然后到相应的数据库查找,然后返回结果
      

  2.   

    我估计你是点‘取消’后,程序依然执行了查找功能。 
    你的MessgageDlg是否一个函数还是一个form?
    你可将MessageDlg做成一个返回值为布尔型的函数。如果点取消返回为false,
    if messagedlg then find ... else exit;
    如果是form,可设置其ModalResult值,如果点确诊则其值为MrOK;
    if form.modalresult = mrok then find... else exit;