DelphiX Sprite.image mit Canvas bearbeiten

[Neutral General]

Ich glaube das Problem ist wirklich eins

Jetzt sind wir schon zu dritt ^^

Hab zwar nicht GENAU das Problem aber

Delphi-Quellcode:

procedure TSpriteButton.SetCaption(const Value: String);
begin
  FCaption := Value;
  FSprite.Image.Picture.Bitmap.Canvas.TextOut
  ((Width div 2) + (FSprite.Image.Picture.Bitmap.Canvas.TextWidth(Value) div 2),
   (Height div 2) + (FSprite.Image.Picture.Bitmap.Canvas.TextHeight(Value) div 2),
    Value);        
end;

Mein Button verschwindet einfach wenn ich die Caption ändere
Bzw das passiert im OnShow der Form. Ansonsten springt das Sprite etwas nach rechts unten

Gruß
Neutral General