Arquivo INI para Banco de Dados SQL server 2008 e MySQL

Delphi

23/03/2011

Para Banco de Dados SQL Server encontrei esta procedure neste forum da autoria do Sr e_gama:   procedure TDataModulo.DataModuleCreate(Sender: TObject);
var Ini: TIniFile;
    Arq, Driver, Conexao, Servidor, Usuario, Senha: string;
begin
  Arq      := ExtractFilePath(Application.ExeName) + ´\SISTEMA.INI´;
  Ini      := TIniFile.Create(Arq);
  Driver  := Ini.ReadString(´Banco de Dados´, ´Driver´, ´´);
  Conexao  := Ini.ReadString(´Banco de Dados´, ´Conexao´, ´´);
  Servidor := Ini.ReadString(´Banco de Dados´, ´Servidor´, ´´);
  Usuario  := Ini.ReadString(´Banco de Dados´, ´Login´, ´´);
  Senha    := Ini.ReadString(´Banco de Dados´, ´Senha´, ´´);
  Ini.Free;

  //Senha := Descriptografa(Senha, gINI_KEY);

  CONN_DADOS.ConnectionString  := Format(Conexao, [Driver, Servidor, Usuario, Senha]);
  CONN_DADOS.Open;
end;

Minha dúvida é, primeiro eu não uso nem usuário e nem senha (windows authentic), o que fica em conexão?   E como ficaria para o MySQL eu não o uso o ADO e sim o MyDAC?   Obrigado,   Carlos
Carlos Leonel

Carlos Leonel

Curtidas 0

Respostas

André Silveira

André Silveira

23/03/2011

O que voce precisa ter na cabeça é que no arquivo ini deve ter os dados para a conexão, configura o MyDac e verifica nas propriedades que foram preenchidas como é formada a string e é essa string que você deverá montar para passar para a propriedade ao carregar o arquivo ini.

Espero ter ajudado.
GOSTEI 0
POSTAR