Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Pascal - Supporto CD
Forum - Pascal - Supporto CD

Avatar
Shutdown (Founder Member)
Guru


Messaggi: 1212
Iscritto: 10/09/2005

Segnala al moderatore
Postato alle 12:11
Domenica, 23/10/2005
Sentite come posso in delphi far uscire lo split
del lettore CD\DVD ??

Ci sar? una funzione, no?

PM Quote
Avatar
nikipe_silver (Founder Member)
Expert


Messaggi: 339
Iscritto: 20/09/2005

Segnala al moderatore
Postato alle 18:17
Lunedė, 24/10/2005
procedure apriCD;
begin
mciSendString('set cdaudio door open',nil, 0, 0);
end;
procedure chiudiCD;
begin
mciSendString('set cdaudio door close',nil, 0, 0);
end;

per usare queste procedure devi includere la unit mmsystem con, all'inizio del programma, uses mmsistem

PM Quote