i:=Tmpmemo.Lines.Count; 是吧
那你初次执行的话
肯定只能是
WindowsMediaPlayer1.URL:=ExtractFilePath(Paramstr(0))+'大屏滚动播放视频\'+Tmpmemo.Strings[i-1]; //只能是 i-1 是吧？ 因为是I的话 就超出范围了
假如一开始 I 为 10
第一次就播放 Tmpmemo.Strings[9]
而第二次
你是I=I-1， 还是播放Tmpmemo.Strings[9];
修改办法是 第一次 播放以后 I减1；
然后
if i>1 then begin 改成 if i>0 then begin
内容全部来源于网络收集，如有侵权，请联系网站删除！