Скачать: CL | DM;

Как определить имя файла загруженного в 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 писать... если оно не используется :)

---

← →
Skier ©   (2002-06-25 15:57) [6]

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

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

---

← →
Skier ©   (2002-06-25 16:00) [7]

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

---

← →
sdram ©   (2002-06-25 16:06) [8]

Спасибо!!!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c