我可以直接检索TPicture的Filename吗？

Question

我有一个Delphi应用程序，它使用TImage显示图像。

图像的位置存储在数据库中并在加载时检索并使用类似于下面的代码直接设置：

Image1.Picture.LoadFromFile(Query1.FieldByName('image').AsString);

我希望能够显示和编辑在上面加载的文件名，我是对的，没有办法直接从TImage组件访问它，我需要单独存储文件名吗？

Answer 1

不，没有。您可以通过自己存储它。

var
  ImageFileName: string;


begin
  ImageFileName := Query1.FieldByName('image').AsString;
  Image1.Picture.LoadFromFile(ImageFileName);
end;

在一个需要访问文件名的位置可以看到Image FileName变量。

Answer 2

您可以将文件名存储在Image1的Hint属性中。

如果您还没有使用它。如预期或另一个purpouse ......我发现这个属性非常混杂：）

Answer 3

您可以将文件名存储在Image1的TagString属性中。

如果您还没有使用它。

（在Firemonkey中，而不是VCL）