如何利用table或者query删除1条/多条数据？

procedure TfrmMain.DelSMS( CATALOG_ID : integer ; INX: integer );
begin
    qryDelSMS.Close;
    qryDelSMS.SQL.Clear;  if INX =0   THEN //删除该分类下所有的短信
  BEGIN
    qryDelSMS.SQL.add('delete SMS WHERE ID = :CATALOG_ID ');
    qryDelSMS.ParamByName('CATALOG_ID').AsInteger := CATALOG_ID;
  END
  ELSE
  BEGIN
    qryDelSMS.SQL.add('delete SMS WHERE ID = :CATALOG_ID  AND  INX = :INX ');
    qryDelSMS.ParamByName('CATALOG_ID').AsInteger := CATALOG_ID;
    qryDelSMS.ParamByName('INX').AsInteger := INX;
  END;    qryDelSMS.ExecSQL;end;－－－
SQL中好像不能写DELETE, 系统把DELETE 截掉了...