Entwickler-Ecke

Sonstiges (Delphi) - Font Laden?


SockeKC - Fr 14.05.04 08:54
Titel: Font Laden?
hi
ich hab in nem unterordner meines programms ne ttf-fontdatei liegen, wie kann ich sie laden und im programm nutzen, ohne sie vorher in den windows\font ordner zu schmeißen?


Delete - Fr 14.05.04 10:50

Zitat:

To temporarily install a font, call AddFontResource or

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/gdi/fontext_9r51.asp


bms - Fr 14.05.04 12:02

So:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
var
  FontPath: String;
begin
  // Font-Pfad
  FontPath := ExtractFilePath(ParamStr(0)) + 'times2.ttf';

  // Font hinzufügen
  AddFontResource(PChar(FontPath));

  // Font zuweisen
  Font.Name := 'New Times Roman 2'// Hier Schrift-Namen angeben, nicht Dateinamen
end;


Du solltest vorher prüfen ob Dateiname vorhanden ist. Dann beim Zuweisen den Font-Namen angeben und nicht den Datei-Namen des Fonts. Zum Beispiel hat die Schrift mit Dateinamen "Times.ttf" den Font-Namen "New Times Roman".


Delete - Fr 14.05.04 12:14

Immer erst die Suche fragen,
denn die kann auch was dazu sagen.

Also, husch die "tour de force":
weißt du was zu: Suche in: Delphi-Forum, Delphi-Library ADDFONTRESOURCE


:mrgreen:


bms - Fr 14.05.04 12:35

MathiasSimmack hat folgendes geschrieben:
Also, husch die "tour de force":
weißt du was zu: Suche in: Delphi-Forum, Delphi-Library ADDFONTRESOURCE


Du hast die Frage falsch verstanden. Er wollte nicht wissen wo er etwas über die Funktion AddFontResource findet, sondern der hatte überhaupt keine Ahnung, daß es die Funktion gibt. Und wenn er keine Ahnung gehabt hat, wie soll er wissen, daß er nach AddFontResource suchen soll?


Delete - Fr 14.05.04 14:20

Ich bedaure, aber du hast was nicht verstanden. Mein Beitrag bezog sich auf dich und Luckie, denn ihr beide kennt ja ganz offenbar den Suchbegriff.


bms - Fr 14.05.04 14:21

Ok, dann ist alles klar 8)