Hier könnt Ihr gute, von Euch geschriebene Codes posten. Sie müssen auf jeden Fall funktionieren und sollten möglichst effizient, elegant und beispielhaft oder einfach nur cool sein.
;>xp only !!!
;http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/ifaces/icdburn/icdburn.asp
;
;The ICDBurn Interface is used For three things.
;To determine whether hardware capable of writing To CD is present on the system.
;To determine the drive letter of a CD writer device.
;To programmatically initiate a CD writing session.
CoInitialize_(0)
If CoCreateInstance_(?CLSID_CDBurn,0,1,?IID_ICDBurn,@object.ICDBurn) = 0
object\HasRecordableDrive(@pfHasRecorder)
If pfHasRecorder
recorddrive.s = Space(10)
object\GetRecorderDriveLetter(@recorddrive,10);
Debug recorddrive
EndIf
EndIf
CoUninitialize_()
DataSection
CLSID_CDBurn:
Data.l $fbeb8a05
Data.w $beee,$4442
Data.b $80,$4e,$40,$9d,$6c,$45,$15,$e9
IID_ICDBurn:
Data.l $3d73a659
Data.w $e5d0,$4d42
Data.b $af,$c0,$51,$21,$ba,$42,$5c,$8d
EndDataSection
Mal ne Frage: was passiert, wenn du mehrere Brenner hast? (ich kann diesen fall selber nicht testen, da ich leider nur 1 CD-Brenner und 1 DVD-Leser hab...)
Also mein DVD-Brenner wird nicht angezeigt
Hab allerdings, wie viele andere auch, die eingebaute Brennfunktion deaktiviert.
PureBasic 5.73 LTS | SpiderBasic 2.30 | Windows 10 Pro (x64) | Linux Mint 20.1 (x64)
Nutella hat nur sehr wenig Vitamine. Deswegen muss man davon relativ viel essen.
The drive whose letter designation is returned by this method is the drive that has the Enable cd writing on this drive option selected. This option is found on the drive's property sheet. Only one drive on a system can have this option selected.
> Oder prüf einfach, ob das verzeichnis existiert, wenn ja ist auch Xp
> vorhanden bzw. ein Brenner.
oh, gaaanz schlechte Lösung! Wer garantiert, dass ich in der Zwischenzeit
meinen Brenner nicht ausgebaut habe? Oder das ich (oder ein anderes
Programm) den Pfad nicht just for fun angelegt hat?
Ok das stimmt, aber nur Leute, die ganz bewusst programme verarschen wollen, tun das oder? Ich kenne keinen (auch kein Programm) das rein "zufällig" diesen Ordner anlegt...
Ordner werden grundsätzlich ermittelt. Ansonsten sollte man seine Programme niemals weitergeben!
PureBasic 5.73 LTS | SpiderBasic 2.30 | Windows 10 Pro (x64) | Linux Mint 20.1 (x64)
Nutella hat nur sehr wenig Vitamine. Deswegen muss man davon relativ viel essen.