@himitsu: Delphi 7 meckert da nicht.
Result := GetVolumeInformation(...) and (Drive_Flags and FILE_READ_ONLY_VOLUME <> 0);
Das ist wohl die beste Lösung.
@Sir Rufo:
Meine Problemstellung war, dass ich den Schreibschutz von Wechselmedien bzw. Medien allgemein
auslesen wollte. Ich hatte nicht vor auf Schreibschutz zu
prüfen. Aber das wäre eine Alternative, jedoch keine auszureichende, da, wie
himitsu schon erwähnt hat, beschränkte Rechte vorhanden sein können.
Mfg
-- Truther