markieren

Delphi-Quellcode:

procedure TForm1.OpenCDDrive();
begin
   MCISendString('Set CDAudio Door Open Wait', nil, 0, Handle);
end;

procedure TForm1.CloseCDDrive();
begin
   MCISendString('Set CDAudio Door Closed Wait', nil, 0, Handle);
end;

Mit diesen Prozeduren lassen sich die CD Rom Laufwerke öffnen. Aber immer nur das Erste. Wie kann ich das Zweite öffnen?

Danke schon mal...

Hi!

Wenn ich mich nicht sehr irre (was aber durchaus sein kann), wird damit das CD-Laufwerk ausgeworfen, dass zu Audio-Wiedergabe konfiguriert ist. Egal aob 1. oder 2.

Stell das doch mal bei dir um und test dann mal.


Ciao fkerber

Guckst du hier.

Gruß CelinaW

Das ist gut!

Danke...