Eliminar algunos registros con sql

[miguelb]

Hola:
necesito eliminar los registros de una tabla que cumplan con
una determinada condicion.
Para ello inclui en el form un Tquery, el Query1
y cuando presiono un boton ejecuto
APLICO_SQL('delete from as_asoc.db where codi_as = "005";');
y
PROCEDURE APLICO_SQL(UNSQL:STRING);
var
SQL_Tstrings :Tstrings;
begin
SQL_Tstrings := TStringList.Create;
SQL_Tstrings.Clear;
SQL_Tstrings.add(unSql);
QUERY1.active:=false;
QUERY1.sql:=SQL_Tstrings;
QUERY1.Active:=true;
end;
El problema es que no borra los registros y da el siguiente error:
Error : Error Creating Cursor Handle
La tabla existe,
el campo es de tipo string,
creo que esta todo normal.
Pero no funciona,


alguna idea?
desde ya gracias
Miguel