Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.08.12;
Скачать: [xml.tar.bz2];

Вниз

Как узнать имя Picture   Найти похожие ветки 

 
Скарамуш ©   (2007-07-11 23:11) [0]

Вот ещё один вопрос нарисовался. Как бы узнать из программы, имя файла рисунка, загруженного в Image? Т.е., например щёлкаем по Image, а нам выдаётся имя загруженного в неё файла изображения. При этом надо упомянуть, что изображения загружаются на FormCreate, т.е. присутствуют в папке с программой.
Вообще можно это как-нибудь узнать?


 
Скарамуш ©   (2007-07-11 23:11) [1]

Заранее извиняюсь, если вопрос глупый.


 
{RASkov} ©   (2007-07-12 00:09) [2]

> [0] Скарамуш ©   (11.07.07 23:11)

Именно по твоему вопросу - никак.
Совет: См тот же TImageData из [5] поста твоей же ветки
http://delphimaster.net/view/2-1183880553/
при загрузке картинки сохраняй имя файла картинке в отдельной переменной...


 
{RASkov} ©   (2007-07-12 00:23) [3]

> картинке

*картинки

Ни TBitmap ни TGraphic ни TPicture ни TImage никто из них "не помнит" имя загруженного в них файла.
Более того в TImage вообще ничего не грузиться, т.е. он сам не содержит "картинку", а у него есть свойство тип класс TPicture
- "Графический контейнер". Который в свою очередь в своем свойстве тип TGraphic содержит Объект
который может быть TBitmap, TIcon или TMetafile (стандартно). Но опять же, никто из них не запоминает имя файла...
Посмотри в F1...


 
Скарамуш ©   (2007-07-12 01:01) [4]

Спсибо. Очень жаль.
Тогда ещё уж один вопрос касательно тех же Image-к:
Нельзя как нибудь создать переменную, соответствующую номеру Image?
Просто когда их много и они однотипны, каждой давать имя проблематично, да и неудобно. А вот можно ли как-то задать пременную, скажем X, чтобы потом использовать её вроде:
X:=3;
Image(X).top... (т.е. Image3.top получалось чтобы)
Ну что-то вроде этого... Никак?


 
Скарамуш ©   (2007-07-12 01:04) [5]


> при загрузке картинки сохраняй имя файла картинке в отдельной
> переменной...

Ага, а картинок 192 между прочим... И почти все разные...


 
Германн ©   (2007-07-12 01:15) [6]


> Скарамуш ©   (12.07.07 01:01) [4]
>
> Спсибо. Очень жаль.
> Тогда ещё уж один вопрос касательно тех же Image-к:
> Нельзя как нибудь создать переменную, соответствующую номеру
> Image?
> Просто когда их много и они однотипны, каждой давать имя
> проблематично, да и неудобно. А вот можно ли как-то задать
> пременную, скажем X, чтобы потом использовать её вроде:
> X:=3;
> Image(X).top... (т.е. Image3.top получалось чтобы)
> Ну что-то вроде этого... Никак?
>


var
 MyImages : array of TImage;


 
Германн ©   (2007-07-12 01:18) [7]


> Скарамуш ©   (12.07.07 01:04) [5]
>
>
> > при загрузке картинки сохраняй имя файла картинке в отдельной
> > переменной...
>
> Ага, а картинок 192 между прочим... И почти все разные..
> .
>

var
 St : String[255];
 ...
 St:=Полный_Путь_к_Файлу;
 ImageN.Tag:=Integer(St);


 
Германн ©   (2007-07-12 01:19) [8]

[7] - Ошибка.


 
{RASkov} ©   (2007-07-12 08:25) [9]

> [5] Скарамуш ©   (12.07.07 01:04)
>Ага, а картинок 192 между прочим... И почти все разные...

Да хоть мильён....
Ёлы-палы... ну ты что.... прикалываешся что-ли, внимательно перечитай ветку:
http://delphimaster.net/view/2-1183880553/
И завязывай давай с "глупыми вопросами" :) Все свойства стандартных классов есть в F1
В книжках, в F1, в инете... да везде можно найти, как добавить недостающее свойство классу. Или элементарные массивы, записи....


 
homm ©   (2007-07-12 10:39) [10]

> Ага, а картинок 192 между прочим... И почти все разные...

А у меня на диске 500 000 файлов, что не мешает мне хранить путь до любого из них в одной переменной.



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

Форум: "Начинающим";
Текущий архив: 2007.08.12;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.047 c
15-1184256508
TUser
2007-07-12 20:08
2007.08.12
Таки он есть :)


2-1184649833
Kolan
2007-07-17 09:23
2007.08.12
Записи в DBGrid e странным образом исчезают.


15-1183600174
oldman
2007-07-05 05:49
2007.08.12
Олимпиаде в России быть!!!


2-1184323485
lamerskii_vopros
2007-07-13 14:44
2007.08.12
динамическое создание компонента


15-1184052489
Krants
2007-07-10 11:28
2007.08.12
мистическая тройка





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский