如何获取TImage加载图片的文件名称？

Question

现在Image里面加载了一幅图像，我想知道图像的名称，可以实现吗？

Answer 1

不能吧，静态加载的话只保留了图片信息，并没有保留图片名称，如果用OPENDIALOG打开的当然可以了OPENDIALOG.FileName

Answer 2

修改image控件，里面加个字符串保存文件名即可

Answer 3

type
  TImage = class(ExtCtrls.TImage)
  private
    { Private declarations }
  public
    { Public declarations }
    FileName: string; //图片名
  end;

Answer 4

补充说明一下：我要做的程序，面板上有上百个Image，每个Image加载以自己控件名命名的两幅图像，单击Image一次，换一副图像。加入Image的名称为：Image，图像命名为：Image_0.jpg,Image_1.jpg，表示两种状态。第一次单击：装载Image_0.jpg，第二次单击装载Image_1.jpg.....如此往复。现在关键的问题是：如果我点击过其他按钮，再点击这个按钮，我就无法获取这个Image的状态。
如果给每个Image增加一个Flag，太....
所以，如果能够点击Image的时候获取Image装载图片的状态，就可以完成变化了。语文学的不太好，不知道说明白没有。

Answer 5

funxu
love3100
的方法也许可以解决问题，我是菜鸟，不知道怎么重写。