[firebase-br] Comandos Gfix no Delphi

[Fábio]

Tente assim:

Coloque um IBValidationService da paleta Interbase Admin.


procedure TForm1.Button1Click(Sender: TObject);
begin
   with IBValidationService1 do
   begin
      LoginPrompt:=False;
      Params.Add('user_name=SYSDBA');
      Params.Add('password=masterkey');
      DatabaseName := 'caminho + nome do BD';
      Options := [ValidateFull, ValidateDb];
      Active := True;
      try
         ServiceStart;
         while IsServiceRunning do Sleep(10);
            ShowMessage('Validação completa.');
      finally
         Active := False;
    end; //try
  end; //with
end;



Fábio


On Thu, 23 Dec 2004 17:36:08 -0200, Djair <djairmg em terra.com.br> wrote:
> Alguém sabe como executar comandos do Gfix via Delphi?
> 
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
> Para editar sua configuração na lista, use o endereço http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
>