🚀 go-pugleaf

Hi all, is there anyway to get the dimensions of a jpeg without opening 
it and loading it into a Bitmap memory block. The code snippet here 
creates a wrapper for jpegs whose file names are in a string list, if I 
have 30 jpegs does it mean I load all these jpegs one by one? Is there a 
way I can read the header and get the dimensions? This way I do not take 
  up much resources?

  AnsiString MakeJPEGHtmlWrapper(TStringList * L)
  {
    AnsiString A = "<html>\r\n<head>\r\n</head><body><br>\r\n";
    A += "<";
    A += "table style=\"width: 100%; text-align: left;\"";
    A += "border=\"0\"";
    A += "cellpadding=\"2\"";
    A += "cellspacing=\"2\"";
    A += "<tbody>";
    TJPEGImage *jpg = new TJPEGImage;
    Graphics::TBitmap *bmp = new Graphics::TBitmap;
    for (int i=0; i<L->Count; i++)
    {
      AnsiString B = L->Strings[i];
      while (B.Length() && B.Pos("\\")>0) B.Delete(1, 1);
      if (FileExists(B)==true)
      {
         A += "\r\n<tr>\r\n";
         A += "  <td style=\"vertical-align: top;\"><img title=\"";
         A += (AnsiString) "Image " + IntToStr(i+1) + "\"";
         A += (AnsiString) "src=\"";
         A += B; A += "\"";
         A += (AnsiString) " alt=\"\" ";
         A += (AnsiString) " style=\"";
         jpg->LoadFromFile(B); // does this take up much resources??
         bmp->Assign(jpg);
         A += (AnsiString) "width: " + IntToStr(bmp->Width)+"px\; " +
                           "height: " + IntToStr(bmp->Height)+"px\; \">";
         A += " </td>\r\n </tr>\r\n ";
      }
    }
    A += " </tbody>\r\n </table>\r\n ";
    A += " </body>\r\n </html>\r\n ";
    delete jpg;
    return A;
  }