Question

如何给一般格式的视频添加按钮，使其点击播放

在做IEBOOK，准备往里面加入视频，因为只能添加FLASH，所以都是一般视频转换的但是一般视频都是自动播放的！！想为其添加按钮，如一般FLASH一样，可以通过点击播放

Answer 1

何关闭旧文件呢？再说我只是多次点击了文件，并没有每个都“播放”啊？
只要点击两个以上的文件后再按“播放”，程序就会出错。

以下是ListBox1Click代码：
procedure TFlashPlayer.ListBox1Click(Sender: TObject);
var
i: Integer;
begin
for i:=0 to ListBox1.Items.Count-1 do
begin
if ListBox1.Selected[i] then
begin
PlayBtn.Enabled:=true;//当选择一个文件后，“播放”按钮呈有效状态
end;
end;
end;