>>354
  with TPicture.Create do
  begin
    LoadFromFile('C:\WINDOWS\winnt.bmp');
    ShowMessage('幅'+IntToStr(Width)+' 高さ'+IntToStr(Height));
    Free;
  end;

UsesにJpegを追加するとJpeg対応になる。
その他多種の形式に対応するならSusieプラグイン等を使うと良い。