Delphi - Manipulando BDE Alias (Manipulating BDE Aliases)

Manipulando Alias da BDE direto do código.

http://delphi.about.com/od/dbbde/a/bdealiases.htm


Alternativa 2 - Lendo parâmetros de arquivo de configuração .ini

procedure TFPrincipal.SQLConnection1BeforeConnect(Sender: TObject);
var ConfigIni: TIniFile;
begin
//Seta as propriedades da conexão em tempo de execução pegando os dados do arquivo config.ini
ConfigIni := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'Config.ini');
SQLConnection1.Params.Values['Database']:= ConfigIni.ReadString('CONFIG', 'DATABASE', '');
SQLConnection1.Params.Values['User_Name']:= ConfigIni.ReadString('CONFIG', 'USERNAME', '');
SQLConnection1.Params.Values['Password']:= ConfigIni.ReadString('CONFIG', 'PASSWORD', '');
SQLConnection1.Params.Values['ServerCharSet']:= 'DOS860';
ConfigIni.Free;
end;