Du versuchst "einmalig" auf eine Komponente zu zeichnen, welche das Verhalten hat sich selber ab und an mal neu zu zeichnen und Deines dabei zu übermalen?
Selber Schuld, wenn es nicht funktioniert, bzw. womöglich bereits nach 'ner halben Millisekunde schon wieder übermalt wurde.
Entweder du malst auf eine Komponente, welche dein gemaltest speichert (z.B. in das Bitmap eines TImage, oder so ähnlich),
oder du malst auf eine Komponente, welche für sowas gedacht ist TPaintBox (gibt es die noch im FMX? bin mir grade nicht sicher) und da wird natürlich im OnPaint gezeichnen
oder du überschreibst die Paint-Methode deines TCircle und zeichnest dort drin, also genauso wie bei der PaintBox.
Falsch machst du, dap du vergessen hast den [delphi]...[/delphi]-Code um deinen Quellcode zu machen.
Und psssst, du hast deine Data-Variable vergessen zu benutzen.
