====== DiskStream ======

PB: Ouvrir un disque dans un TStream ???

Apparement le code ci dessous ne fonctionne pas, car il renvois ''DiskStream.size'' = -1
<code delphi>
DiskStream := TFileStream.Create('\\.\PhysicalDrive0', fmOpenRead);
</code>
===== Infos sur les disques =====
  * [[matos:hd:hd]]


===== Liens a voir =====
  * [[https://www.generacodice.com/es/articolo/1078102/Delphi-Pascal---Using-SetFilePointerEx-and-GetFileSizeEx%2C-Getting-Physical-Media-exact-size-when-reading-as-a-file]]
  * [[https://stackoverflow.com/questions/9159438/how-to-read-a-cd-as-a-file]]
  * [[https://docs.microsoft.com/fr-fr/windows/win32/api/ioapiset/nf-ioapiset-deviceiocontrol]] Doc Microsoft sur DeviceIOControl
  * [[https://eric-boisvert.developpez.com/Delphi/Articles/DupDisk/]]