CD

[StefanW]

zum Prüfen auf eine "bestimmte" CD würd ich den Befehl "GetVolumeInformation" bevorzugen... besser wäre allerdings wenn du die Seriennummer der CD prüfst. diese ist nur bei sehr wenigen CD gleich, und nicht beeinflussbar (soweit ich weiß).

etwa sowas hier:

Delphi-Quellcode:

Function TLaufwerkInfo.ASN;
Var
    Dummy: DWORD;
    Buffer: Array[0..MAX_PATH] Of Char;
    nummer: DWORD;
Begin
    Try
        GetVolumeInformation(PChar(Self.FLW), Buffer, SizeOf(Buffer), @nummer, Dummy, Dummy, Nil, 0);
        Result := IntToStr(nummer);
    Except
        Result := 'unbekannt';
    End;
End;

Hoffe geholfen zu haben
Tschau Stefan