var
Nom : String[SizeOf(Rec1.Nom) - 1];
begin
Readln(Nom);
StrPCopy( Rec1.Nom, Nom);
end;
ATTENTION : ceci ne fonctionne que si le type TRec1.Nom est déclaré de la façon suivante :
nom: packed array [
0..25] of char;
et non de base 1.
Comme Delphi n'effectue aucune vérification de longueur (dixit l'aide), nous adaptons la taille de la chaine de caractères Nom en retranchant 1 caractère puisque la fonction StrPCopy ajoute le caractère Null à la fin de la chaîne.
May Delphi be with you.
-------------------------------
Réponse au message :
-------------------------------
merci bcp ca va mieux now y reste juste un truc :
comment mettre le nom de la personne demander en mode console ds nom qui est un tableau packe
readln(REc1.nom); ne marche pas
-------------------------------
Réponse au message :
-------------------------------
TypeTRec1=record
num:integer;
nom: packed array [1..25] of char;
end;
TRec2=record
num:integer;
resultat: array [1..10] of integer;
end;
Var F1 : File of TRec1;
F2 : File of TRec2;
Rec1 : TRec1;
Rec2 : TRec2;
Attention au risque de confusion, à la lecture, en nommant un champ de l'enregistrement 'Result'.
Bien que ce ne soit pas obligatoire, la lettre 'T' au début d'un nom désigne en général un type. Cette convention d'écriture semble universellement appliquée. De toutes façons, celà nous aide pour nommer les variables.
May Delphi be with you.
-------------------------------
Réponse au message :
-------------------------------
voila je dispose de 2 fichiers sous cette forme :
rec1=record
num:integer;
nom acked array [1..25] of char;
end;
rec2=record
num:integer;
result:array [1..10] of integer;
end;
comment je dois les declarer ds le prog (file of ?????)
et pour aller lire dedans je fait comment ????