Objekt an Trackbar Position ausrichten

[stahli]

... und dazu mal für alle Eigenschaften "Setter" vorsehen in folgender Form:

Delphi-Quellcode:

procedure Form1.SetMaxValue(aValue: Integer);
begin
  if MaxValue <> aValue then
  begin
    CalcXPosition;
    PaintTrackbar;
  end;
end;

Natürlich musst Du die beiden Methoden dann auch noch deklarieren.

Das ist etwas mehr Schreibarbeit aber so ist das gut nachvollziehbar und Du weist auch später noch, was Du da programmiert hast.

Die Werte änderst Du dann durch SetMaxValue(100), SetPosition(50) usw.

Im Grunde hast Du dann schon fast die Funktionsweise einer echten Komponente.