HiHo!
Also so wie du den Code jetzt hast mit der Kommentierung funzt das. Aber sobald du die Timer-Funktion nutzt,
dann geht da nix mehr, gelle?!
Problem ist, dass der Timer die Position ändert, und die OnChange-Funktion von der Trackbar dann aufgerufen wird.
Also eine Kette de la Reaktion.
Abhilfe kannst du dir dadurch schaffen, dass du den ActionListener vorher entfernst und danach wieder zuweist.
Sprich:
Delphi-Quellcode:
procedure TForm2.Timer1Timer(Sender: TObject);
begin
trackbar1.OnChange := Nil; // Aktionszuweisung entfernen
trackbar1.Position := bassdllplayer1.Position;
trackbar1.OnChange := poschange; // und wieder verknüpfen
end;
Hoffe et klappt.. elegant ist zwar was anderes...
vg
dp