... 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.
