Форум Flasher.ru - Изменение переменной из Делфи

Форум Flasher.ru (http://www.flasher.ru/forum/index.php)

- Интеграция Flash с... (http://www.flasher.ru/forum/forumdisplay.php?f=2)

- - Изменение переменной из Делфи (http://www.flasher.ru/forum/showthread.php?t=51296)

Изменение переменной из Делфи

Написал код во флэше, который отлавливает нажатие клавиши мыши и если переменная key_press=true, то ее переназначить и выполнить процедуру fnCrObj() (которая дублирует другой мувиклип)

sm = new Object();
sm.onMouseDown = function ()
{
if (_root.key_press==true)
{
fnCrObj()
_root.key_press=false
}
}
Mouse.addListener(sm);

Вопрос в том, что - я из Дельфи при нажатии на кнопку (например Button1) меняю значение переменной key_press в TRUE, то она значение то меняет, НО при нажатии кнопки мыши функция fnCrObj() не хочет выполняться.

Я попробовал так:

Flash:

Код:

isEnabled_ml = 0;

...

mh.onMouseMove = function()

{

        if (isEnabled_ml==1)

                {

                    .........

                }



// mh - обработчик событий мыши

Delphi:

Код:



procedure TForm1.ButtonEnableClick(Sender: TObject);

begin

   ShockwaveFlash1.SetVariable('isEnabled_ml', '1');

end;



procedure TForm1.ButtonDisableClick(Sender: TObject);

begin

   ShockwaveFlash1.SetVariable('isEnabled_ml', '0');

end;

И работает.