┌──┬──┬──┬──┬──┐table1, sttinggrid1, datasource1
│번호│    │    │    │    │
????????????????디비에디트박스에서, 번호를 입력받아
│100 │    │    │    │    │테이블에 저장을 하려합니다.
├──┼──┼──┼──┼──┤만약, 테이블에 같은 번호가 있는지(중복여부)를
│101 │    │    │    │    │알아내려면 어떻게 해야하는지?
├──┼──┼──┼──┼──┤
│102 │    │    │    │    │ex> 만약, 102번을 입력하면, 테이블에 102번이
├──┼──┼──┼──┼──┤    존재하기때문에, 에러메세지를 내려고
│    │    │    │    │    │    합니다. 다음처럼 했는데, 무조건, 메세지
└──┴──┴──┴──┴──┘    박스를 내어보내네요. -_-;


  iCode:=StrToInt(dbeCode.Text);  //번호입력

  //-----------중복되는번호가있는지확인-------------
  Table1.First;
  Repeat
    if (iCode=Table1.FieldByName('번호').AsInteger) then
    begin
      Application.MessageBox('입력하신 번호는 이미 존재합니다!' + #13 +
                          '번호를 다시 입력해주십시오!', '번호입력란',mb_ok);
      dbeCode.Clear;
      dbeCode.SetFocus;
      exit;
    end;
  until Table1.EOF;

  //---다음과 같이 해도 안되네요.
  if Table1.FindKey([dbeCode.text])=true then
  begin
    Application.MessageBox('입력하신 번호는 이미 존재합니다!' + #13 +
                         '번호를 다시 입력해주십시오!', '번호입력란',mb_ok);
    dbeCode.Clear;
    dbeCode.SetFocus;
    exit;
  end;