FontsWindowServices Project Update

· Jul 25, 05:04 PM

I've uploaded an update to my FontsWindowServices code. The Font Panel-enabled EditField now works when on a ContainerControl.

Download

---

Comment

  1. Hi Charles,

    there was a small bug in the SetFontInfo method:

    dim OSError as Integer = SetFontInfoForSelection(kFontSelectionQDType, 0, nil, nil) // here trouble because no target is set for the event

    should be:

    dim OSError as Integer = SetFontInfoForSelection(kFontSelectionQDType, 0, nil, me.EventTarget)

    There was also a problem when selecting multiple identical style runs that I’ve fixed modifying the method.

    Can I send you the modified project?

    — Ernesto Giannotta · Oct 5, 04:54 PM · #

  2. I wish you would. Thanks.

    — Charles · Oct 5, 05:01 PM · #

Commenting is closed for this article.