Fórum Restore com Firebird embarcado #49924

Colegas,

Deve ser uma bobagem, mas estou usando o firebird na forma embarcada. Está funcionando perfeitamente, porém eu tenho uma rotina de restore e backup onde eu utilizo TIBbackupservice e TIBrestoreservice. Se eu finalizo os processos fbserver.exe e fbguard.exe e rodo o meu programa, funciona todas as funções exceto esta. Aparece a mensagem ´Cannot attachj to services manager´.

Abaixo esta a rotina e o objeto :

object Restore: TIBRestoreService
Params.Strings = (
´user_name=sysdba´
´password=masterkey´)
LoginPrompt = False
TraceFlags = []
Verbose = True
PageBuffers = 0
Options = [Replace]
Left = 480
Top = 112
end

try
DM.Restore.DatabaseName.Clear;
DM.Restore.DatabaseName.add(dir + ´BASEST.FDB´);
DM.Restore.BackupFile.Clear;
DM.Restore.BackupFile.Add(texto);
DM.Restore.Active := true;
Memo1.Lines.Clear;
Memo1.Lines.Add(´Restore Iniciado às ´ + FormatDateTime(´hh:nn:ss´, now) + ´ horas´);
DM.Restore.ServiceStart;
While not DM.Restore.Eof do
Memo1.Lines.Add(DM.Restore.GetNextLine);
DM.Restore.Active := false;
Memo1.Lines.Add(´Restore Finalizado às ´ + FormatDateTime(´hh:nn:ss´, now) + ´ horas´);
except
on E:Exception do
begin
Application.MessageBox(Pchar(´Erro1.´+#13+
´Contate o administrador do sistema.´+13+
´Erro:´+13+e.Message),
´Erro´, MB_ICONERROR + MB_OK);
passou := false;
end;
end;

Detalhe, esta rotina funciona se o fbserver.exe estiver executando. Como faço para fazer esta rotina funcionar na forma embarcada?

Grato pela atenção dispensada.