On Tuesday 03 October 2017 00:39:05 fredvs wrote:
> > Do you have a reproducible testcase?
>
> See demo in attachement.
>
> msefontcolor.zip
> <http://mseide-msegui-talk.13964.n8.nabble.com/file/t2/msefontcolor.zip>
>
> > Are you sure you did not change a <parent> font color by accident?
>
> Yes.
>
form2fo.font is a <parent> font. Because form2fo has no parent you actually
change the font msestockobjects.stockobjects.fonts[stf_default] which is the
default font.
Please activate a local font-instance in form2fo by clicking on the ellipse
button in row "font" in object inspector or call "tform2fo.createfont()" at
runtime before setting the font properties.
"
procedure tmainfo.changecolor(const sender: TObject);
begin
form2fo.createfont();
form2fo.font.color := cl_red;
end;
"
Martin
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
