Delphi使用Windows API函数AnimateWindow实现窗体特效
{**********************************************************************
API函数 AnimateWindow 使用:
函数功能:窗体显示和隐藏时产生特殊的动画效果;可以产生两种类型的动画效果:
滚动动画 和 滑动动画
函数原型:BOOL AnimateWindow(HWND hWnd, DWORD dwTime, DWORD dwFlags)
参数说明:hWnd 指定产生动画效果的窗体的句柄;
dwTime 指定动画持续的时间(以为秒计算),完成一个动画的标准时间
为200微秒;
dwFlags 指定动画类型。这个参数可以是一个或多个下列标志的组合;
标志说明:AW_SLIDE 使用滑动类型。缺省则为滚动动画类型。当使用AW_CENTER
标志时,这个标志就被忽略。
AW_ACTIVE 激活窗口。在使用了AW_HIDE标志后不要使用这个标志。
AW_BLEND 使用淡出效果。只有当hWnd为顶层窗口的时候才可以使用此标志。
AW_HIDE 隐藏窗口,缺省则显示窗口。
AW_CENTER 若使用了AW_HIDE标志,则使窗口向内重叠;若未使用AW_HIDE
标志,则使窗口向外扩展。
AW_HOR_POSITIVE 自左向右显示窗口。该标志可以在滚动动画和滑动动画
中使用。当使用AW_CENTER标志时,该标志将被忽略。
AW_HOR_NEGATIVE 自右向左显示窗口。该标志可以在滚动动画和滑动动画
中使用。当使用AW_CENTER标志时,该标志将被忽略。
AW_VER_POSITIVE 自顶向下显示窗口。该标志可以在滚动动画和滑动动画
中使用。当使用AW_CENTER标志时,该标志将被忽略。
AW_VER_NEGATIVE 自下向上显示窗口。该标志可以在滚动动画和滑动动画
中使用。当使用AW_CENTER标志时,该标志将被忽略。
返回值: 如果函数成功,返回值为非零;如果函数失败,返回值为零。在下列情况
下函数将失败:窗口使用了窗口边界;窗口已经可见仍要显示窗口;窗口
已经隐藏仍要隐藏窗口。若想获得更多错误信息,请调用GetLastError函
数。
备注: 可以将AW_HOR_POSITIVE或AW_HOR_NEGTVE与AW_VER_POSITVE或AW_VER_NEGATIVE
组合来激活一个窗口。
**********************************************************************}
//从下面往上面滚动
procedure TForm1.FormCreate(Sender: TObject);
begin
AnimateWindow(Handle, 1000, AW_SLIDE + AW_VER_NEGATIVE);
end;
//渐渐隐去
procedure TForm1.SpeedButton4Click(Sender: TObject);
begin
AnimateWindow(Handle, 2000, AW_SLIDE + AW_BLEND + AW_HIDE);
Application.Terminate;
end;
http://www.lsworks.net/article/51.html
Delphi使用Windows API函数AnimateWindow实现窗体特效的更多相关文章
- Windows API 函数列表 附帮助手册
所有Windows API函数列表,为了方便查询,也为了大家查找,所以整理一下贡献出来了. 帮助手册:700多个Windows API的函数手册 免费下载 API之网络函数 API之消息函数 API之 ...
- C#调用Windows API函数截图
界面如下: 下面放了一个PictureBox 首先是声明函数: //这里是调用 Windows API函数来进行截图 //首先导入库文件 [System.Runtime.InteropServices ...
- Delphi内存操作API函数(备查,并一一学习)
Delphi内存操作API函数System.IsMemoryManagerSet;System.Move;System.New;System.ReallocMem;System.ReallocMemo ...
- Windows API函数大全(完整)
Windows API函数大全,从事软件开发的朋友可以参考下 1. API之网络函数 WNetAddConnection 创建同一个网络资源的永久性连接 WNetAddConnection2 创建同一 ...
- [windows菜鸟]Windows API函数大全(完整)
Windows API函数大全,从事软件开发的朋友可以参考下 1. API之网络函数 WNetAddConnection 创建同一个网络资源的永久性连接 WNetAddConnection2 创建同一 ...
- 用Windows API函数(CreateFile/ReadFile/WriteFile/CloseHandle)完成文件拷贝程序(初级版)
文件拷贝程序 程序类型:Console 参数:源文件名 目的文件名 要求:1.只能使用Windows API函数(CreateFile/ReadFile/WriteFile/CloseHandle ...
- C# 窗体常用API函数 应用程序窗体查找
常用的处理窗体的API函数如下(注意:API函数必须放在窗体中...): 使用C#语言,要引用DllImport,必须要添加using System.Runtime.InteropServices命名 ...
- VBS调用Windows API函数
Demon's Blog 忘记了,喜欢一个人的感觉 Demon's Blog » 程序设计 » VBS调用Windows API函数 « 用VBS修改Windows用户密码 在VB中创建和使用 ...
- Python调用Windows API函数编写录音机和音乐播放器
功能描述: 1)使用tkinter设计程序界面: 2)调用Windows API函数实现录音机和音乐播放器. . 参考代码: 运行界面:
随机推荐
- Android 获取图片真实宽高
Resources res = mContext.getResources(); BitmapFactory.Options opts = new BitmapFactory.Options(); o ...
- python 文件移动(shutil)
# encoding=utf-8 # /home/bergus/tongbu/360共享/编程语言 # /home/bergus/桌面 # /home/bergus/test/hh import os ...
- 禁止Chrome浏览器缓存的方法
web开发的人经常chrome和firefox作为开发调试工具,有些时候需要禁止chrome浏览器缓存,最近也用到禁止缓存,以下介绍几种禁止chrome浏览器缓存的方法作为记录. HTML: < ...
- 四巧工作简化法(ECRS)
在构思项目的工作方法时,可以运用ECRS(四巧工作简化法)技术,即E取消.C合并.R重排.S简化等四种技巧. 1.取消(Eliminate) 对所做的项目,首先应当考虑取消的可能性.如果所做的项目.工 ...
- CSS3 设置 Table 隔行变色
table tr:nth-child(odd){background:#F4F4F4;} table td:nth-child(even){color:#C00;}
- delete 多表删除的使用(连表删除)
delete 多表删除的使用 1.从数据表t1中把那些id值在数据表t2里有匹配的记录全删除掉 DELETE t1 FROM t1,t2 WHERE t1.id=t2.id 或 DELETE ...
- boost的并发库
thread: http://www.boost.org/doc/libs/1_61_0/libs/thread/ asio: http://www.boost.org/doc/libs/1_61_0 ...
- Kolmogorov复杂性
原文-wiki 看Kolmogorov复杂性看到云里雾里,于是干脆把wiki上的翻译了一下. [toc] Chaitin complexity, algorithmic entropy, progra ...
- 【LeetCode练习题】Gas Station
Gas Station There are N gas stations along a circular route, where the amount of gas at station i is ...
- grep 和 sed:linux经常使用工具 & 基本正則表達式
grep 见链接:http://www.cyberciti.biz/faq/grep-regular-expressions/ sed參考文章:http://www.thegeekstuff.com ...