Bonjour,
J'essaye de recuperer un texte inscrit dans un fichier ini a fin de le mttre dans un TMemo mais a chaque fois le memo reste vide . Voici le code :

var
FileIni : TIniFile;
texte : string;
nom : string;
begin
nom:= Edit1.Text;
FileIni:= TIniFile.Create('C:\Program Files\Chat\Historique\'+nom+'.ini');
 texte:= FileIni.ReadString('texte','Cle', texte);
 Memo1.Text:=(texte);
 FileIni.Free;
end;

J'espere que quelqu'un pourra m'aider.
Merci d'avance.

Réponse acceptée !


begin
  with TIniFile.Create(' C:\Program Files\Chat\Historique\ '+Edit1.Text+'.ini') do
  try
    Memo1.Text := ReadString('texte','cle');
  finally
    Free;
  end;
end;

Memo1.Text := ReadString('texte','cle');

Esxcusez moi pour le poste inutile qui precede celui-ci.
Quand j'execute le programme le debogeur me dit que cette ligne ne contient pas assez de paramètres originaux : Memo1.Text := ReadString('texte','cle');
Que dois-je rajouter ?

J'ai trouvé une autre solution à mon probleme : au lieu d'utiliser des fichiers ini j'utilise des fichiers texte. C'est beaucoup plus simple et rapide.
Merci beaucoup pour votre aide.

 Juste pour tes connaissances il te manque la valeur par défault si l'information est vide.
Memo1.Text := ReadString('texte','cle','[default value]');
Ceci est très pratique pour ne pas devoir coder si l'information est inexistante comme tu devrais le faire avec le fichier texte. Je te conseille de de perdre un peu de temps pour comprendre ces processus car ensuite tu gagneras plusieur fois le temps investi.

Alex