Transparent background color in TGroupBox - DELPHI - delphi

How can i set transparent background color in TGroupBox?
In my Delphi's form I have a GroupBox and a Panel (graphically overlaid).
I wrote a procedure to draw a gradient fill on the Panel using Rect. It works!
Now I have another problem: GroupBox backgound color descends from the Form but I wish it was the same of Panel. I can't put GroupBox into Panel because draw procedure fill the entire Panel area (also GroupBox).Is there a way (by code) to set trasparent background color of GroupBox?

set parentcolor of the groupbox to true

I solved setting at runtime the Parent property of the GroupBox.

Related

Customizing Toolbar background gradient color when VCL Themes are enabled

I want Toolbar to show custom gradient color that I set at design time when VCL Themes are enabled.
I have used a TToolbar component and I have applied VCL themes to my project. As a result the Toolbar is not showing the gradient color which I have set, but it shows the theme color.
Disable seClient in the StyleElements property of the Toolbar.

How can I apply a vcl style to a TPanel?

I can change the appearance of VCL buttons by using the bit map stile designer with specifying a bitmap to [Objects]-[Button]-[Face]-[Bitmap].
So I tried to change the VCL panel's appearance in the same way with [Objects]-[Panel]-[Frame]-[Bitmap] and [Objects]-[Panel]-[FrameNoCaption]-[Bitmap].
The test dialog shows that buttons are rendered in an expected way, but panels are not.
How can I apply a VCL style to a TPanel?

How to scroll a TTabSheet

I'd like to scroll an individual TabSheet within a PageControl if the height of the sheet becomes less than a value.
If I put a ScrollBox on the TabSheet, the themed background of the TabSheet is not painted (it's overwritten by the single color background of the scrollbox).
I've been trying to find / create a transparent scrollbox component with no luck. Any other ideas?
I'm using Delphi 7.
Thanks!
To answer my own question, TMS has a transparent scrollbox component called "TAdvScrollBox" that works with themed tabsheets too:
http://www.tmssoftware.com/site/asb.asp
Maybe this will help somebody:
There is a small bug with the component that turns the ParentCtl3d property to false causing ListViews to be rendered with a black border instead of a 3d one. It's easy to fix by setting ParentCtl3d to true programmatically on FormCreate.

How to set TPanel transparent?

When placing the TPanel component in designer, it seems it can not be made transparent? There's an opacity option, but that only deails with animations. I want the panel itself to be fully transparent, so I can see the image underneath. (I want to use the panel as a way of control layout of the controls placed on it)
Use TLayout or TRectangle instead of TPanel.
You can use almost any object opacity for that, for example:
Panel1->Opacity=0.5;

How make a firemonkey button with transparent graphic, and make it the default style

With firemonkey I'm lost in how do some basic stuff.
I already know that I need to put a TImageControl inside the TButton to show a image.
However, the TImageControl is show with a border and a white background. I load inside a ico and/or png and wanna show it transparent, and wanna this for the whole app.
What are the steps for do this?
Try TImage instead of TImageControl. TImage is transparent by default. Of course, if your image isn't rectangular, you'll want to load an image that supports alpha channel, such as a PNG image.
If you insist on a TImageControl, right-click on it, select "Edit Custom Style..." and on the background TRectangle, set it's Fill color from claWhite to claNull and click Apply and Close. For any additional TImageControl, set its StyleLookup property to the same.
You'll also want to turn off the HitTest property of the image control.

Resources