Delphi'de harici font dosyası kullanma imkanı varmı? Nasıl?

[ferhatganem]

Merhabalar;
Delphi'de harici font dosyası kullanma imkanı varmı? Nasıl?

[mcuyan]

Merhabalar.
Delphi sisteminizde yüklü olan fontları otomatik tanır (c:\windows\fonts). Harici için aşağıdaki linke bakabilirsiniz.

https://stackoverflow.com/questions/4010...preference

[ozcanm]

Merhaba,
Aşağıdaki şekilde exe dosyanızın olduğu yere Font adında bir klasör oluşturup içine atacağınız farklı bir fontu uygulamanızın tanımasını sağlayabilirsiniz.
İyi Çalışmalar.

procedure TForm1.FormCreate(Sender: TObject);
begin
 AddFontResource(PWideChar(ExtractFilePath(Application.EXEName)+'Font\LCALLIG.TTF'));
 SendMessage(application.handle, wm_fontchange,0,0);
End;