[ecfisa]

Empezado por pape19

...
Hay alguna forma de vaciar las tablas por código desde delphi; o bien, lo que conviene es eliminar tales tablas, y utilizar los scripts para recrear estas tablas?.

No sé que componentes usas para conectarte, pero con IBX, podrías hacer:

Código Delphi [-]
procedure ExecCommand(const Command: string; qy: TIBQuery);
begin
  qy.Close;
  qy.SQL.Text := Command;
  qy.ExecSQL;
  qy.Transaction.CommitRetaining;
end;

LLamada de ejemplo:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  ExecCommand('DELETE FROM DETALLE', IBQuery1);
  ExecCommand('DELETE FROM MAESTRO', IBQuery1);
  ExecCommand('ALTER SEQUENCE G_DETALLE RESTART WITH 0', IBQuery1);
  ExecCommand('ALTER SEQUENCE G_MAESTRO RESTART WITH 0', IBQuery1);
end;

Saludos