TrackBar的用法(30分)

A

asdqwe

Unregistered / Unconfirmed
GUEST, unregistred user!
请举个简单例子说明,谢谢。
 
procedure form1.TimerTrackBarChange(Sender: TObject);
begin
TimerEdit.Text:=IntToStr(TimerTrackBar.Position);
end;
 
procedure form1.Timer1Timer(Sender: TObject);
begin
TrackBar1.Postion:= MediaPlayer1.Position
end;
 
我是说怎样改变TrackBar的显示进度,比如播放歌曲时怎样让它随歌曲走动?
 
接受答案了.
 
顶部