si mes souvenirs pascaliens sont bons, AssignFile (de Delphi) s'appelle Assign (en Pascal) et ReGet (de Delphi), Append (en Pascal)... mais je peux me gourer... ca a l'air d'etre ma journée ;)
Bendes
Je pense bien étant donné que le Delphi reprend les commandes du Turbo Pascal...
J'vais même aller plus loin dans mon développement :
Code :
var
f: TextFile;
begin
try
AssignFile(f, 'MonFichier.txt');
ReWrite(f); // Créer un fichier en Output (si le fichier existe, il écrase les données déjà présentes)
ReGet(f); // Ouvre un fichier en Output/Input (écrit à la fin du fichier sans écraser les données déjà présentes)
Write(f, 'Texte')
finally
CloseFile(f)
end
end;
J'pense pas que la clause try...finally existe en Turbo Pascal (à vérifier)
Kyle_Katarn
bendes a juste il me semble
JWhy
rhooo, putain... kes que j'suis con... :o
désolé... j'avais pas compris :o
(faut dire que y'a qq jours qq'un avait demandé comment ouvrir un fichier .class :sarcastic: donc ca ma trompé ;) )
Bendes
Si c'est pour ouvrir un fichier texte, voilà ce que je fais en Delphi donc ça doit être + ou - la même chose en Turbo Pascal :
