Thema: Delphi Eigene Button Komponente

Einzelnen Beitrag anzeigen

Alter Mann

Registriert seit: 15. Nov 2003
Ort: Berlin
947 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#42

Re: Eigene Button Komponente

  Alt 8. Mai 2007, 21:36
Hi,

was ist denn das?
Zitat:
constructor TGraphicButton.Create(AOwner: TComponent);
begin
inherited Create(AOwner);

FPicture := TBitmap.Create;
Picture := TBitmap.Create;
end;
FBitmap ist die lokale Variable innerhalb deines Objektes und Picture der öffentlicher Verweis darauf, wozu dann
Zitat:
Picture := TBitmap.Create;
das wäre doppeltgemoppelt.

Und warum TBitmap? Normaler Weise sollte es so aussehen:

Delphi-Quellcode:
  TGraphicButton = class(TCustomControl)
  private
    ...
    FPicture: TPicture;
    procedure SetPicture(Value: TPicture);
    ...
    property Picture: TPictureread FPicture write SetPicture;
  end;
Damit ist es egal ob die Quelle eine Bitmap, JPEG, PNG oder sonst etwas ist.

Bezüglich des Overheat sollte allerdings von TGraphicControl abgeleitet werden, steht auch so in der Hilfe.
  Mit Zitat antworten Zitat