[delphi]Coment faire pour save et lire une variable dans un fichier

Coment faire pour save et lire une variable dans un fichier [delphi] - Delphi/Pascal - Programmation

Marsh Posté le 04-05-2002 à 19:15:24    

tout est dans le titre :)
 
merci d'avance !

Reply

Marsh Posté le 04-05-2002 à 19:15:24   

Reply

Marsh Posté le 04-05-2002 à 19:22:18    

Un fichier Ini ?
Va voir du côté de TIniFile (ou TMemIniFile si c'est un gros fichier)
 

Code :
  1. with TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'config.ini') do
  2.   try
  3.     variable := ReadInteger('section', 'cle', 0);
  4.     // ou
  5.     WriteInteger('section', 'cle', variable);
  6.   finally
  7.     Free;
  8.   end;


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 04-05-2002 à 19:26:34    

Voila c ça mais c un peu complexe pour moi alors si vous aviez ya un site qui xplique bien , je suis preneur .
 
MErci :) !

Reply

Marsh Posté le 04-05-2002 à 19:27:58    

Y a 5 lignes de code... C'est pas si complexe quand même  :D


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 04-05-2002 à 19:30:11    

with TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'config.ini';) do
 
// on crée un objet TIniFile en donnant en paramètre le chemin de l'application + config.ini. ParamStr(0) renvoie le chemin + le exe de l'application.
 
  try
 
    variable := ReadInteger('section', 'cle', 0);
    // exemple lecture d'une variable de type Integer
 
    WriteInteger('section', 'cle', variable);
    // exemple d'écriture d'une variable de type Integer
 
  finally
    Free;  
    // destruction de l'objet une fois qu'on en a plus besoin, dans un try/finally pour être sûr qu'on le détruise même si il y a des erreurs entre temps.
 
  end;


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 04-05-2002 à 19:38:17    

antp a écrit a écrit :

 
with TIniFile.Create(ExtractFilePath(ParamStr(0))+ 'config.ini';)do




la , extractFilePath , faut pas y toucher ou je doit le remplacer par le chemin du *.ini et config.ini , je le remplace par le nom de mon *.ini non ?  

Citation :


    variable := ReadInteger('section', 'cle', 0);
    // exemple lecture d'une variable de type Integer


 
la, 'section' et 'cle' c koi au juste ?  
 
 
MErci d'avance :) ! * desolé d'etre aussi nul et chiant :) *

 

[jfdsdjhfuetppo]--Message édité par Pilou2001 le 04-05-2002 à 19:39:49--[/jfdsdjhfuetppo]

Reply

Marsh Posté le 04-05-2002 à 19:39:35    

Des chaînes de texte.
 
 
Par ex:
 
WriteInteger('Fenetre', 'Largeur', Form1.Width);
WriteInteger('Fenetre', 'Hauteur', Form1.Height);
 
Et dans le ini tu auras:
 
[Fenetre]
Largeur=500
Hauteur=300


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 04-05-2002 à 19:41:39    

ça y est , ja compris , MErci !

Reply

Marsh Posté le 04-05-2002 à 19:43:49    

c'etait une kestion mais j'ai compris tout seul !

 

[jfdsdjhfuetppo]--Message édité par Pilou2001 le 04-05-2002 à 20:03:00--[/jfdsdjhfuetppo]

Reply

Marsh Posté le 04-05-2002 à 20:02:28    

et keskil faut rajouté dans les uses pour que ça marche ?

Reply

Marsh Posté le 04-05-2002 à 20:02:28   

Reply

Marsh Posté le 04-05-2002 à 20:25:21    

uses inifiles
C'est dans l'aide.
Et comme dit sur l'autre topic, pas besoin de recréer un topic.
Je ne suis pas une machine.
J'ai dû m'absenter du forum pendant une petite demie-heure pour aller manger:D


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed