下面我們來試驗一下:
新建一工程,將唯一的一個Form刪除,然后修改工程文件。增加一句{$Apptype console},在uses子句中加入mmsystem,并將其它引用單元刪掉。將Begin和end之間語句刪掉。至此,我們就可和Turbo PASCAL下編程序一樣,且還可以調用windows的API和資源。將資源文件----{$R myfist.res}加入。在Begin和end之間寫下:
writeln(’演示程序,按任意鍵開始!’);
readln;
playsound(pchar(’mywav’),hinstance,snd_sync or snd_resource);
writeln(’演示結束!’);
運行程序,將彈出一個標準DOS窗口,按任意鍵播放聲音文件。是不是很COOL呢!我曾下載過一個播放器,在其安裝目錄下我發現有一"DOS程序",用鼠標雙擊它便彈出一個DOS窗口,顯示DOS時代特有的畫圖,并有背景音樂!可能就是用這個方法做的。
3.Delphi本身自帶了一個叫Image Editor的工具,同樣可以編輯資源文本,但和本文的方法比較,可得出下表:
**************************************
Image Editor Brcc32
BMP 只支持16位色 任意色
光標 黑白兩色 任意色
ICO 只支持16位色 任意色
AVI 不支持 支持
WAV 不支持 支持
延伸閱讀
文章來源于領測軟件測試網 http://www.kjueaiud.com/