BANDEJA DO CD ROM

USUARIO.EXCLUIDOS 29/03/2004 14:56:45
#17492
Por favor, eu preciso de um comando que faça um botão abrir a bandeja do Cd rom e um outro que faça fechar a bandeja, Se alguem tiver esse comando por favor me envie o mais breve possivel.
Obrigado!
CAJU 29/03/2004 15:01:23
#17494 Resposta escolhida

' Declarações para manipular o CD-Rom
Public Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
' CD-Rom
Public Function AbrirCD(): mciSendString "Set CDAudio Door Open Wait", 0&, 0&, 0&: End Function
Public Function FecharCD(): mciSendString "Set CDAudio Door Closed Wait", 0&, 0&, 0&: End Function


tranqà¼ilo???
Tópico encerrado , respostas não são mais permitidas
Voltar