Deletando com query

QExclui.Close;
QExclui.Sql.Clear;
QExclui.SQL.Add('DELETE FROM TBEXEMPLO ' +
'WHERE (TBEXEMPLO.CodigoP = :EdCodigoP) AND ' +
'(TBEXEMPLO.CodigoS = :EdCodigoS) ');
QExclui.PARAMBYNAME('EdCodigo').AsInteger := 1;
QExclui.PARAMBYNAME('EdCodigoS').AsInteger := 5;
QExclui.ExecSQL;