如题!

解决方案 »

  1.   

    exception  ......  end; 之间怎么写呢?
      

  2.   


    try
    ...//你的数据库操作
    except
    ...//这里判断你的错误是否是数据为空和数据与主键相同,并作出处理
    end
      

  3.   

    判断呀,空的if ...='' or = nil主键:你在保存之前查找是否有重复的,有的话就提示呀
      

  4.   


      except
        if(Edit1.Text:='') then
        showmessage('出错拉!');
        end;这有什么问题吗,怎么老报错?
      

  5.   

    if(Edit1.Text:='') then
        showmessage('出错拉!');
    1::=应为=
    2:Edit1.text最好写为:Trim(Edit.text)。不然的话后患无穷