Canvas.Pen.Width mit Trackbar ändern?!

[Ghostleader]

Wie kann ich mit einer Trackbar die Dicke des Stiftes von Canvas ändern?
Meine Grundidee wäre:

Delphi-Quellcode:

  if TrBarFontSize.Position = TrBarFontSize.Position +1 then
    begin
      Canvas.Pen.Width +1;
    end;

Aber in welches Ereigniss soll dieser Code? Bei Trackbar1Change?

(Bin noch ein Newbie in Delphi/Canvas)

Mfg Ghost