Buscar

Obtendo o diretório de uma alias

Código

Uses BDE
 
function AliasToPath(Alias : String) : String;
var
Desc : dbDesc;
szAlias : Array[0..255] of Char;
begin
StrPCopy(szAlias,Alias);
DbiGetDatabaseDesc(szAlias,@Desc);
Result := StrPas(Desc.szPhyName);
end;

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Banco de dados
Adicionada dia: 23/06/03
Por: Felipe Monteiro
Visualizada: 2078 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009