文件拷贝问题 flash播放问题(100分)

flash控件已经加入了，可是为什么显示一片空白，没有报错
不明白 新建一个文件可以正常显示flash,
procedure PlayFlash(fileName:string);
begin
try
frmMain.Flash.Visible :=true;
frmMain.Flash.Movie :=filename;
frmMain.Flash.Playing := True;
frmMain.Flash.Play ;
except
on E: Exception do
showmessage(e.Message );
end;
end;
是不是控件太多冲突了？

文件拷贝的问题，用了三种方法，但都不能完全成功，要复制的文件
是只有权限读的，stream方法、block方法、都不能用，但stream方法可以复制图片，
另外调用shellexecute函数执行图象文件可以但是执行可执行文件都不行，
（说明：我是在网上邻居上执行shell程序的：
shellExecute( Application.Mainform.handle,'open',PChar('//abc/123.exe'),nil,nil,SW_NORMAL);
!!<这里
如果是图片就可以，其他程序就不行，该如何做呢，和网上邻居上功能一致就好！
如果实在不行，虚拟成本地硬盘也行，有什么快捷方法吗？）

C++里是////abc//123.exe

frmMain.Flash.Playing := True; 这一句应该不需要

只能说明文件有问题， flash 内部出错不会抛出Exception异常。

映射驱动器。

多谢二位，不过问题一个都没有解决，
frmMain.Flash.Playing := True；这句加和不加都一样
文件没有问题，新建一个文件加入swf就能播放，可在另外一个程序中不同
（安装shockware的时候自动把xpmenu卸载了，会不会是这两个控件有冲突，我去掉xp试试）

////abc//123.exe这句怎么改呢？需要pchar类型，比如'//abc/123.exe'这句
用转化如何做？pchar('/'+fullname)无效
映射网络驱动器无效！好奇怪啊！！！

怎么没人理我啊，5555
问题都没有解决啊◎◎

如果 abc 是机器名，'//abc/123.exe' 的写法没问题，
主要是 shellExecute 是否支持这种形式的路径，这个你自己可以试的。
如果不支持，只能通过映射驱动器的方式。

去掉Pchar看看

try
frmMain.Flash.Visible :=true;

{*Add this line.} frmMain.Flash.Parent:=frmMain;

frmMain.Flash.Play ;
except
on E: Exception do
showmessage(e.Message );
end;

up

接受答案了.