Delphi CD Rom Laufwerke öffnen?

Thema durchsuchen

Ansicht

Themen-Optionen

CD Rom Laufwerke öffnen?

Ein Thema von Chris P · begonnen am 8. Apr 2004 · letzter Beitrag vom 8. Apr 2004

Vorheriger Beitrag

Nächster Beitrag

Chris P

Registriert seit: 8. Mär 2004
230 Beiträge

Delphi 7 Enterprise

CD Rom Laufwerke öffnen?

8. Apr 2004, 20:03

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...

Zitat

« Vorheriges Thema | Nächstes Thema »

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.

Es ist dir nicht erlaubt, auf Beiträge zu antworten.

Es ist dir nicht erlaubt, Anhänge hochzuladen.

Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.

Smileys sind an.

[IMG] Code ist an.

HTML-Code ist aus.

Trackbacks are an

Pingbacks are an

Refbacks are aus

Foren-Regeln

Gehe zu: