Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как определить имя файла загруженного в TImage [D6, Win95/98, Win2k]


sdram ©   (2002-06-25 15:37:00) 

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


sdram   (2002-06-25 16:06:00) [1]

Спасибо!!!


Skier   (2002-06-25 16:00:00) [2]

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


Skier   (2002-06-25 15:57:00) [3]

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

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


XShura   (2002-06-25 15:53:00) [4]

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


Kaban   (2002-06-25 15:50:00) [5]

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


Игорь Шевченко   (2002-06-25 15:47:00) [6]

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

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


sdram   (2002-06-25 15:43:00) [7]

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


MBo   (2002-06-25 15:41:00) [8]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо