Aussehen eines Labels überall gleich

[Dunkel]

Theoretisch kannst Du das natürlich machen. Alternativ kannst Du auch den Font als Ressource in die Echse einkompilieren und direkt aus dieser, ohne die Font-Datei auf der Festplatte zu speichern, benutzen.

Delphi-Quellcode:

var
  MyFont: TFont;

{ ... }

procedure LoadResFont;
 var
  Res : TResourceStream;
  ResFontCount: DWord;
 begin
  Res := TResourceStream.Create(hInstance, '_DEINFONT_', 'RT_FONT');
  try
    FontRes_Size := Res.Size + 1;
    FontRes_Buffer  := AllocMem(FontRes_Size);
    Res.Read(FontRes_Buffer^, FontRes_Size);
  finally
    Res.Free;
  end;
  ResFontCount := 1;
  FontRes_Fraktur := AddFontMemResourceEx(FontRes_Buffer, FontRes_Size, nil, @ResFontCount);

  MyFont:= TFont.Create;
  MyFont.Name:= 'xirod';
  MyFont.Size:= 8;
  MyFont.Color:= clBlack;
end;

{ ... }

procedure TForm1.FormCreate(Sender: TObject);
begin
  LoadResFont;
  Label1.Font:= MyFont;
end;

Zum Erstellen einer Ressourcen-Datei und Einbinden in das Kompilat bitte die DP-Suche oder die Delphi-OH bemühen. Beispiele solltest Du genug finden.