[Koushik Halder]

I have already seen your demo. I have loaded Fluent Night (internal) using SkinManager. Then I have copied Data from DFMFile. Everything is in SkinData.txt. Then I am trying to load SkinDatawith code at FormCreation. Please see minutely. Everything is available to you. I have not found anything starting with ASafter Data = {in DFM File.

[Koushik Halder]

I have observed another problem. If sSkinManager has no skin and any Glyph is added to sComboBox then sComboBox behaves ugly.

Attachments:

You must be logged in to view attached files.

[Koushik Halder]

I have updated my project.

Attachments:

You must be logged in to view attached files.

[Koushik Halder]

Please find my project attached herewith.

Attachments:

You must be logged in to view attached files.

[Koushik Halder]

Please find the attached video.

Attachments:

You must be logged in to view attached files.

[Koushik Halder]

Now another problem has come to me. When I am selecting any item in ComboBox it shows HTML Coded Text for example for sComboBox1.Items[0] it shows <b><font color=Yellow>A.</font></b><font color=Red> Fox</font> instead of A. Fox[/color]. But your ComboBox Demo is OK. I am trying to find it out what you have coded more but unable to find. Please mention.

• This reply was modified 2 years, 11 months ago by Koushik Halder.

[Koushik Halder]

Yes! I have used my own arrows and loaded from sImageList. AddedGlyph should rotate if AnimCheckDrawing = True; but AddedGlyph is not rotating.

And another thing is that there is option to completely hide Button though sComboBox1.ButtonSkinSection := 'TRANSPARENT'; It is hidden in normal condition but again become visible in MouseDown and MouseEnter event.

You know ImageList itself is a buggy component. You will found some Posts in StackOverFlow. So my request to allow option to load Glyph Data as much as possible instead of loading from ImageList for example TacAddedGlyph.

[Koushik Halder]

It behave likes what I have mentioned. No application Icon is shown in TaskBar under Windows 10 X64 OS unless and until Mouse Pointer is placed over Application Area or in TaskBar or any Mouse Click happen.

[Koushik Halder]

No! No! You have to add Glyphs manually by browsing not from LiageList what I have mentioned in attached Image.

And another thing is that same issue of RotateArrows if own Glyphs are added manually or from ImageList. It works only for default Glyphs from loaded skin.

Attachments:

You must be logged in to view attached files.

[Koushik Halder]

Nothing is related to the EXE File. The same EXE File works perfectly in Windows 7 but behaves different in Windows 10 21H1. Please run the Compiled EXE in Windows 10 21H1 and see what I have mentioned.

[Koushik Halder]

Thanks for your code. Now sComboBox works perfectly. But PopupMenu Items customization remaining. Please launch your own PopupMenu.

[Koushik Halder]

Thanks for your code. Now it works perfectly.

[Koushik Halder]

sImage Problem resolved. Please check sCheckBox AnimCheckDrawing problem.

[Koushik Halder]

Please find attached herewith my project. My sComboBox1 items will be as follows:
A. Fox
B. Tiger
C. Elephant
Any how I have coded my requirement in sComboBox1 but unable to get my required result as I mentioned above. Please help to rectify.

But no option for HTML Coded PopupMenu Items. So you are requested to design your own PopupMenu.

Attachments:

You must be logged in to view attached files.

[Koushik Halder]

No need of TsTitleBar. Just compile and see what I have mentioned.

[Koushik Halder]

I have already done but the result is the same. I think the problem is due to the 32Bit image conversion to 24Bit.
How to use TBitmap32.Create;
I have just uploaded my project. Please see.

Attachments:

You must be logged in to view attached files.

[Koushik Halder]

Please compile both the PROJECTS in RAD Studio 10.4.2 and see the difference.
And also see TitleBar Font Size problem.

Attachments:

You must be logged in to view attached files.

[Koushik Halder]

Why the code Glyph := TBitmap32.Create; does not work?

[Koushik Halder]

Using the following code from ASLDemo the glyph is created:

      Glyph := TBitmap.Create;
    // Prepare Transparent Background
    Glyph.Canvas.Brush.Color := clFuchsia;
    Glyph.Canvas.FillRect(Rect(0, 0, Glyph.Width, Glyph.Height));
    Glyph.Transparent := true;
    // Receiving From ImageList
    sAlphaImageList1.DrawingStyle := dsTransparent;
    sAlphaImageList1.GetBitmap(1, Glyph);

But the Image quality gets distorted.
The Image 00001.png

becomes 00002.png

instead of 00003.png

How to improve the quality.

Attachments:

You must be logged in to view attached files.

[Koushik Halder]

Thanks for your support. It works perfectly.

[Author]

Posts