如何获跟FLASH传递参数

Question

装了FLASH控件后,怎样获取FLASH中的变量,我想在程序中引用FLASH中的变量

Answer 1

有一个更好的办法用 WebBrowser 把 Flash 文件放到网页里，
然后用 Flash 跳转URL 单不要用 Http://XXXX 这样的格式。
可以用如：wRun:calc.exe  这样的然后在自己定义的格式
当然还可以是别的的格式 Wrun:A=1;这样的也行;
WebBrowserBeforeNavigate 事件里有一个 url 参数 
//-------
procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
  var
  tmstr:string;
  tmInt:integer;
  begin if(LeftStr(url,4)='wRun')then//如果是以 'wRun' 开头的
    begin 
       tmstr:=URL;
       Cancel:=true;//这个一定要写要不就条转了！
       
       tmstr:=StrUtils.MidStr(tmstr,6,StrLen(PChar(tmstr))) ;//这里就取到了 calc.exe
       
    end;

Answer 2

怎么把DELPHI的数据传给FLASH变量呢,就是上面的疑传