[Angel.Matilla]

Tengo este código en BCB 6 para restaurar un BB.DD. hecha con FB 2.5:

try
{
     Query1->Transaction->Active = false;
     Afiliados->Connected        = false;
               
     IBRestoreService1->LoginPrompt = false;
     IBRestoreService1->Params->Add("user_name=sysdba");
     IBRestoreService1->Params->Add("password=masterkey");
     IBRestoreService1->DatabaseName->Add(Afiliados->DatabaseName);
     IBRestoreService1->BackupFile->Add(pItem->SubItems->Strings[2]);
     IBRestoreService1->Active = true;
     IBRestoreService1->ServiceStart();

     while (IBRestoreService1->IsServiceRunning)
          Memo1->Lines->Add(IBRestoreService1->GetNextLine());
}

__finally
{
     IBRestoreService1->Active   = false;
     Afiliados->Connected        = true;
     Query1->Transaction->Active = true;
}

La copia de seguridad a restaurar la elijo a partir de TListView en el que muestro las que hay guardadas. El problema aparece al comenzar a restaurarse el fichero, en cuanto se ejecuta por primera vez el while. Me da este error:

El error, al menos así lo interpreto, parece indicar que la base de datos está en uso ¡cuando acabo de cerrarla al inicio del proceso!