Der rechner von meinem Bruder zeigt trotzdem Arial... weiss jemand woran das liegt, muss ich da sonst noch irgendwas wichtiges beachten?
folgendes hab ich eingegeben:
Delphi-Quellcode:
program Project1;
uses
Forms, windows, sysutils, messages,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas',
{$R *.res}
begin
AddFontResource(Pchar(ExtractFilePath(ParamStr(0))+'Digital Readout ExpUpright'));
SendMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0);
Application.Initialize;
Application.Title := 'Gammelshooter';
Application.CreateForm(TForm1, Form1);
Application.Run;
// Schrift abmelden:
RemoveFontResource(pchar(ExtractFilePath(ParamStr(0))+'Digital Readout ExpUpright'));
SendMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0);
end.