Forum: Object-Pascal / Delphi-Language
Delphi
by Schubi,
18. Feb 2004
Also bei mir klappt das:
AddFontResource(PChar(ExtractFilePath(Application.Exename)+'Dateien\Verdana.TTF'));
AddFontResource(PChar(ExtractFilePath(Application.Exename)+'Dateien\Webdings.TTF'));
AddFontResource(PChar(ExtractFilePath(Application.Exename)+'Dateien\Wingding.TTF'));
AddFontResource(PChar(ExtractFilePath(Application.Exename)+'Dateien\WINGDNG2.TTF'));
...
Forum: Object-Pascal / Delphi-Language
Delphi
by Schubi,
18. Feb 2004
Ich weiß jetzt nicht ob ich dich richtig versteh.
Willst du eine Schrift nutzen, die nicht installiert ist?
Hier ist ein Beispiel wie du eine Schrift temporär nutzen kannst
http://www.swissdelphicenter.ch/de/showcode.php?id=288
Ähm, ups. Das is jha das gleiche *g*
Sorry.
Aber bei mir gehts!!