Вниз
Скачать: CL | DM;

Грамотно перекрыть flash`ке сообщения   Найти похожие ветки 

← →
Ling ©   (2006-02-09 15:27) [0]

Пожалуйста помоите с проблеммой. Её можно решить на 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 15:37) [1]

up


← →
Ling ©   (2006-02-09 16:23) [2]

up


← →
Ling ©   (2006-02-09 17:31) [3]

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


← →
Ling ©   (2006-02-09 18:42) [4]

up



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c
15-1139977051
КаПиБаРа
2006-02-15 07:17
2006.03.12
MagicForum "Начинающим" заработала


15-1140415377
Ega23
2006-02-20 09:02
2006.03.12
С Днём рождения! 20 февраля


8-1128116522
Juice
2005-10-01 01:42
2006.03.12
2 Web-камеры, DSPack или что посоветуете?


15-1140401512
Бугага
2006-02-20 05:11
2006.03.12
Не подскажете, что за музыка играет на фоне?


2-1140430374
reboot
2006-02-20 13:12
2006.03.12
компоненты vcl




   Наверх