| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Грамотно перекрыть flash`ке сообщения

Ling ©   (2006-02-09 15:27:00) 

Пожалуйста помоите с проблеммой. Её можно решить на ActionScript, но не получается, поэтому придётся черех дельфу.
Вопрс:
Как сдеать так, что-бы TShockWaveFlash не знал, что мышка по нему движется с нажатой левой кнопкой, и что она вообще нажата?

я думаю, что это надо делать с помощью хуков, но не получается. С помощью хуков я нормально убрал флешевское меню, а этот трюк не получается

function MouseProc(nCode: Integer; wParam, lParam: Longint): Longint; stdcall;
var
 szClassName: array[0..255] of Char;
const
 ie_name = 'MacromediaFlashPlayerActiveX';
begin
 case nCode < 0 of
   True:
     Result := CallNextHookEx(HookID, nCode, wParam, lParam)
 else
   case wParam of
     WM_RBUTTONDOWN,
       WM_RBUTTONUP:
       begin
         GetClassName(PMOUSEHOOKSTRUCT(lParam)^.HWND, szClassName,
           SizeOf(szClassName));
         if lstrcmp(@szClassName[0], @ie_name[1]) = 0 then
           begin
             Result := HC_SKIP;
            // моё меню
           end
         else
           Result := CallNextHookEx(HookID, nCode, wParam, lParam);
       end
   else
     Result := CallNextHookEx(HookID, nCode, wParam, lParam);
   end;
 end;
end;

Сразу скажу, зачем мне это нужно:
Во флешке множество (несколько тысяч) обьектов, которые по событию RollOver передают в дельфу инфу.
Нужно, что-бы она передавалась и в том случае, если над обьектом провели мышью с нажатой левой кнопкой. Вам будет смешно, но мы два дня возились с ActionScript, но не смогли это реализовать, или реализовали, но слишком медленно работает. Если кто-нибудь знает, как Это сделать на скрипте, то буду рад помощи.
Время идёт, проект стоит, начальство хмурится... помогите плиз.

---

Ling   (2006-02-09 18:42:00) [1]

up

---

Ling   (2006-02-09 17:31:00) [2]

Уважаемые мастера!
Ну неужели никто не знает, как перекрыть компоненту собщения от мыши, что-бы он не знал о нажатии на её кнопки, а всегда думал, что они в отжатом состоянии???

---

Ling   (2006-02-09 16:23:00) [3]

up

---

Ling   (2006-02-09 15:37:00) [4]

up

---

Наверх