Hallo,
ich muß gestehen - ich habe keine Ahnung.
Folgender Code läuft bei mir wie erwartet. Evt ist es ja ein kleine
Delphi-Quellcode:
Hilfeprocedure TForm1.TrackBar1Change(Sender: TObject);
begin
Case (Sender as TTrackBar).Tag of
1 : Label1.Caption:=IntToStr((Sender as TTrackBar).Position);
2 : Label2.Caption:=IntToStr((Sender as TTrackBar).Position);
end;
end;