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
[-]
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