Procedimiento almacenado y Ado

[LucianoRey]

Bueno aqui de nuevo, guillotmarc hice lo que me dijiste y ya no me marca ese error, ahora me da uno que dice: -El nombre de objeto Mibase no es valido-, le cambie el nombre pensando que fuera una palabra reservada pero no es así, sabes algo al respecto, mi codigo en Delphi es el siguiente:

if MessageDlg('¿Desea eliminar el registro?',mtConfirmation,[mbYes,mbNo],0)=mrYes then
DataModule1.ADOStoredProc2.Close;
DataModule1.ADOStoredProc2.Active:=(0=0);
// DataModule1.ADOStoredProc2.Parameters.Clear;
// DataModule1.ADOStoredProc2.Parameters.ParamByName('@MiBase').Value := Quetabla;
// DataModule1.ADOStoredProc2.Parameters.ParamByName('@Qcampo').Value := DBGrid1.Fields[0].AsString;
DataModule1.ADOStoredProc2.Parameters.Items[1].Value := Quetabla;
DataModule1.ADOStoredProc2.Parameters.Items[2].Value := DBGrid1.Fields[0].AsString;
DataModule1.ADOStoredProc2.ExecProc;
DataModule1.ADOStoredProc2.Open;
DataModule1.ADOStoredProc2.Active:=(0=0);
// DataModule1.SQLQuery1.Close;
// DataModule1.SQLQuery1.Active:=(0=1);
// DataModule1.SQLQuery1.ParamByName('scla').AsString:=DBGrid1.Fields[0].AsString;
// DataModule1.SQLQuery1.SQL.Text:='delete from '+Quetabla+' where clave=:scla';
// DataModule1.SQLQuery1.Open;
// DataModule1.SQLQuery1.Active:=true;
, perdón por los comentarios es para que vean los cambios que he hecho, gracias otra vez.