| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
WM_MOUSEENTER и ​WM_MOUSELEAVE без компонента
Тоник © (2008-01-23 22:00:00)как использовать WM_MOUSEENTER и WM_MOUSELEAVE без создания наследующего компонента, а то у меня при наследовании теряются функции image(в нем есть доп.функционал).
(2008-01-24 10:57:00) [1]Удалено модератором
KilkennyCat (2008-01-24 00:19:00) [2]
> решил проблему,
а она была? ;)
А удалять тему - лишать наследников наследства.
Тоник (2008-01-23 23:26:00) [3]решил проблему,тему можно удалять
Тоник (2008-01-23 23:13:00) [4]
> Ты в канцелярии трудишься ?
именно там и тружусь
Тоник (2008-01-23 23:12:00) [5]
unit ImageEx;
interface
uses
Classes, Controls, ExtCtrls, Messages;
type
TImageEx = class(TImage)
private
FOnMouseLeave: TNotifyEvent;
FOnMouseEnter: TNotifyEvent;
procedure CMMouseEnter(var msg: TMessage); message CM_MOUSEENTER;
procedure CMMouseLeave(var msg: TMessage); message CM_MOUSELEAVE;
published
property OnMouseEnter: TNotifyEvent read FOnMouseEnter write FOnMouseEnter;
property OnMouseLeave: TNotifyEvent read FOnMouseLeave write FOnMouseLeave;
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('Standard', [TImageEx]);
end;
procedure TImageEx.CMMouseEnter(var msg: TMessage);
begin
inherited;
if assigned(FOnMouseEnter) then
FOnMouseEnter(self);
end;
procedure TImageEx.CMMouseLeave(var msg: TMessage);
begin
inherited;
if assigned(FOnMouseLeave) then
FOnMouseLeave(self);
end;
end.
Сергей М. (2008-01-23 22:49:00) [6]
> мне нужно делать кнопки по картинкам
Ты в канцелярии трудишься ?
Efir (2008-01-23 22:45:00) [7]А чё за компонент то imageex.
Тоник (2008-01-23 22:39:00) [8]млин вы чего...ок
у меня в моей проге добавлен pngimage для работы с png. он внедряется в image и появляется возможность открывать png.
также мне нужно делать кнопки по картинкам которые обрабатывались enter and leave, раньше использовал imageex, это был наследник Image. но сейчас когда подключаю imageex то image перестает загружать png. вот меня и интересует как просто создать обработчики которые отлавливали бы leave enter.
Сергей М. (2008-01-23 22:23:00) [9]Я тоже)
KilkennyCat (2008-01-23 22:20:00) [10]а я вообще ничего не понял....
Сергей М. (2008-01-23 22:16:00) [11]Не подключай - не потеряется.
Разве тебя кто-то насилует с этим самым "подключением"/ ?)
Тоник (2008-01-23 22:13:00) [12]если подключать Imageex то теряется возможность загружать png в image, а мне без png Никуда!!!
Сергей М. (2008-01-23 22:07:00) [13]
> а то у меня при наследовании теряются функции image(в нем
> есть доп.функционал).
Пора перестать плодить код и заняться чтением букваря.
(2008-01-23 22:06:00) [14]Удалено модератором
| |
