Почему у компонента TImage не работает метод Perform? - Win Api

devi409 · 20.12.2008, 12:15

Почему у компонента TImage не работает метод Perform?
К примеру беру обычную Tpanel посулаю ей сообщение WM_SYSCOMMAND с параметром $F012 то она передвигается и можно отловить событие WM_MOVE
однако отсылая через perform компоненто TImage тоже самое сообщение результат нулевой.
вычитал что Tpanel является оконым компонентом а TImage графическим.
Можно ли создать свой компонент потомок Timage но чтобы он был и оконным и графическим? и как это сделать?

ЗЫ: Я понимаю что пользуюсь системной функцией и младшие биты использовать нельзя (так сказано в документации).

0nni · 20.12.2008, 14:32

Как вы правильно заметили TImage не является наследником TWinControl. Вся проблема в том что у TImage нет Handle, на который посылается сообщение, те с точки зрения windows это не окно. Эту потаницу ввел borlan. Поместите например tImage на TPanel и посылайте все сообщения последнему или напишите наследника от TWinControl.
Насчет использования нижних битов - все верно все в порядке - вам не рекомендуют создавать свои сообщения в младшем слове. А посылать вы можете что угодно.

devi409 · 20.12.2008, 16:58

спасибо

rpy3uH · 21.12.2008, 09:42

Цитата:

Сообщение от 0nni

Насчет использования нижних битов - все верно все в порядке - вам не рекомендуют создавать свои сообщения в младшем слове.

поправка: в младших четырёх битах

0nni · 21.12.2008, 10:07

rpy3uH, Чтож вы мне это все на вид то ставите?
http://www.delphikingdom.com/asp/ans...IDAnswer=67399
Наверное стоит задуматься?

rpy3uH · 22.12.2008, 11:21

не понял. что я сказал не так?
здесь написано что младшие 4 бита используются системой

Цитата:

In WM_SYSCOMMAND messages, the four low-order bits of the wParam parameter are used internally by the system. To obtain the correct
result when testing the value of wParam, an application must combine the value 0xFFF0 with the wParam value by using the bitwise AND operator.

JTG · 22.12.2008, 12:27

Всё уже изобретено

Таскаемый мышью TDragImage как потомок TCustomControl:
http://programmersforum.ru/showpost....0&postcount=12

0nni · 22.12.2008, 17:51

Цитата:

Сообщение от rpy3uH

не понял. что я сказал не так?

Нет, это был камень в мой огород.

20.12.2008, 12:15	#1
devi409 Пользователь Регистрация: 28.12.2006 Сообщений: 75	Почему у компонента TImage не работает метод Perform? Почему у компонента TImage не работает метод Perform? К примеру беру обычную Tpanel посулаю ей сообщение WM_SYSCOMMAND с параметром $F012 то она передвигается и можно отловить событие WM_MOVE однако отсылая через perform компоненто TImage тоже самое сообщение результат нулевой. вычитал что Tpanel является оконым компонентом а TImage графическим. Можно ли создать свой компонент потомок Timage но чтобы он был и оконным и графическим? и как это сделать? ЗЫ: Я понимаю что пользуюсь системной функцией и младшие биты использовать нельзя (так сказано в документации). Последний раз редактировалось devi409; 20.12.2008 в 13:00.

20.12.2008, 14:32	#2
0nni Форумчанин Регистрация: 24.07.2008 Сообщений: 279	Как вы правильно заметили TImage не является наследником TWinControl. Вся проблема в том что у TImage нет Handle, на который посылается сообщение, те с точки зрения windows это не окно. Эту потаницу ввел borlan. Поместите например tImage на TPanel и посылайте все сообщения последнему или напишите наследника от TWinControl. Насчет использования нижних битов - все верно все в порядке - вам не рекомендуют создавать свои сообщения в младшем слове. А посылать вы можете что угодно. Сказал и загрустил от бесспорности своей правоты. Идейный программизм

21.12.2008, 10:07	#5
0nni Форумчанин Регистрация: 24.07.2008 Сообщений: 279	rpy3uH, Чтож вы мне это все на вид то ставите? http://www.delphikingdom.com/asp/ans...IDAnswer=67399 Наверное стоит задуматься? Сказал и загрустил от бесспорности своей правоты. Идейный программизм

22.12.2008, 12:27	#7
JTG я получил эту роль Старожил Регистрация: 25.05.2007 Сообщений: 3,694	Всё уже изобретено Таскаемый мышью TDragImage как потомок TCustomControl: http://programmersforum.ru/showpost....0&postcount=12 пыщь

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
почему не работает	domovoi	Общие вопросы Delphi	1	15.10.2008 18:42
Почему инди-компонента TIdTCPServer тормозит после десяти минут работы?	alex-v	Работа с сетью в Delphi	2	15.07.2008 19:02
Почему не работает цикл?????	Marsik	Помощь студентам	2	22.06.2008 14:16
Почему не работает код?	Kashp	Общие вопросы Delphi	3	09.08.2007 17:33

20.12.2008, 16:58	#3
devi409 Пользователь Регистрация: 28.12.2006 Сообщений: 75	спасибо