数据库主键冲突，错误处理，请高手给看看（新手初学者有关问题）

数据库主键冲突，异常处理，请高手给看看（新手菜鸟问题）
数据库里面就3个字段，workid,name,age    其中workid为主键，主键不是自动排序的，是用户手动输入的
程序界面里用3个edit控件分别输入，然后保存入库（就是插入哈），如果用户输入的workid与数据库中已有的数据相同，会报错主键冲突。代码如下

unit Unit1;


interface


uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, DB, ADODB, StdCtrls;


type

  TForm1 = class(TForm)

    ADOConnection1: TADOConnection;

    ADOQuery1: TADOQuery;

    Label1: TLabel;

    Edit1: TEdit;

    Edit2: TEdit;

    Edit3: TEdit;

    Label2: TLabel;

    Label3: TLabel;

    Button1: TButton;

    procedure Button1Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;


var

  Form1: TForm1;


implementation


{$R *.dfm}


procedure TForm1.Button1Click(Sender: TObject);

begin

 if trim(edit1.Text)='' then

  begin

showmessage  ( '请输入工号，该项为必填项！ ');

  end;

  if  trim(edit3.Text)<>'' then

  begin

  with adoquery1 do

  begin

     close;

     sql.Clear ;

sql.Add('insert into mestab (workid,name,age)');

sql.add('values (:A,:B,:C)');

     parameters.ParamByName('A').Value :=strtoint(trim(edit1.text));

      parameters.ParamByName('B').Value :=trim(edit2.text);

       parameters.ParamByName('C').Value :=trim(edit3.text);

         execsql;

   end;


edit1.Text:='';

edit2.Text:='';

edit3.Text:='';

    end;

end;


end.

怎么将这个主键冲突的异常，就做个提示呀，不是弹出系统的这个报错信息。
例如数据表中已有了一条主键为pl203的记录,怎么可使再输入主键为pl203记录时,提示已经存在,主键不能重复等信息,并且不出现系统的那个提示呀。
还有个问题。。。。。我程序代码里还有些别的内容，之前没什么问题，出了这个主键冲突的问题后，每次关闭程序，就报错，并且电脑进程中的project1.exe在程序关闭后没有结束，只有手动结束了这个进程后，才能关掉那个报错提示框......更灵异的是，我在学校的机子上会像上面说的报错，进程没结束，但同样的程序复制回家里的电脑上，就不报错了
各位高手们，这怎么回事哈...新手困惑ing
大神们如果有以上主键冲突现成的代码，麻烦提供下，新手观摩学习下，先谢了，望解惑...
------解决方案--------------------
既然用ADOQuery，可以在OnPostError 事件里处理
------解决方案--------------------
你是用ADOQuery执行SQL语句，就可以捕获错误，类似：
...
try
  ExecSQL;
except
  showmessage(edit1.text + '已存在!请重新输入！');
  edit1.SetFocus;
end;

------解决方案--------------------