die datei wird gefunden, ansonsten käme er in meinem programm nicht zu der stelle wo ich den addfontresourceex ausführe... hier mal mein code:
Delphi-Quellcode:
sFontFile := ExtractFilePath(Application.ExeName) + 'MyFont.ttf';
If FileExists(sFontFile) = True Then
Begin
giFontInst := AddFontResourceEx(PChar(sFontFile), FR_PRIVATE, 0);
SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0);
End;
wenn ich grad nicht total auf dem schlauch stehe verwende ich absolute dateipfade...
gifontinst ist nach AddFontResourceEx gleich 1 d.h. ja laut
msdn das er die font hinzugefügt hat...