Ver Mensaje Individual
  #7  
Antiguo 04-08-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Otra opción más:
Código Delphi [-]
procedure TForm1.btnEliminarClick(Sender: TObject);
begin
 if ADOTable.IsEmpty then
    MessageDlg('No hay registros para borrar',mtError,[mbOk],0)
  else
    ADOTable.Delete;
end;
Opciones no te faltan...

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita