[hermes_32]

Hola davidfp,

Código Delphi [-]
  qeliminar.SQL.clear;
  qeliminar.SQL.add('delete from expedientes where numero=' + QuotedStr(numero.text));
  qeliminar.ExecSQL; //<- en lugar de qeliminar.Open;

Así eliminas de la tabla expedientes. Para eliminar de mas tablas deberás ingeniartelas. Si tienes relaciones entre tablas mejor. Si no, deberás realizar tantos deletes como requieras. ¿Como hacerlo?, pues poner los deletes en cascada o un bucle con un CASE OF.

Un saludo.