Copie d'une partie de fichier

Bonjour à tous
Je cherche à copier une partie de fichier dans un autre fichier.
Je vais:

Code:

---

1 2 3 4 5 6

FileDestin:=tfilestream.create('d:\newfile.txt',fmOpenWrite or fmCreate);   SourceFile := TFileStream.Create('D:\monfichier.txt', fmopenRead); SourceFile.Position:=100; FileDestin.copyfrom(Sourcfile,500);

---

pour copier la partie de l'adresse 100 à 500, mais j'ai toujours FileDestin.size=0

Bonjour,

Comment il sait que c'est fini ? Il ne manque pas quelque chose 8-) ?

Par ailleurs il y a des fautes de frappe qui devraient poser problème à la compilation.

Il faut toujours mettre les vrais sources qui posent problèmes car les extraits modifiés ajoutent souvent de faux problèmes et ralentissent le diagnostic.

Salutations

Bonjour.

SourceFile et SourcFile

après remplacement de sourcfile remplacé par sourcefile
ok
parfois la lecture par quelqu'un d'autre sauve la vie
merci