Upps, me pasé de listo, el problema está en el Rewrite:
Cita:
Empezado por Ayuda de delphi
If an external file with the same name already exists, it is deleted and a new empty file is created in its place.
If F is already open, it is first closed and then re-created. The current file position is set to the beginning of the empty file.
|
Useasé, quita el rewrite