Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2006.03.12;
Скачать: [xml.tar.bz2];

Вниз

Грамотно перекрыть 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 вся ветка

Форум: "Основная";
Текущий архив: 2006.03.12;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.013 c
1-1139222166
DelphiLexx
2006-02-06 13:36
2006.03.12
Профайлер для Delphi


15-1140023986
Ученик чародея
2006-02-15 20:19
2006.03.12
Америка требует отменить торговые льготы, предоставляемые России.


6-1131389668
websqlneeder
2005-11-07 21:54
2006.03.12
Как со страницы с фреймами на лету убрать один фрейм не нарушая


15-1139849830
basnik
2006-02-13 19:57
2006.03.12
Требуется написать программу за $$$


2-1140401767
rosl
2006-02-20 05:16
2006.03.12
ehlib





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский