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
延伸阅读
文章来源于领测软件测试网 https://www.ltesting.net/
