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;
另外哪位有详细的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;