program FontExample;
{$MODE Delphi}
uses
Interfaces,
Forms,
UFontExample in 'UFontExample.pas' {Form1};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.