Thema: Delphi AddFontResource

Einzelnen Beitrag anzeigen

Benutzerbild von bernau
bernau

Registriert seit: 1. Dez 2004
Ort: Köln
1.268 Beiträge
 
Delphi 11 Alexandria
 
#8

AW: AddFontResource

  Alt 2. Apr 2012, 14:33
Ist ein ziemlich alter Thread. Aber für mich war jetzt er aktuell und für andere vieleicht auch irgendwan mal. Deshalb hier meine Lösung:


Mein Programm soll eine Schrift temporär installieren und nutzen.

Bei folgendem Code blieb das Programm hängen.

SendMessage(hwnd_broadcast, wm_fontchange, 0, 0); Auch wenn ich vorher keine Schrift mit AddFontRessource installiert habe, das Programm blieb an der Stelle hängen.

Habe dann statt einer "broadcast" die Nachricht nur an mein Programm selber gesendet, dann ist es durchgegangen. Und die Schrift konnte auch genutzt werden.

SendMessage(application.handle, wm_fontchange, 0, 0);
P.S.: Der Fehler passierte nur auf einigen WinXP-Rechnern.



Wie gesagt. Nur zur Info.
Gerd
Kölner Delphi Usergroup: http://wiki.delphitreff.de
  Mit Zitat antworten Zitat