JPEGイメージを表示する

Jpeg形式の画像を表示するには TJpegImage クラスを使用します。このクラスはビジュアルでは使用できず、TImageコンポーネントと合わせて使用します。使用する際は uses節に Jpegユニットを追加してください。尚、この方法はDelphi3でのみ有効です。

■ Jpegファイルを表示する例 
  procedure TForm1.Button1Click(Sender: TObject);
  var
    jpgData : TJpegImage;
  begin
    jpgData :=  TJpegImage.Create;
    { JPEGイメージのロード }
    jpgData.LoadFromFile('d:\homepage\toyota\link\del_hiro.jpg');  
    { TImageコンポーネントへの描画 }
    Image1.Picture.Assign(jpgData);
    jpgData.Free;
  end;