Autor Beitrag
kasi
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 37

Win XP
D5 Ent
BeitragVerfasst: Di 05.08.03 22:01 
So geht es bei mit


ausblenden Quelltext
1:
2:
3:
4:
5:
6:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Trackbar1.OnChange := nil;
trackbar1.Position := mediaplayer1.Position;
TrackBar1.OnChange := TrackBar1Change;
end;


KASI