CD-Laufwerke in Drivecombobox
Wie kann man nur die CD-Laufwerke in einer Drivecombobox anzeigen lassen. Oder ist das nicht möglich?
|
Also ich weiß leidern nicht, wie man nur die CD Laufwerke filtern kann, aber in der CodeLibrary gibt es einen Beitrag wie man Laufwerke sucht und erkennt. Hier
Vielleicht hilft dir das ja trozdem weiter. Man liest sich, Stanlay |
@Stanlay Hanks
nicht ganz das was ich suche aber trotzdem Danke. Vielleicht kennt ja jemand eine Komponente die ähnlich Combobox ist, aber nur die CD-Laufwerke anzeigt. |
Wenn die beiden Funktionen aus der Code-Library wie von Stanlay vorgeschlagen verwendet werden, kann mit folgender Prozedur eine Liste der CD-Laufwerke ausgegeben werden.
Delphi-Quellcode:
Die ComboBox muss natürlich existieren :wink:
procedure TForm1.Button1Click(Sender: TObject);
var I: Integer; begin for I := 0 to 25 do if DriveExists(I) and (GetDriveType(PChar(Chr(I + Ord('A')) + ':\')) = DRIVE_CDROM) then ComboBox1.Items.Add(Chr(I + Ord('A')) + ':\ (' + DriveType(I) + ')'); end; Gruß s14 |
Re: CD-Laufwerke in Drivecombobox
Kann man statt CD/DVD vielleicht auch den Namen des Gerätes anzeigen lassen? Also nicht den Typ sondern den Namen?
Danke im Vorraus! MfG Florian :hi: |
Re: CD-Laufwerke in Drivecombobox
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:41 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz