Ich hab ja Dein Werk nicht aber ich hoffe ich habe Dich diesmal Richtig Verstanden.
Delphi-Quellcode:
procedure TForm1.TrackBar1Change(Sender: TObject);
var
links, rechts: double;
i: Integer;
begin
links := 50-TrackBar1.Position;
links := (links/50)*16;
rechts := TrackBar1.Position-50;
rechts := (rechts/50)*16;
Label3.Caption := FloatToStr(links);
Label4.Caption := FloatToStr(rechts);
end;
Trackbar hat einen Max = 100
Trackbar 50 = die Mitte = Links & Rechts = 0
Trackbar 0 = ganz links = Links 16 & Rechts = -16
Trackbar 100 = ganz rechts = Links -16 & Rechts = 16
Meinst Du so etwas?