[Lazarus] Close button bkClose as "X"

[José Mejuto]

Hello Lazarus-List,

Monday, July 26, 2010, 2:50:22 AM, you wrote:

>> In a recent change (#26529) Dmitry changes the code in
>> themes.pas to
>> get a "stock icon" for close kind (a "X") which affects to
>> TBitButton.
JR> I think this is a fallback and should affect only those
JR> widgetsets that still do not implement
JR> TThemeServices.GetStockImage.

Yes, it looks as a fallback mechanism, but the problem is the
inconsistency, some icons from .pngs and others programatically draw
:-?

JR> But LCL stock images have still it own use, for example if
JR> you don't want to use the default themed glyphs or if the
JR> widgetset do not support glyphs or simply you want the same glyphs
JR> independent of the current theme/widgetset you can set a user
JR> defined function to override the themed glyphs
[...]
JR> initialization
JR>   GetDefaultBitBtnGlyph := @MyDefaultGlyphs;

That's a way a bit hard to get the job and quite difficult to
implement without knowing all the details, but at least it is possible
;) Maybe a component should be written to handle this customizations.

-- 
Best regards,
 José