title: Delphi Font Resource
body: <p>I have an application having with one TTF resource as "Font" included. I wish to use this font as Fomr Font on FormCreate event. I am not willing to extract this font to a directory and load from there. I am unable to this please help me. I am learner please do not ask for my codes.</p>
  
  <p>I have used "Font Resource ID 13" and "Font Name AmarBangla.ttf". I have tried the following codes but gerting error. Here is those codes:</p>
  
  <p>First One :</p>
  
  <pre><code>procedure TForm01.FormCreate(Sender: TObject);
   begin
      Form01.font[13] := AddFontResource (LPCTSTR lpszFontName));
      Form01.font := 13;
  end;
  </code></pre>
  
  <p>Second One :</p>
  
  <pre><code> procedure TForm01.FormCreate(Sender: TObject);
   begin
      Form01.font[13] := AddFontResource (Hinstance, MakeIntResource(13));
      Form01.font := 13;
   end;
  </code></pre>