mémoriser des variables

Question

Bonjour,
Je voudrais savoir comment faire pour m&#233;moriser des variables de type string, char, short, pour que si j'arrete le programme, en le red&#233;marant je puisse les ravoir.....

Je vous remercie de votre aide.

jlen100 · Answer

salut

A la fermeture du programme places les dans un fichier .ini tu pouras les r&#233;cup&#233;rer &#224; l'ouverture suivantes.

@+

jlen

aiglon3 · Answer

Voici un exemple pour sauvegarder 3 types de variables:

var    a:boolean;
          b:Integer;
          c:String;

// donner des valeurs aux variables

Procedure Sauvegarde;
var  f:Text;
Begin
   Assign(f,'NomFicher.txt');
   rewrite(f);
   If a= True  then  Writeln(f,'1') else Writeln(f,'0'); // sauvegarde de a
   Writeln(f,IntToStr(b));  // Sauvegarde de b
   Writeln(f,c);  //  Sauvegarde de c
   Close(f);
end;

Procedure Chargement; // Chargement des variables
Var f:Text; 
       s:String[1];
Begin
   Assign(f,'NomFichier.txt');
   reset(f);
   readln(f,s); if s ='1' then a:= True  Else   a: =False;
   readln(f,s); b:=StrToInt(s);
   readln(f,s); c:=s;
   Close(f);
end;

Ensuite mettre Chargement dans "On Create", puis Sauvegarde dans "On Close"

a+
Denis

Mémoriser des variables

2 réponses

Votre réponse

Discussions similaires