TUTORIAL: COMO CONECTAR DBEXPRESS AO BANCO ATRAVÉS DE UM ARQUIVO "CONFIG.INI" DELPHI 2010

Olá pessoal vou mostrar como conectar um sistema em rede utilizando o DBEXPRESS.

1-) Adicione ao seu projeto o componente TSQLConnection.

2-) Adicione ao uses IniFiles.

3-) No evento BeforeConnect do TSQLConnection adicione o seguinte código.

procedure TdmPrincipal.ConexaoBeforeConnect(Sender: TObject);

var

Arquivo: TIniFile{uses IniFiles};

begin

  Try

     Arquivo:= TIniFile.Create(ExtractFilePath(Application.ExeName)+'config.ini');

     with Conexao do

     begin

       Params.Values['DATABASE'] := Arquivo.ReadString('DADOS','DATABASE','');

       Params.Values['USERNAME'] := Arquivo.ReadString('DADOS','USERNAME','');

       Params.Values['PASSWORD'] := Arquivo.ReadString('DADOS','PASSWORD','');

       Arquivo.Free

     end;

  Except

    ShowMessage('Não foi possivel conectar! Nenhum servidor disponível...');

  end;

end;

4-) Dentro da pasta onde se encontra o executável do sistema crie um arquivo no bloco de notas de nome CONFIG.INI.

5-) O conteúdo do arquivo se o banco estiver local:

[DADOS]

DATABASE=localhost:C:\clinica novo\bd\clinica.fdb

USERNAME=SYSDBA

PASSWORD=masterkey

6-) O conteúdo do arquivo se o banco estiver em outro local da rede: 

[DADOS]

DATABASE=192.168.1.2:C:\clinica novo\bd\clinica.fdb

USERNAME=SYSDBA

PASSWORD=masterkey

Agora é sor conectar não tem erro !!!