Moin,
dein Problem liegt wahrscheinlich darin, dass du die Farbe zum Zeichnen nicht gesetzt hast. In newIndy seinem Beispiel hat er diese auch gesetzt. Du kannst Pen.Color oder Brush.Color nehmen, je nachdem, wie der Kreis aussehen soll. (Gleiches gilt für Bitmap.Canvas)
Delphi-Quellcode:
Image1.Picture.Bitmap.Canvas.Pen.Color := clRed;
//oder
Image1.Picture.Bitmap.Canvas.Brush.Color := clRed;