社区
Delphi
帖子详情
怎样使窗口由不透明变成半透明,并慢慢消失?
haisha
2003-10-16 04:11:39
包括窗口上的控件和窗口一起变化,谢谢
...全文
51
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;
使用
透明
/
半
透明
窗口
/图片时遇到的一些问题
最近两周使用
透明
、
半
透明
窗口
比较多,在此之前我写代码都借助封装好了的皮肤库,而现在都是“手写”的——石器时代大冒险,遇到了一些困难,在此做总结。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关键词,...
《史上最全、最强Java学习路线知识点整理!!全是干货!!》
自己平时学习整理的笔记,分享给各位,希望可以帮助各位,文章很长,点击收藏
慢慢
看吧!以后会分别对各个知识点进行透彻分析,敬请期待! Java基础 集合 HashMap 1.7 数组 + 链表、扩容时头插法 1.8 数组 + 链表 + 红黑树、扩容时采用 尾插法 当链表的深度达到8的时候,也就是默认阈值,就会自动扩容把链表转成红黑树的数据结构来把时间复杂度从O(n)
变成
O(logN)提高了效率 JDK1.7用的是头插法,而JDK1.8及之后使用的都是尾插法,那么他们为什么要这样做呢? 因为
Delphi
5,379
社区成员
262,722
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章