[SzakiLaci]

Dear Serge, 🙂

After 15 years finally I have NICE icons at my Main menu thans to you and this great component. (TsVirtualImageList)

Only 1 odd behaviour is left to solve:

– When SKINNED=False >> the sizes drop down to “original” = what was set at design time.

[attachment=9331:non-skinned-32x32default.png]

Whatever I do, changing the TsVirtualImageList's size at runtime >> does not help. (Size calculated dinamically during run.)

It should look like this: [attachment=9332:non-skinned-Should-look-like-this.png]

(My code -with streched icons- worked with “normal” TImageList, before I've changed to AC.)

This is a simplified version:

Code:

Screen.MenuFont.size := 16;
Screen.IconFont.size := 16;
sMenuPicsVirtList.Width := 64;
sMenuPicsVirtList.Height:= 64;
MainMenu1.Images := sMenuPicsVirtList;
PopupMenu1.Images := sMenuPicsVirtList;

Do you know any workaround to solve this?

[Support]

Hello!

Could you make a demo, please? I'm trying to make something similar but without success..

[SzakiLaci]

'Support' wrote:

Hello!

Could you make a demo, please? I'm trying to make something similar but without success..

Thanks for the quick reply!

What do you mean by “without success”?

– is it not increasing the font?

– or increasing fine and can not reproduce the problem?

(creating proper demo takes lots of time, but I will make one, if no other possiblity…)

Working still under Delphi7.

[Support]

I have repeated it already.

Try this code after a virtualimagelist size changing:

Code:

sMenuPicsVirtList.Loaded;

or

Code:

sMenuPicsVirtList.Loaded;
sMenuPicsVirtList.GenerateStdList;

[SzakiLaci]

'Support' wrote:

Try this code after a virtualimagelist size changing:

Code:

sMenuPicsVirtList.Loaded;

Cool !!! Thank you VERY VERY much 😀

It has worked perfecly fine. (Never would have guest it on my own…)

:a3:

[SzakiLaci]

PS: it would be great, if topics could be marked as “solved”.

Or at least edit the title to … [solved]

?

[Support]

Topic may be just closed, I did it.

[Author]

Posts