在delphi 中，如何使用 Windows 2000tr特有的 API 函数

Question

AnimateWindow//Windows.AnimateWindow
SetLayeredWindowAttributes//Windows.SetLayeredWindowAttributes

Answer 1

procedure TForm1.FormShow(Sender: TObject);
begin
  AnimateWindow(Handle, 3000, AW_HOR_POSITIVE);
end;

Answer 2

可以　用的吗？在delphi 中是没有定义的啊？

Answer 3

是在Delphi 5中啊，不是在Delphi 6 中啊？

Answer 4

//uses Windows; //如果没有加上就是
//直接用就可以了//

Answer 5

thanks 我知点用了，可以讲你的QQ给我听吗？　　我的QQ是:445178         可以加我为好友吗？

Answer 6

SetLayeredWindowAttributes//Windows.SetLayeredWindowAttributes
这个不可以用啊？、？？？？？？

Answer 7

这两个API必须自己声明的！
function SetLayeredWindowAttributes
    (Handle : HWND; COLORKEY : COLORREF; Alpha : BYTE; Flags : DWORD) :
Boolean;
    stdcall; external 'USER32.DLL';