Abrir e fechar o drive de DVD-ROM com o Delphi?
Fala pessoal, minha duvida é como abrir e fechar o drive de DVD, alguem pode me ajudar?
Jonas
Curtidas 0
Respostas
Alex Nolaço
17/05/2017
Fala miguel!
para isso inclua na seção uses: MMSystem
e na linha de código que você quer executar a ação coloque:
para isso inclua na seção uses: MMSystem
e na linha de código que você quer executar a ação coloque:
{ Para abrir }
mciSendString('Set cdaudio door open wait', nil, 0, handle);
{ Para fechar }
mciSendString('Set cdaudio door closed wait', nil, 0, handle);
GOSTEI 0