Dephi中資源文件的應用

領測軟件測試網

　　Application.Initialize;  

　　Application.CreateForm(TForm1,Form1);  

　　Application.Run;  

　　end.  

　　2、資源文件在編寫動畫程序中的應用  

　　上面的例子使用的是在資源文件中存儲的CURSOR資源，在下面的例子中我們將使用的是在資源文件中提供的ICON資源來編寫一個小小的動畫程序。在這里動畫的產生是利用定時器在一定的時間間隔內產生TIMER事件將存儲在資源文件中的ICON依次的繪制在FORM的同一處而產生的。這時要用到畫布CANVAS的DRAW方法，其聲明如下：  

　　procedureDraw(X,Y:Integer;Graphic:TGraphic);  

　　在這個方法當中的參數GRAPHIC可以為：BITMAPS、ICONS、METAFILES。具體的實現方法為：建立DEMO.RES文件,其中含有名為ICON1桰CON6的ICON。并將DEMO.RES加到項目原代碼中去(如:上面例子的方法)。  

　　動畫程序的具體代碼如下：  

　　unit donghua;  

　　interface  

　　uses Windows,Messages,SysUtils,Classes,Graphics,Controls,Forms,  

　　Dialogs,ExtCtrls;  

　　type  

文章來源于領測軟件測試網 http://www.kjueaiud.com/