Fórum Carregar um arquivo ini #294006
31/08/2005
0
Pessoal
Como faço via programação carregar um arquivo ini para que possa configurar dinamicamente o path do meu banco ??
Rogério
Como faço via programação carregar um arquivo ini para que possa configurar dinamicamente o path do meu banco ??
Rogério
Rogeranalista
Curtir tópico
+ 0
Responder
Posts
01/09/2005
Rogick
Não é muito difícil não , Rogerio.
Os arquivos .INI são arquivos de texto que servem para guardar informações úteis de configuração, como a passagem de uma data de um programa para outro, o arquivo .INI tem o formato:
[SEÇÃO]
variável=valor
Para usar um arquivo .INI seguem os passos abaixo:
[b:d3c5047118]1-[/b:d3c5047118] acrescentar na Uses do projeto a bibliteca IniFiles
uses IniFiles;
// criar uma variável do tipo TIniFile
var
data:TIniFile;
[b:d3c5047118]2-[/b:d3c5047118] Criar o arquivo .INI
Data := TIniFile.Create(´Data.ini´);
Onde Data.ini é o nome do arquivo (você pode colocar inclusive o caminho do arquivo, o padrão é o diretório do Windows. Se o arquivo já existir, ele só carrega o arquivo existente).
[b:d3c5047118]3-[/b:d3c5047118] Gravar a informação
Data.WriteString(´Mes/Ano´,´Data´,Edit1.Text);
Data.Free; //esta linha libera a variável da memória
Onde Mes/Ano é o nome da seção, Data é o nome da variável e Edit1.Text é a data digitada pelo usuário
[b:d3c5047118]4-[/b:d3c5047118] Ler a informação
Crie outra variável no outro programa apenas para ler a string
Data.TiniFile.Create(´Data.ini´);
Data.ReadString(´Mes/Ano´,´Data´,´´);
Data.Free;
Espero ter ajudado!
(Dica extraída do Deephi 1.3)
Os arquivos .INI são arquivos de texto que servem para guardar informações úteis de configuração, como a passagem de uma data de um programa para outro, o arquivo .INI tem o formato:
[SEÇÃO]
variável=valor
Para usar um arquivo .INI seguem os passos abaixo:
[b:d3c5047118]1-[/b:d3c5047118] acrescentar na Uses do projeto a bibliteca IniFiles
uses IniFiles;
// criar uma variável do tipo TIniFile
var
data:TIniFile;
[b:d3c5047118]2-[/b:d3c5047118] Criar o arquivo .INI
Data := TIniFile.Create(´Data.ini´);
Onde Data.ini é o nome do arquivo (você pode colocar inclusive o caminho do arquivo, o padrão é o diretório do Windows. Se o arquivo já existir, ele só carrega o arquivo existente).
[b:d3c5047118]3-[/b:d3c5047118] Gravar a informação
Data.WriteString(´Mes/Ano´,´Data´,Edit1.Text);
Data.Free; //esta linha libera a variável da memória
Onde Mes/Ano é o nome da seção, Data é o nome da variável e Edit1.Text é a data digitada pelo usuário
[b:d3c5047118]4-[/b:d3c5047118] Ler a informação
Crie outra variável no outro programa apenas para ler a string
Data.TiniFile.Create(´Data.ini´);
Data.ReadString(´Mes/Ano´,´Data´,´´);
Data.Free;
Espero ter ajudado!
(Dica extraída do Deephi 1.3)
Responder
Gostei + 0
01/09/2005
Lucianobarreto
Estrutura do Arquivo INI
----->INICIO<-------
[SISTEMA]
ADatabase=BDTESTE
AHostName=192.168.0.25
APassword= :D
AProtocol=postgresql
AUser= :D
----->Recorte aqui<--------
Agora no Delphi
Não esqueca de declarar INIFILES na USES...
Isso ai mais ou menos
----->INICIO<-------
[SISTEMA]
ADatabase=BDTESTE
AHostName=192.168.0.25
APassword= :D
AProtocol=postgresql
AUser= :D
----->Recorte aqui<--------
Agora no Delphi
Var ArqIni: tIniFile; ADataBase, AHostName, APassword, AProtocol, AUser: String; Begin ArqIni := TIniFile.Create(extractFilePath(ParamStr(0)) + ´Conf.ini´); try ADataBase := ArqINI.ReadString(´SISTEMA´,´ADataBase´,´´); AHostName := ArqINI.ReadString(´SISTEMA´,´AHostName´,´´); APassword := ArqINI.ReadString(´SISTEMA´,´APassword´,´´); AProtocol := ArqINI.ReadString(´SISTEMA´,´AProtocol´,´´); AUser := ArqINI.ReadString(´SISTEMA´,´AUser´,´´); Finally ArqINI.Free; end; Conexao.Connected := False; Try Conexao.Database:= ADataBase; Conexao.HostName:= AHostName; Conexao.Password:= APassword; Conexao.Protocol:= AProtocol; Conexao.User := AUser; Conexao.Connected:=True; except ShowMessage(´Não foi possível se conectar a base!´);
Não esqueca de declarar INIFILES na USES...
Isso ai mais ou menos
Responder
Gostei + 0