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

Вниз

Загружать изображение при наведении и кликании мышью   Найти похожие ветки 

 
pro_xaoc ©   (2010-05-18 11:02) [0]

Всем привет! Вот у меня вопрос. Как можно загружать изображения на кнопку при наведении и кликании мышью (причем при наведении одно изображение, а при кликании другое), но эти картинки должны находится в самой проге. Пробовал ImageList, но не знаю как оттуда их выгружать.


 
Омлет ©   (2010-05-18 13:47) [1]

http://www.delphisources.ru/pages/faq/base/increase_possibility_of_buttons.html


 
pro_xaoc ©   (2010-05-18 18:55) [2]

Омлет, спасибо конечно =))) но я новичок =)) и я не до конца понял эту статью =)),  можно как то попроще? просто там было много лишнего что мне и не нужно ...


 
Плохиш ©   (2010-05-18 19:16) [3]

Нифигасе, уже код с подробными комментариями не устраивает 8-O
Подкатило время зачётов...


 
pro_xaoc ©   (2010-05-18 19:46) [4]

Плохиш, ты сам посмотрел на эту статью? мне нужен лишь маленький код ... даже фрагмент кода, а если точно то в вопросе задано: как можно загрузить битмап картинку на спидбаттон при наведении мышью. Я делал так:

procedure TForm1.SpeedButton1MouseDown(Sender: TObject;
 Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
SpeedButton1.Glyph:=ImageList1.Images(0);
end;

и так: SpeedButton1.Glyph:=ImageList1.Images.0; и ещё куча способов, но не могу найти, вот и прошу гуру этого сайта помощи.


 
Плохиш ©   (2010-05-18 19:49) [5]


> pro_xaoc ©   (18.05.10 19:46) [4]

> procedure TForm1.SpeedButton1MouseDown

Т.е. "при наведении" уже не интересует?


 
pro_xaoc ©   (2010-05-18 19:51) [6]

мне нужно лишь узнать способ загрузки изображения, а там уже понятно же будет ...


 
Плохиш ©   (2010-05-18 20:07) [7]


> SpeedButton1.Glyph:=ImageList1.Images(0);
>

Интересно, и в какой версии у TImageList появилось свойство Images?


 
pro_xaoc ©   (2010-05-18 20:16) [8]

=))))) ну я же говорил что новичок =)) просто на имиджлисте два раза кликнул и там было написано имидж и внизу ещё место для картинок, вот я потом подумал что это его свойство =)))


 
Плохиш ©   (2010-05-18 20:28) [9]

А в справку посмотреть мозгов или желания не хватает?
Зачем оно тебе это, программирование?


 
pro_xaoc ©   (2010-05-18 20:41) [10]

Хех, много на ся не бери, если честно, я начал неделю назад, и достиг хороших успехов, так что не надо мне тут говорить так! Если ты такой умный, почему тогда не привел ни одного кода??? Языком чесать все умеют!


 
Омлет ©   (2010-05-18 20:57) [11]

 ImageList1.GetBitmap(0, SpeedButton1.Glyph);


 
pro_xaoc ©   (2010-05-18 21:11) [12]

Омлет. О все работает =)) спасибо большое )), хорошо что есть на форуме такие знающие люди как вы, ато есть тут некоторые ... лан не будем об этом, ещё раз низкий от меня поклон!


 
Anatoly Podgoretsky ©   (2010-05-18 21:19) [13]

> Плохиш  (18.05.2010 20:28:09)  [9]

Ты не умничай, ты код давай.


 
Плохиш ©   (2010-05-18 21:22) [14]

Во, ещё в одной психушке неделю назад программированием лечить начали :-))



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

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

Наверх





Память: 0.47 MB
Время: 0.058 c
15-1263677426
Юрий
2010-01-17 00:30
2010.08.27
С днем рождения ! 17 января 2010 воскресенье


2-1271062611
vastani
2010-04-12 12:56
2010.08.27
BASM в DELPHI, проблема с Offset`ами


15-1272573005
Юрий
2010-04-30 00:30
2010.08.27
С днем рождения ! 30 апреля 2010 пятница


15-1271666858
clickmaker
2010-04-19 12:47
2010.08.27
Upload control для asp.net


15-1275683377
Юрий
2010-06-05 00:29
2010.08.27
С днем рождения ! 5 июня 2010 суббота





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский