如何将 JPG 图像加载到 TImage 组件中

Han*_*ouw 3 delphi image

我将文件 sant.jpg 添加到代码文件中并尝试运行代码来加载图像

procedure TForm2.Button1Click(Sender: TObject);
begin
  IMG.Picture.LoadFromFile('sant.JPG');
end;
Run Code Online (Sandbox Code Playgroud)

尝试过,但得到未知的图片文件扩展名 (.JPG)

Fab*_*zio 5

将Jpeg单位添加到 use 子句中应该可以解决此问题。

例如:

uses
  Windows, Messages, ..., Jpeg;
Run Code Online (Sandbox Code Playgroud)

  • 在 XE2 及更高版本中,请改用单元范围名称“Vcl.Imaging.Jpeg”,除非您将单元范围“Vcl.Imaging”添加到项目设置中。 (5认同)