چگونه می توان از طریق برنامه نویسی CD-Romرا باز و بسته کرد ؟
ابتدا روی فرمتون دو کلید بذارید ، کپشن آنها رو به Open و Close تغییر بدهید :
برای انجام این کار نیاز داریم که یونیت MMSystem را قابل استفاده کنیم برای این کار در زیر implementation می نویسیم :
Uses MMSystem;
برای کلید Open خط زیر را بنویسید:
mciSendString('Set cdaudio door open wait',nil,0,handle);
و برای کلید Close هم خط زیر را بنویسید:
mciSendString('Set cdaudio door Closed wait',nil,0,handle