as3 delphi向flash发送数据问题
procedure TForm1.Button1Click(Sender: TObject); begin    ShockwaveFlash1.SetVariable('recevtext',edit1.Text); end;   procedure TForm1.Button2Click(Sender: TObject); var      str:String;   begin    str:=ShockwaveFlash1.GetVariable('recevtext');    showmessage(str);   end;

按钮1发送数据可以，按钮2接收数据，也可以显示按钮1发送的数据，但是在flash里的label里面不能显示，因为label在as3里不能设置变量，在as2中能设置变量，但是，我用的代码是as3的，as2中不能运行，有没有高手能解决啊。

delphi中没有CallFunction方法，怎么办啊
没有完全相同的.
 
如果是2010及以上版本,可以看看看传送门