透明的PANEL?(答出来肯定给分)

yxjdyn 2002-05-14 12:27:10
怎么做透明的panel?
...全文
27 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
sogh 2002-05-14
  • 打赏
  • 举报
回复
从TPanel继承新的,override其CreateParams,如:
procedure CreateParams(Var Params:TCreateParams);override;
procedure CreateParams(var Params: TCreateParams);
begin
inherited createparams(params);
params.ExStyle:=params.ExStyle+ws_ex_transparent //将该类的实例设置为透明模式

end;
procedure007 2002-05-14
  • 打赏
  • 举报
回复
在create时,brush.style:=brclear;
sogh 2002-05-14
  • 打赏
  • 举报
回复
不要说“好象”。
TPanel有父类TCustomControl,这样肯定有用的
naughtyboy 2002-05-14
  • 打赏
  • 举报
回复
这样做好像没有用吧

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧