Fórum Alterar Alias do BDE via delphi #16803

02/03/2010

0

Estou com a seguinte necessidade. Tenho um programa que ainda esta no paradox e preciso em tempo de execusao alterar o Path de um ALIAS paradox do BDE.   Como faço isso.     Desde já agradeço
Adriano Silva

Adriano Silva

Responder

Posts

03/03/2010

Wesley Yamazack

Olá amigo, vou fazer um exemplo e logo retornarei.

Um abraço
Wesley Y
Responder

Gostei + 0

04/03/2010

Wesley Yamazack

Olá amigo,
   Para resolver teu problema, você pode criar no BDE Adminsitrador, os dois alias que deseja, e em tempo de execução trocar os parametros da DataBase1 da seguinte forma

  Database1.Params[0] :='C:\Program Files\Common Files\CodeGear Shared\Data'; //INforme aqui os dados do novo //alias
  Database1.Params[1] :='PARADOX';
  Database1.Params[2] :='FALSE';
  Database1.Connected;

Seria esta tua dúvida ?

Um abraço

Wesley Y
Responder

Gostei + 0

08/03/2010

Adriano Silva

Então, não é exatamente isso que eu preciso...eu preciso alterar o alias "fisicamente" ou seja...a alteracao do alias no BDE deve ficar gravada no aquivo de configuracao. Isso eu nao to conseguindo fazer nem a pau.    
Responder

Gostei + 0

09/03/2010

Wesley Yamazack

Olá amigo, estou procurando uma forma de fazer aqui a mudança do path, peço que aguarde um pouco

Um abraço

Wesley Y
Responder

Gostei + 0

09/03/2010

Wesley Yamazack

Olá amigo, consegui fazer aqui uma forma de criar um determinado alias

procedure AliasCreate2(AliasName, caminho: String);
begin
  with session do
  begin
    if IsAlias(AliasName) then
    begin
      DeleteAlias(AliasName);
      SaveConfigFile;
    end;
    AddStandardAlias(AliasName, caminho, 'PARADOX');
    SaveConfigFile;
  end;
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  AliasCreate2('DevMedia', 'C:\Program Files\Common Files\CodeGear Shared\Data')
end;

Veja se isso consegue te ajudar em alguma coisa, estou procurando como alterar o caminho.

Um abraço

Wesley Y
Responder

Gostei + 0

18/03/2010

Wesley Yamazack

Olá amigo , fechamos o chamado por falta de retorno, se existir alguma dúvida reabrimos o mesmo.


Att,

Wesley Y
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar