社区
Delphi
帖子详情
怎样使窗口由不透明变成半透明,并慢慢消失?
haisha
2003-10-16 04:11:39
包括窗口上的控件和窗口一起变化,谢谢
...全文
52
9
打赏
收藏
怎样使窗口由不透明变成半透明,并慢慢消失?
包括窗口上的控件和窗口一起变化,谢谢
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
9 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
佣工7001
2003-10-16
打赏
举报
回复
动态改变AlphaBlend 的值
delphi_xizhousheng
2003-10-16
打赏
举报
回复
AnimateWindow这个API比较通用,可以看帮助 参数很简单
jollyfeng
2003-10-16
打赏
举报
回复
procedure TForm1.Button2Click(Sender: TObject);
begin
AnimateWindow(Form1.Handle,1000,AW_HIDE or AW_BLEND);
form1.Close;
end;//窗口由不透明变成半透明,并慢慢消失
procedure TForm1.FormCreate(Sender: TObject);
animatewindow(self.Handle,250,aw_center or aw_activate);
end;//刚开始运行窗口有小变大。
IORILI
2003-10-16
打赏
举报
回复
我也是d6
haisha
2003-10-16
打赏
举报
回复
我是6,谢谢几位
hmzgz81
2003-10-16
打赏
举报
回复
哦!那楼主是delphi几啊?
呵呵!
IORILI
2003-10-16
打赏
举报
回复
procedure TForm1.Button2Click(Sender: TObject);
begin
AnimateWindow(Form1.Handle,1000,AW_HIDE or AW_BLEND);
form1.Close;
end;
Delphi_Li
2003-10-16
打赏
举报
回复
以下方法只能在Windows 2000以上的计算机中实现!!!
Delphi的版本必须使6以上!!!
设置Form的AlphaBlend属性(0:全透明,255:不透明)!!!
循环设置这个值就可以实现你的要求!!!
hmzgz81
2003-10-16
打赏
举报
回复
用一个timer控制form的AlphaBlendValue值!
prcedure TForm1.Timer1.Timer(Sender:TObject);
var i:=Form1.AlphaBlendValue;
if i<255 then
i:=i+15;
if i>255 then
begin i:=255;
Timer1.Enabled:=False;
end;
Form1.AlphaBlendValue:=i;
end;
MySQL8之
窗口
函数实战&应用
由浅入深的将
窗口
函数相关知识讲解清楚,为了能够让读者轻松掌握
窗口
函数,本课程具备以下特点。 引入相关的数据表数据和项目需求,让读者感觉自己在实现真实的项目。 淡化纯理论的概念,重在实践。 知识点由浅入深...
使用
透明
/
半
透明
窗口
/图片时遇到的一些问题
最近两周使用
透明
、
半
透明
窗口
比较多,在此之前我写代码都借助封装好了的皮肤库,而现在都是“手写”的——石器时代大冒险,遇到了一些困难,在此做总结。1、GDI函数对Alpha值的忽视。 GDI函数只有AlphaBlend api可以提供alpha通道的绘制,使用AlphaBlend可以实现32位位图的绘制。因为只有这个api能识别alpha通道,如果在一个MemDC上用DrawText绘制文...
Android应用Activity、Dialog、PopWindow、Toast
窗口
添加机制及源码分析
1 背景 之所以写这一篇博客的原因是因为之前有写过一篇《Android应用setContentView与LayoutInflater加载解析机制源码分析》, 然后有人在文章下面评论和微博私信中问我关于Android应用Activity、Dialog、PopWindow加载显示机制是咋回事,所以我就写一 篇文章来分析分析吧(本文以Android5.1.1 (API 22)源码为基础分析),以便大...
Adobe Premiere 5.1教程(1)我的第一部电影
Adobe Premiere 5.1教程(1)我的第一部电影 [02-4-2 15:17] 我们运行了Premiere5.1,出现如下的界面: 简单解释: * Monitor
窗口
是用来监看信号的,左边的是监看信号源,右边的监看输出结果; * Timeline
窗口
是用来进行视音频编辑的地方,也就是我们的主要工作区; *
IOS面试题目及答案1
第一大类OC面试题 一.设计模式是什么? 你知道哪些设计模式,并简要叙述? 设计模式是一种编码经验,就是用比较成熟的逻辑去处理某一种类型的事情。 1). MVC模式:Model View Control,把模型 视图 控制器 层进行解耦合编写。 2). MVVM模式:Model View ViewModel 把模型 视图 业务逻辑 层进行解耦和编写。 3). 单例模式:通过static关键词,...
Delphi
5,379
社区成员
262,722
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章