Buscar

Abrindo/fechando o drive de cd

Código

// Inclua na seção uses: MMSystem
// Para abrir
mciSendString('Set cdaudio door open wait', nil, 0, handle);
 
// Para fechar
mciSendString('Set cdaudio door closed wait', nil, 0, handle);

Publicidade

Vote na dica




Quantidade de votos: 1 voto
Aceitação: 20%


Detalhes da dica

Categoria: Hardware
Adicionada dia: 22/05/03
Por: Felipe Monteiro
Visualizada: 3811 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009