MediaPlayer 的使用方法(100分)

  • 主题发起人 主题发起人 warket
  • 开始时间 开始时间
W

warket

Unregistered / Unconfirmed
GUEST, unregistred user!
delphi 中有Mediaplayer ,请问怎样可以把帧拖到我想要看的地方。
 
真接拖就行呀
 
procedure TForm1.TrackBar1Change(Sender: TObject);
begin

MediaPlayer1.Position:=TrackBar1.Position;
end;
 
onmousedown then

pause;
onmuseup then

MediaPlayer1.Position:=TrackBar1.Position;
run;
 
谢谢大家
 
后退
顶部