Datei ist in Benutzung

[Ultimator]

Zitat von VirusXP:

Du kannst aber auch ein Prog schreiben, des mit nem TFileStream auf die Datei zugreift und nicht durch Free freigibt.

z.B.:

Delphi-Quellcode:

 
         Var datei: TFileStream;     //Globale Variable

         procedure TForm1.Create(...)
         Begin
          TFileStream.Create(Dateiadresse,fmOpenRead);  //Hier wird die Datei am Anfang des Progs aufgerufen...
         end;

         procedure TForm1.Destroy(...)
         Begin
          TFileStream.Free; //...und dann mit dem Schließen wieder freigegeben
         end;

Des dürfte die Datei solange kopiergeschützt halten wie des Prog läuft, schätz ich mal.

Und wenn er es mal über den Taskmanager abschießen muss, hat er ein Problem, weil TFileStream.Free nicht aufgerufen wird.
Bei "meiner" Methode kann der User zur Not in so nem Fall immernoch selber hergehen und in den Eigenschaften der Datei den Schreibschutz entfernen.

//edit: Mist, scheint doch löschen zu gehen, wenn man das Programm dann abschießt