Hi,
wusste keinen gescheiten Titel
zu meiner Frage:
Ich lasse mir alle CDRom Laufwerke in einem Popupmenü auflisten.
Wie kann ich jedes einzelne aufgelistete objekt belegen.
Ich wollte mit diesem code....
Delphi-Quellcode:
uses mmsystem;
procedure TForm1.Button1Click(Sender: TObject);
begin
if mciSendString('open G: type cdaudio alias cdlw',
nil,
0,
0) = 0 then
begin
mciSendString('set cdlw door open wait', nil, 0, 0);
{oder closed wait zum schliessen}
mciSendString('close cdlw', nil, 0, 0)
end;
...die Laufwerke je nach Laufwerkstyp (d:\,e:\,f:\) ein/auswerfen!
Danke, CoRe.eXtreem