Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: [Threads] Datei exklusiv öffnen

    Delphi
    by shmia, 29. Sep 2004
  Mit folgenden Funktionen kannst du prüfen, ob eine Datei im Zugriff von anderen Anwendungen ist:
  function FileIsClosed(const filename:string):Boolean;
  const
  FILE_SHARE_EXCLUSIVE = 0;
  var
  hnd: THandle;
  begin
  hnd := CreateFile(PChar(filename), GENERIC_READ or GENERIC_WRITE, FILE_SHARE_EXCLUSIVE, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
  
  result := hnd <>...