Thema: Delphi Aktualisierung erzwingen

Einzelnen Beitrag anzeigen

Carsten1234

Registriert seit: 9. Apr 2008
Ort: Vechelde
178 Beiträge
 
Delphi 8 Professional
 
#3

Re: Aktualisierung erzwingen

  Alt 15. Jan 2009, 14:14
Zitat von himitsu:
wenn du am Dateisystemtreiber vorbei die Daten änderst, dann kann ja nichts gutes bei rauskommen.
Ich weiß. Und wie es scheint, geht der Weg um einen speziellen (Kauf-) Treiber nicht herum.

Zitat von himitsu:
Delphi-Quellcode:
hDrive: THandle;
W: LongWord;

hDrive := CreateFile('\\.\X:', GENERIC_READ or GENERIC_WRITE,
  FILE_SHARE_READ or FILE_SHARE_WRITE, nil, OPEN_EXISTING, 0, 0);
if hDrive <> INVALID_HANDLE_VALUE then begin
  DeviceIoControl(hDrive, FSCTL_DISMOUNT_VOLUME { $00090020 },
    nil, 0, nil, 0, W, nil);
  CloseHandle(hDrive);
end;
Im Anschluss daran scheitern aber jegliche Lesezugriffe auf diese LOG-Datei, weil zwar das Gerät selbst (im Explorer) noch vorhanden ist, aber ich nicht mehr drauf zugreifen kann..

Gruß, Carsten
  Mit Zitat antworten Zitat