Flash加入Delphi

Question

Flash加入Delphi时使用路径是绝对的 怎样设置相对路径！

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShockwaveFlash1.Movie := ExtractFilePath(ParamStr(0)) + '结帖.swf';
end;

Answer 2

结帖.swf 挖卡卡卡，有意思！！先

Answer 3

我想把Flash放入Delphi 将Flash和Delphi程序绑在一起  不用受到路径的影响! 555

Answer 4

zswang(伴水清清)(专家门诊清洁工) 
procedure TForm1.Button1Click(Sender: TObject);
begin
  ShockwaveFlash1.Movie := ExtractFilePath(ParamStr(0)) + '结帖.swf';
end;上面的方法使用的是文件名作为命令行参数，　你可以把ExtractFilePath(ParamStr(0)) 替换为你自己swf文件的路径啊