procedure TForm1.SetPanelTransparent(APanel: TPanel; ATransparent: Boolean); begin APanel.Transparent := ATransparent; end; 你可以通过调用SetPanelTransparent过程,并传入Panel控件的引用和一个布尔值(True表示透明,False表示不透明)来设置Panel的透明属性。 测试透明Panel控件在不同背景下的显示效果: 将Pane...
使用第三方控件RzPanel，有transparent属性，设置为true即可 利用PanelTransparent这个unit来实现即可。unit PanelTransparent;interfaceusesWindows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,ExtCtrls;typeTPanelTransparent = class (TPanel)privateprocedure CnCtlColorStatic (var Msg: ...
1.放置Panel的窗口发生变化时,Panel不显示 2.Panel刷新后,背景没有刷新.(我在Panel上放了两个控件:控件1,控件2,这两个控件是交替显示的,发生交替的时候发现前面一个隐藏掉的控件还是画在了Panel上面,导致背景看起来很乱). 由于这个Panel是放在Form上使用的,我在Form上又放置了TImage控件,我希望Panel透明以后不...
1.放置Panel的窗口发生变化时,Panel不显示 2.Panel刷新后,背景没有刷新.(我在Panel上放了两个控件:控件1,控件2,这两个控件是交替显示的,发生交替的时候发现前面一个隐藏掉的控件还是画在了Panel上面,导致背景看起来很乱). 由于这个Panel是放在Form上使用的,我在Form上又放置了TImage控件,我希望Panel透明以后不...
后来打开DELPHI2009,竟然发现有些控件支持背景,特别是PANEL控件,比以前增加了一个ParentBackGround属性。这个发现让我激动万分。透明问题解决了一般,虽然不能像WPF或者FLAX那样设置透明度,但是至少能和背景融合,不会像一块膏药了。这样就使得在窗体上放置图片成了可能。
{ 增加透明 } ExStyle := ExStyle or WS_EX_TRANSPARENT; end; 4. 截获WM_ERASEBKGND, 什么都不做直接返回1.(不擦除背景) 一般有上面3步能成. 有些控件比如TPanel, 在它的paint中用了fillrect, 所以要实现透明的话还要override 它的paint方法, 自己画. ...
比较一下,黄色为主窗体的背景色,Tpanel组件是不透明的,Tlayout组件是透明的,其他很相似,都可在上面随意放置各种可视化的组件,如:Tlabel、Tbutton、Tmemo、Timage、Tlistbox、TScrollbar等; 本人建议,窗体布局尽量多用layout方式,panel方式是最初Delphi平台提供的模式(用过Delphi7的伙伴都有体会),layout方式是新版本...
TPanel组件 TToolBar Class TToolButton Class TTimer Class TADOConnection Class TADOQuery Class TADODataSet Class TDBGrid Class TADOStoredProc Class TButton Class TBitBtn Class TComboBox Class TStaticText Class TLabel Class TEdit Class TGroupBox Class TRadioGroup Class TListbox Class TTreeView ...
使用TPanel把一个面板(panel)放到窗体上。面板拥有提供控件边框倾斜度的属性和方法帮助管理子控件嵌入面板中。 你也可以用面板把控件聚集在一起,就好像使用一个group box,但是拥有倾斜边框而不是group box轮廓。在单窗体中,panel专门用于控件组。如果你打算在其它的窗体内使用相同的分组,你可能想去使用frame代替。在...
一般有上面3步能成. 有些控件比如TPanel, 在它的paint中用了fillrect, 所以要实现透明的话还要override 它的paint方法, 自己画. 按钮透明需要进一步处理. createparams里加上style := style or BS_OWNERDRAW; 然后在WM_DRAWITEM中自己画吧 HOOK钩子详细介绍 ...