mudar o path do alias pelo programa

Delphi

06/12/2005

Ola Pessoal, possuo um aplicativo com um alias internamente e necessito que quando o usuario selecionar o alias da filial ele possa trocar automaticamente o caminho das tabelas sem ter que ficar entrando no bde para tal troca. Tenho criado dentro da tabela de empresas o path direcionamento pois nao sei como fazer com que o usuario apos selecionar a filial possa estar criando o novo caminho para ter acesso. No aguardo por alguem que saiba como executar tal comando, obrg a todos.


Amarildo

Amarildo

Curtidas 0

Respostas

Cavalcanti.fabio

Cavalcanti.fabio

06/12/2005

Olá,

Faço desta forma em meu sistema...utilizo paradox...

onde a variavel diretoriogeral é :
diretoriogeral:= ´O:\Sistema\Folha´;
Dbcodigoemp:= ´001´ ou ´002´ depende do codigo do cliente.
diretorioempresa :=diretoriogeral+´ARQ´+StrZero(StrToInt(Dbcodigoemp),3);
//aqui e excluido o diretorio do BDE
Session.DeleteAlias(´Folha´+StrZero(StrToInt(Dbcodigoemp),3));
Session.SaveConfigFile;
//aqui e criado novamente o Alias no BDE
Session.DeleteAlias(´Folha´+StrZero(StrToInt(Dbcodigoemp),3));
Session.AddStandardAlias(´Folha´+StrZero(StrToInt(Dbcodigoemp),3),diretorioempresa, ´PARADOX´);
Session.SaveConfigFile;


na clausula uses declare esta a unit:

uses
IniFiles;

caso tenha duvida basta posta...

ok.

fabio


GOSTEI 0
Amarildo

Amarildo

06/12/2005

Fabio, agradeço pela sua atenção a minha dúvida, vou estar inserindo o quanto antes, pois minha necessidade é fundamental, obrg, por estar me ajudando, um forte abraço e sucesso


GOSTEI 0
POSTAR