If Buffer.Width = PaintBox1.Width then Buffer.Width := Paintbox1.Width
Warum?
Auch: Vielleicht habe ich es nicht ganz verstanden. Aber XE4. Warum nicht mit TChart?
Hast du mal die Zeit gemessen, wie lange ein Timerdurchlauf benötigt? Und: Hast du mal versucht, zur Laufzeit den
VCL-Stil zu wechseln? Wie verhält es sich dann?