Fórum Criando Alias no DBE #193589

procedure ´Ao Criar o Módulo de Dados´...;
var path: string;
begin
{ verifica se o alias ´Meus Alias´ esta registrado no BDE }
if not Session.IsAlias(´MeuAlias´)
then begin
{ com as tabelas na mesma pasta do executavel da aplicação }
path := ExtractFilePath(Application.ExeName);
Session.AddStandardAlias(´MeuAlias´, path, ´Paradox´);
Session.SaveConfigFile;
end;
end;

Bem filho BDE já é coisa do passado e usar alias é perca de tempo.
no DataBaseName do Componente TTable recebe Path do banco de dados
por exemplo ´C:\meus dados\´

Table.DataBaseName := ExtractFilePath(ParanStr(0));