~TUTORIAL~ Trabalhar com ficheiros INI a pedido de users :) PARTE 1

[Fr33dom 1]

 

Hoje vou ensinar (para quem ainda não sabe) como trabalhar com ficheiros INI .

Antes de começar o tutorial :

 

O que é um ficheiro INI ?

Um ficheiro INI é um ficheiro usado para guardar configurações ou informações pessoais para sistemas e utilizadores para ir utilizando ao longo do programa sem usar

muitas linhas de código.

 

Como usar estes ficheiros no delphi ?

A primeira coisa a fazer é declarar a classe : INIFiles no seu programa.

 

Exemplo do seu programa :

 

 

De seguida declarar a variável do tipo : TIniFile; (Podes apenas declarar num só procedure ou como uma variável global, isto é, declarar no cimo do programa)

 

 

Adicione um botão ao seu projeto e coloque isto no seu procedure :

Aqui é para escrever no ficheiro

 

var

Ficheiro: TIniFile; // se já tiver declarado ano é preciso colocar aqui de novo

begin

Ficheiro:= TIniFile.Create('.\meuficheiro.ini'); //aqui é onde se coloca o nome do ficheiro que quer

try // exceção em caso de erro

• Ficheiro.WriteString('Secao1', 'MEUNOME', 'Fr33dom'); // aqui vai guardar as informações no ficheiro (aqui manualmente)
  
• Ficheiro.WriteString('Secao2', 'MEUNOME', Edit1.text ); // aqui vai guardar as informações no ficheiro (através duma edit)
  
• Ficheiro.WriteString('Secao3', 'MEUNOME', Combobox1.text); // aqui vai guardar as informações no ficheiro (através de combobox)
  

finally // exceção em caso de erro

Ficheiro.Free; // liberta a memoria

end;

MessageDlg('Guardado com sucesso',mtConfirmation,[mbok],0); //mensagem de confirmação

Edit1.Text:=''; // apaga

ComboBox1.Clear; // apaga

end;

 

Adicione outro botão e uma edit (exemplo: Edit1 ) ao seu projeto e coloque isto no seu procedure :

Aqui é para Ler o ficheiro

 

var

Ficheiro: TIniFile; // se já tiver declarado ano é preciso colocar aqui de novo

begin

Ficheiro:= TIniFile.Create('.\meuficheiro.ini'); //aqui é onde se coloca o nome do ficheiro que quer

try // exceção em caso de erro

• Edit1.Text := Ficheiro.ReadString('Secao2', 'MEUNOME',''); // aqui vai passar as informações do ficheiro para a edit
  
• ComboBox1.Text := Ficheiro.ReadString('Secao3', 'MEUNOME',''); // aqui vai passar as informações do ficheiro para a combobox
  Showmessage(Edit1.text+#013+ComboBox1.Text); //mostra mensagem com resultado
   
  

finally // exceção em caso de erro

Ficheiro.Free; // liberta a memoria

end;

end;

 

Em anexo envio o Source para quem não conseguiu meter o código a funcionar

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Na próxima Parte vou explicar outras funções dos ficheiros ini...

[Filipedesa-01 2]

Pra que isso realmente serve ?

Não entendi muito, mais o tutorial está bem explicado, Obrigado por compartilhar.

[Fr33dom 1]

Pra que isso realmente serve ?

Não entendi muito, mais o tutorial está bem explicado, Obrigado por compartilhar.

 

Amigo eu expliquei no cimo para que isto serve :

 

O que é um ficheiro INI ?

Um ficheiro INI é um ficheiro usado para guardar configurações ou informações pessoais para sistemas e utilizadores para ir utilizando ao longo do programa sem usar muitas linhas de código.

Fiz este tutorial porque houveram users que me pediram