Ich hatte mir als sie rauskam den Spass gemacht das ganze als Resource mit Loader zusammenzustellen. Also nur eine Include_SourceCodeFonts.pas in die uses aufnehmen zu müssen um die Schriften direkt verwenden zu können.
Vielleicht hat jemand Verwendung dafür.
Delphi-Quellcode:
implementation
uses Include_SourceCodeFonts;
{$R *.dfm}
procedure TForm3.Button1Click(Sender: TObject);
begin
Memo1.Font.
Name := C_SCP_Bold;
Memo1.Text := '
Test Oo01234'
end;
----------------
unit Include_SourceCodeFonts;
// 20121002 by Thomas Wassermann
// in die Uses Aufnehmen um die Schriften zur Verfügung zu haben
interface
Const
C_SCP_Black = '
Source Code Pro Black';
....
...