CD/DVD-Laufwerk prüfen

[DeddyH]

Und was machst Du bei mehreren CD-/DVD-Laufwerken? Es soll ja auch Leute geben, die einen separaten Brenner verbaut haben.

[sx2008]

Ich glaube ja du machst dir Probleme wo keine sind und triffst Annahmen die in der Praxis wiederum Probleme machen.
Aber das du nicht geschrieben hast was du eigentlich vorhast kann ich nur raten.

Also: manche Firmen betreiben CD-ROM-Server.
Häufig benötigte CDs/DVDs (z.B. MS Office) werden in Serverlaufwerke eingelegt und können von Client-Rechner im LAN gelesen werden.
Oder der gesamte Inhalt wird irgendwo auf einem Netzwerkverzeichnis abgelegt.
Software Updates werden zunehmend gar nicht mehr auf DVD ausgeliefert sondern müssen heruntergeladen werden.

Es spielt heutzutage keine Rolle mehr auf welchem Medium irgendwelche Installation oder Daten vorliegen.
Daher ist es sinnlos zu prüfen ob ein Laufwerk ein CD/DVD Medium oder vielleicht ein USB-Memorystick ist.

[hoika]

Hallo,

also mein Code lieferte eine Liste aller CD-DVD-Laufwerke.
Du übergibst der Funktino eine vorher erzeugte StringListe:

Delphi-Quellcode:

var
  SL: TStringList;
  iDrive : Integer;
  sDrive : String;
begin
  SL := TStringList.Create;

  GetDrives(SL);

  // hier geht es weiter mit dem Durchsuchen
  for iDrive := 0 to SL.Count-1 do
  begin
    sDrive := SL[iDrive];
    if FileExists ...
  end;
end;

Heiko