Einzelnen Beitrag anzeigen

Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#11

AW: Vererbung von Komponenten

  Alt 28. Jan 2015, 19:25
Zitat:
FXScale: THorScale; ///////// Da muss irgendwo ein fehler stecken, wohl im Constructor ???
FYScale: TVertScale;

Die Setter von X bzw. YScale gehen so nicht. Spendier' THorScale und TVertScale mal ein Assign?

Delphi-Quellcode:
procedure THixHistoGraph.SetXScale(const Value: THorScale);
begin
  FXScale.Assign(Value);
  Invalidate;
end;

procedure THixHistoGraph.SetYScale(const Value: TVertScale);
begin
  FYScale.Assign(Value);
  Invalidate;
end;
  Mit Zitat antworten Zitat