代码如下 program RunBall; uses Windows, SysUtils, HGEImages, HGECanvas, HGEDef, HGE, HGESpriteEngine; type //单精灵类 TMonoSprite = class(TSprite) private FCounter: Double;//...

我现在开始学习DELPHI/poscal 学习从 写MIR2传奇开始； 第一天学习使用HGE program Project1; uses windows, HGE; {$R *.res} var myHGE: IHGE = nil; function FrameFunc: Boolean; begin Result := myHGE...

procedure 在delphi 中它只是一个过程，不包含返回参数或返回值 function 在delphi中它的主要目的是对外传递参数或值， 所以，在用delphi 写程序过程中，一般又返回值时我们会用function，无返回值的时候使用procedure