给位帮我看看这个简单的问题。

无奈的我c++

小弟我在c++builder里有这样一个程序，目的是删除一个我所选的对象：
void __fastcall TFrmMainPas::Button2Click(TObject *Sender)
{
  String NewString;
  Boolean ClickOk;

  NewString == "000001";
  try
  {
   ClickOk == InputQuery("删除","请输入你要删除的编号：", NewString);
   if ( ClickOk == IDOK)
   {
     if (DataModule1->;ADOQuery1->;FieldByName('ID')->;AsString == NewString)
      {
        DataModule1->;ADOQuery1->;Delete() ;
       }
   }
}
  catch (...)
   {
    Application->;MessageBox("数据库中没有你要找的编号","错误！",MB_OK);
   }
}
但是在运行的时候怎么就不能删除呢？运行没有错误。