Как определить имя файла загруженного в TImage

← →
sdram © (2002-06-25 15:37) [0]

Подскажите как попроще вывернуться и привязать к TImage имя загруженного файла.

← →
MBo © (2002-06-25 15:41) [1]

ты же сам его загружаешь, значит, и имя знаешь

← →
sdram © (2002-06-25 15:43) [2]

Загружать будет пользователь.
TImage.LoadFromFile("Path");

← →
Игорь Шевченко © (2002-06-25 15:47) [3]

Глупое решение:
TImage.Tag := Integer(StrNew(PChar(FileName)))

Не забыть потом убить :-)

← →
Kaban © (2002-06-25 15:50) [4]

2 Игорь Шевченко
Мне тоже это сразу в голову пришло. Но уж проще тогда переменную string ввести.

← →
XShura (2002-06-25 15:53) [5]

А можно имя файла в свойство Hint писать... если оно не используется :)

А может лучше так :

TYourImage = class(TImage)
private
ImageFileName : String;
protected
public
property ImageFileName : String read FImageFileName write
FImageFileName;
end; //TYourImage

Ой.
.............
private
FImageFileName : String;
.............

Спасибо!!!

Как определить имя файла загруженного в TImage Найти похожие ветки