请大家帮忙解决一个Flash播放器中的几个问题

Question

我写的一个简洁的Flash播放器,基于Flash控件的.碰到几个问题：一、我注册了播放器自定义的播放列表文件，使之关联到我写的播放器，可是双击Flash播放列表文件，播放器不能依次播放列表中的文件，而在程序窗口中用打开命令播放却无问题。（详细情况请看源程序）
二、如何获得Flash影片的原始大小。
三、....有感兴趣的同志，愿意帮助改进的朋友请留下你们Email。我会把源程序寄到你们的信箱。
我过一个星期后来结贴，谢谢。

Answer 1

那个东西好多人做的了，但是我想知道如何屏蔽flash控件上的右键菜单~~》？而改成自己的

Answer 2

屏蔽flash控件上的右键菜单,我在里面已做好了改成弹出自己的右键菜单,不过现在的问题是在98下面弹出菜单很慢,xp无问题.屏蔽flash控件上的右键菜单
大概的思路是写一个过程
然后,application.onmessage:=mymessage;
(这个是我花了半天时间在图书中心找到的)
详情请看SourceCode我知道好多人做了,可是我希望用自己写的来播放.根自带的播放器比,多了暂停,播放功能!
这个在自带的播放器的右键菜单中有,
我写的是用快捷键加右键菜单控制,无任何按钮.
进度调节,播放时间显示(未完成),播放列表支持(想winamp那样,问题一),自动跳过Flash中的play按钮,关键现在无法从控件得到Flash的每秒帧数,据一位高手说从flash文件本身的第11.12字节提取,我试了一下,有时不灵.acdsee5就有播放时间显示过两天结贴,同时寄出邮件,
希望大家能帮我改进程序,可以写在本版,或给我email,下面大家可以略过不看
去年我在一家广告公司工作,有一个客户经常来我公司,几乎都是我负责帮她做,不觉很喜欢,
知道她很喜欢看flash, 就打算写这个程序.
失败后我离开了公司...
虽然明知与她不可能, 但仍然希望写好, 并给她
...

Answer 3

发一份给我，我也要看看
[email protected]

Answer 4

等一下我会发给所有留下email的朋友(共6位),谢谢大家的帮助.另 写给不愿留下email的 ghostmirror(mirror)
  屏蔽flash控件上的右键菜单,而改成自己的
  ...
  public
    ...
    procedure flashmsg(var msg:tmsg; var handled:boolean);
  ...
  procedure tform1.flashmsg;
  begin
    if (msg.message=wm_rbuttondown) and (msg.hwnd=flash1.handle) then
      begin
        popupmenu1.popup(Mouse.CursorPos.x,Mouse.CursorPos.y);
        handled:=True;
      end;
  end;
  ...
  再在oncreater中加上一句
  application.onmessage:=flashmsg;

Answer 5

我在98下面用delphi5写的
请发到我的邮箱吧。我给分了。