Eliminar Registro

[agustin173]

hola muchachos Saludos para todos

Tengo un problema con un codigo que no quiere eleminarme no se porque me explico mejor

estoy usando delphi 7
Un Adoquery llamado = Temp
Una tabla llamada = Pais
Con tres campos llamados (Codigo, Fecha y Pais)
tres Edit llamados (EDCodBuscar, EDFechaBuscar y EDPaisBuscar)
y un boton llamado = Eliminar

el codigo es el siguiente:

Código Delphi [-]
// Elimina los Datos en la Base de Datos
 IF Application.MessageBox ('Desea Eliminar Este Registro'+
           Chr(13)+'',
          '',mb_YesNo+MB_IconStop) = idYes Then
    Begin
     Temp.SQL.Clear;
     Temp.Sql.Text:='Delete from Pais where Codigo = :Codigo and Fecha = :Fecha and Pais = :Pais';
     Temp.Parameters.ParamByName('Codigo').Value:= EDCodBuscar.text;
     Temp.Parameters.ParamByName('FECHA').Value:= FormatDateTime('yyyy/mm/dd',now);
     Temp.Parameters.ParamByName('Pais').Value:= EDPaisBuscar.text;
     Temp.ExecSQL;
     ShowMessage('Registro Eliminado');
     PaisModificar.Enabled := False;
     PaisEliminar.Enabled := False;
    End;

Por favor miren a ver porque no me elimina no entiendo que esta pasando