Como Preguntar antes de borrar un registro

[look]

Podrias utilizar el evento BeforeDelete de tu tabla:

Código Delphi [-]
procedure TForm1.Table1BeforeDelete(DataSet: TDataSet);
begin
if Application.MessageBox('¿Realmente desea Eliminar el Registro?', 
  '¿Seguro?', MB_YESNO + MB_ICONQUESTION) = IDYES then
begin

table1.delete
end;
end;

Talvez Te Sirve



Edito:


se me adelantaron