Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Замена изображения при наведении мышкой, Bor. Delphi7 
V
    Опции темы
Alix36
Дата 13.6.2009, 07:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 478
Регистрация: 6.11.2006

Репутация: нет
Всего: 3
Требуется, при наведении мышкой на изображение заменять его на иное.
Все вроде просто, НО.
pas
Код

procedure TFMain.select2(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
FMain.exit_i.Picture:=??;
end;

dmf
Код

  object exit_i: TImage
    Left = 0
    Top = 378
    Width = 130
    Height = 48
    Cursor = crHandPoint
    AutoSize = True
    Picture.Data = {***}
    Transparent = True
    OnClick = exit_iClick
    OnMouseMove = select2
  end

Работаю с Borland Delphi 7
Собственно, что должно быть вместо знаков вопроса? 
Если использовать res-файлы, как из него вызвать картинку?, т.е. сослаться на неё?



--------------------
Наши лица как дым, И никто не узнает как мы победим. (С)Пикник.
PM MAIL   Вверх
Magister Y0da
Дата 13.6.2009, 08:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Зелёненький
*


Профиль
Группа: Участник
Сообщений: 235
Регистрация: 30.11.2004

Репутация: -2
Всего: 2
ресурсы прочитай... тут содержится ответ на твой вопрос
--------------------
PM MAIL ICQ   Вверх
THandle
  Дата 13.6.2009, 09:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 65
Всего: 372
Alix36, глянь вот эти посты:

http://forum.vingrad.ru/index.php?showtopi...t&p=1624563
http://forum.vingrad.ru/index.php?showtopi...t&p=1752872

Я там приводил подобные примеры smile
PM   Вверх
Alix36
Дата 14.6.2009, 13:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 478
Регистрация: 6.11.2006

Репутация: нет
Всего: 3
Все оказалось до нельзяпросто.
Код

procedure TFMain.i_exit_up(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
FMain.exit_i.Picture.Bitmap.LoadFromResourceID(HInstance,103);
end;

Держи + smile
ПС. 
И все таки файлы ресурсов проще редактировать MS VS ))) я ленивый )


--------------------
Наши лица как дым, И никто не узнает как мы победим. (С)Пикник.
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0454 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.