如何实现DELPHI7中对Flash的调用(50分)

  • 主题发起人 主题发起人 publicnews
  • 开始时间 开始时间
P

publicnews

Unregistered / Unconfirmed
GUEST, unregistred user!
看到很多程序中有在窗体上用的按纽是Flash做的按扭,按下后可以实现对其它窗体的调用,请问如何实现。
另外哪位有详细的Flash调用也请给一份,谢谢!
说明:
在swf文件中定义了两个按纽,一个命名为a,一个命名为b,要通过判断点击了不同的按纽来执行不同的操作
可是该在Flash中对按纽的什么赋值呢,我试了将按纽的实例名和元件名都改成了a,但点击了还是没有效果啊
procedure TForm1.btn3Click(Sender: TObject);
begin

f1f.Movie:='d:/test.swf';
f1f.Play;

end;

procedure TForm1.f1fFSCommand(ASender: TObject;
const command,
args: WideString);
begin

if command='a' then
btn1.Caption:='click 1' else
btn1.Caption:='click 2';

end;
 
procedure TForm1.f1fFSCommand(ASender: TObject;
const command,
args: WideString);
begin

showmessage(command);//这样不就知道是什么了嘛
if command='a' then
btn1.Caption:='click 1' else
btn1.Caption:='click 2';

end;
 
晕倒,用showmessage(command)竟没有执行
procedure TForm1.f1fFSCommand(ASender: TObject;
const command,
args: WideString);
begin
ShowMessage(command);
end;
 
Flash中设置按钮
fscommand (”Num1”, ”1”);
程序调用
procedure TForm1.f1fFSCommand(ASender: TObject;
const command,
args: WideString);
begin
if ((command=’Num1’) and (args=’1’)) then
showmessage(’Num1 1’);
end;
 
请问
-------------------
Flash中设置按钮
fscommand (”Num1”, ”1”);
-----------------
是什么意思,在flash中怎么设置
 
flash控件的那个时间是在flash中触发相应的东西才能激活的吧?
你要在flash那边也写相应的代码才行啊
 
找出来了,谢谢!
 
不好意思
cst_zf,风铃夜思雨
的分没送出去,下次吧[:D]
 
后退
顶部