桌面宠物类的游戏Delphi可不可做？请具体说一下

Question

桌面宠物类的游戏Delphi可不可做？请具体说一下，我是新手，分不够再加！！！

Answer 1

http://download.pchome.net/development/delphi/10726.html
Delphi VCL组件，生成桌面宠物样的程序或具有换肤功能的程序
http://www.csdn.net/cnshare/soft/10/10659.shtm
一个Delphi  VCL组件，生成桌面宠物样的程序或具有换肤功能的程序，  选择一副Gif动画，窗体就跟Gif动画一样透明而且动起来！适用于Delphi5.0和Delphi6。
如果你要自己学得话，要准备几个连续的bmp(jpg)，读入然后连续显示就可以了赫赫，可以结贴了吧

Answer 2

用控件有什么意思？所谓的桌面宠物无非是一个透明窗体，时不时蹦出个讨厌人的玩艺来这样就行了var
  Form1: TForm1;
  i:integer;
implementation{$R *.dfm}procedure TForm1.Timer1Timer(Sender: TObject);
begin
  case i of  //将来你可以在这做文章，动画什么你自己来
    0: showmessage('养');
    1: showmessage('喂');
    2: showmessage('打');
    3: showmessage('睡');
    4: showmessage('杀');
  end;
    inc(i);
    if i>4 then close;
end;procedure TForm1.FormCreate(Sender: TObject);
var
  FullRgn: THandle;
begin
  FullRgn := CreateRectRgn(0, 0, Width, Height);
  CombineRgn(FullRgn, FullRgn, FullRgn, RGN_DIFF);
  SetWindowRgn(Handle, FullRgn, True);
end;
这就是一个最简单的该杀的桌面宠物