Mostrar o path da base de dados do Aplicativo

Delphi

10/05/2004

Bom dia,

Estou com o seguinte problema:

Preciso colocar no Caption da barra de titulo do formulário e em um label dentro do formulário, o endereço do path da base de dados. Por exemplo: c:\Meuprograma\BasedeDados.

Como meu programa tem 3 bases de dados, preciso ao abrir o aplicativo, poder selecionar qual o path(base de dados) desejo usar.

Uso Paradox/D7.

Agradeceria qualquer ajuda recebida.


Bom dia a todos.

dli


Dli

Dli

Curtidas 0

Respostas

Sistemald

Sistemald

10/05/2004

Se você usa BDE.
Declare a [b:cb1ea9fdcf]unit[/b:cb1ea9fdcf] BDE.
Declare esta Var:
WAlias : TStringList; //Capitura o Alias do Bde
WServidor : String; //Retorna o Caminho


e utilize este codigo código:
WAlias := TStringList.Create;
Session.GetAliasParams(´Nome da sua alias´,WAlias);
WServidor := WAlias[0];
WServidor := Copy(WServidor,6,255);
WServidor := Copy(WServidor,1,(Length(WServidor)));
txtpath.Text := WServidor;



GOSTEI 0
POSTAR