delphi中怎样获取网页flash中的数据,并把flash中的数字转换为数值?

解决方案 »

  1.   

    在shockwaveflash控件里 有个什么事件,可以接收传过来的数据,事件太长,忘了。楼主试试吧
      

  2.   

    flash中发送数据:fscommand("rightchar",rightchar);
    其中第一个参数是命令,第二个参数是string型,是要发送的数据
    delphi中:procedure TForm1.ShockwaveFlash1FSCommand(ASender: TObject; const command,
      args: WideString);
      var
      index:integer;
    begin
        if command='leftchar' then
        begin
           edit1.Text:='leftchar'+args;    end
        else if  command='rightchar' then
        begin
           edit1.Text:='rightchar'+args;
        end
        else if command='place' then
        begin
           index:=strtoint(args);
           {if index mod 2=0 then
           begin
               ShockwaveFlash1.Top:=-(index*100+50)+20;
           end
           else
           begin
               ShockwaveFlash1.Top:=-((index-1 )*100+75 )+20;
           end;  }
           //ShockwaveFlash1.Top:=-index +20  ;
           edit1.Text:='place'+args;
        end;
    可以根据命令,发送好多数据。
    现在就是delphi中往flash中发送数据不好解决,有高手给的指点。