Discussion :

[maximdus]

Bonjour tout le monde !

Par curiosité et parcourant la FAQ de Delphi, que je remercie de passage son auteur pour ce joli travail, j'ai voulu essayer faire sortir et entrer le tiroir CD, sur W98 ca marche a merveille, mais XP un message horrible qui' s'affiche et qui met en cause NTDLL.DLL, un fichier intouchable on dirait, un VIP d'XP lolll.

http://delphi.developpez.com/faq/?pa...r#ouvrirtiroir

Merci de montrer la démarche avec XP ! bonne soirée

[JustMe]

Si ça peut t'aider regarde ici :
http://www.experts-exchange.com/Prog..._20734610.html

[Lung]

Et avec ca :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

   MciSendString('SET CDAUDIO DOOR OPEN WAIT', nil, 0, Self.Handle);

[maximdus]

--->JustMe : le site est payant :
--->Lang : merci ca marche a merveille pour l'ouvrir le tiroir, et pour le fermer je change koi?
Merci merci merci

[maximdus]

J'ai trouvééé c'est

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MciSendString('SET CDAUDIO DOOR CLOSED WAIT', nil, 0, Self.Handle);

(c'est un peu pas intuitive loll, open --> closed, ils pouvaient faire soit : open-close, ou opened-closed non?

En tout cas Merci merciiii