对Interbase和oracel编程，怎样根据不同的错误代码写相应的错误提示？

Question

主键值重复，没有记录等这些的错误代码是什么？

Answer 1

DBConsts和bdeconst以及ADOConst单元记录了这些错误信息————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 2

to:lxpbuaa(桂枝香在故国晚秋) ：
我找到这些文件，但没找到有关primary的任何信息，另外得到了这些信息我怎么用呀？
谢谢！

Answer 3

我自己找到了 用dbExpress的我刚测试的with SQLQuery1 do
  begin
    Close;
    SQL.Clear;
    SQL.Text := 'SELECT seq1 FROM NoName';
    try
      Open;
    except
      on e:EDBEngineError do
        //ShowMessage(pchar(e.Message));
        ShowMessage(pchar(e.Errors[0].ErrorCode));
    end;
  end;OK. 
// 测试通过 ，不过它会出现两个错误代码，你需要的是后面那一个