Benötige Hilfe beim Entwickeln einer Komponente

[Ghostwalker]

Schnipps:

Delphi-Quellcode:

   :
   Procedure Paint;override;
   :
   :
   procedure TMyPanel.Paint;override;
   begin
    Canvas.Brush.Color := FBgColorFrom;
    Canvas.TextOut(1,1,'Test');
    Canvas.Refresh;  
   end;

Also im Prinzip aus onPaint, paint machen.