显示图片特效的控件是什么?

Question

就是一些淡入淡出, 慢慢地变化的效果,  flying_fish(飞鱼)那个透明的Panel 你还没有帮我解决呢? 谢谢你了, 老大,帮帮忙

Answer 1

我有些源代码也许对你有用，需要的话留个Email

Answer 2

不好意思，我一时找不到了。
先给你一个窗口特效显示的函数吧。等我找到那些代码我会尽快发给你！
procedure TForm1.AnimateShow(aaiWay: array of Integer);
var
  iWay, iHigh, i: Integer;
begin
  iWay := 0;
  iHigh := High(aaiWay);
  if iHigh = -1 then
  begin
    iWay := AW_ACTIVATE;
  end else
  for i := 0 to High(aaiWay) do
  begin
    iWay := iWay or aaiWay[i];
  end;
  AnimateWindow(Handle, 1000, iWay);
end;  {AW_HOR_POSITIVE, AW_HOR_NEGATIVE, AW_VER_POSITIVE, AW_VER_NEGATIVE, AW_CENTER
  AW_HIDE, AW_ACTIVATE, AW_SLIDE, AW_BLEND}
  //Eg:
  AnimateShow([]);
  //AnimateShow([AW_ACTIVATE, AW_BLEND]);
  //AnimateShow([AW_ACTIVATE, AW_HOR_POSITIVE, AW_VER_NEGATIVE]);
  //AnimateShow([AW_ACTIVATE, AW_HOR_NEGATIVE, AW_VER_POSITIVE]);
end;procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  //AnimateShow([AW_HIDE, AW_CENTER]);
end;

Answer 3

我知道用AnimateShow可以做一些动画窗口,但是在其上放一个image１ 一张图片, 图片就不跟着一起动画显示出来

Answer 4

http://dengkun.51.net 那个雇员核算系统的 About窗口可能是你要的吧?

Answer 5

还有 ， 你是 PLMM 么？

Answer 6

  有个控件PICSHOW可以实现120种效果好多网站都有如果实在找不着我给你

Answer 7

picshow for d５有, d6没有吧