Das mit hCurrFont kann doch so nicht funktionieren?
Beim Setzen von Font.Handle wird das vorhandene
Handle bestimmt freigegeben, womit dieses gespeicherte
Handle dann ungültig wäre.
TFontRecall?
[edit] Jupp, steht so auch in der
OH geschrieben.
Zitat:
Durch das Setzen von
Handle wird die aktuelle Windows-Schriftressource freigegeben.
Und das DeleteObject gibt dann auch nochmal das neue
Handle doppelt frei.
PS:
http://docwiki.embarcadero.com/Libra...s.TFont.Handle ->
http://docwiki.embarcadero.com/CodeE...t_%28Delphi%29
Hier werden die
Handle auch nicht freigegeben. (wobei das nichts heißen muß
)