Estoy haciendo la copia de seguridad de una BB.DD. en Firebird con este código:
Código:
Backup->LoginPrompt = false;
Backup->Params->Add("user_name=sysdba");
Backup->Params->Add("password=masterkey");
Backup->Verbose = true;
Backup->Active = true;
try
{
Backup->DatabaseName = fPersona->Afiliados->DatabaseName;
Backup->BackupFile->Add(cInicio + "\\" + Now().FormatString("yyyymmdhhnnss") + ".gbk");
Query->Transaction->Active = true;
Query->Transaction->Commit();
Backup->ServiceStart();
while (!Backup->Eof)
cAux = Backup->GetNextLine();
}
__finally
{
Backup->Active = false;
}
La pregunta tal vez sea una tontería pero: ¿Cómo puedo saber cuantos elementos tienen que copiarse? Lo digo por poner una barra de progreso para que no parezca que el sistema se ha quedado muerto.