Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TChart Element in ein Drawgrid einfügen (https://www.delphipraxis.net/3857-tchart-element-ein-drawgrid-einfuegen.html)

Anna 2. Apr 2003 16:33


TChart Element in ein Drawgrid einfügen
 
Hallo,
ich habe es zwar geschafft Elemente vom Type TChart in ein DrawGrid einzufügen, aber sobald Scrollbars an der Seite erscheinen und betätigt werden stimmen die TChart Elemente nicht mehr.

Ich wäre für einen Link schon sehr dankbar, weil ich einfach nicht weiter komme :cry: , oder hier mein Quelltext für Vorschläge.
Ich vermute, dass es evtl. daran liegt, dass ich die Elemente nciht in die Celle reinmale, sondern nur darüberlege.
Mir würde auch schon sehr helfen, wenn ich weiß, wie ich ein Element, dass nciht vom Typ TGraphic ist in eine Zelle des Drawgrid einfüge.

Vielen Dank schon mal im vorraus für die Hilfe
Anna

Delphi-Quellcode:
var rect, rect2:Trect;
    Myseries, myseries2: TPieseries;
    i,j : integer;
begin
  rect := Drawgrid1.CellRect(3,3);
  graph := Tchart.Create(self);
  graph.Parent := DrawGrid1;
  graph.Left := rect.Left;
  graph.Top := rect.Top;
  graph.Height := rect.Bottom - rect.Top;
  graph.Width := rect.Right - rect.Left;
  Myseries := TPieseries.Create(self);
  Myseries.ParentChart := graph;
  Myseries.AddPie(3,'test1',clred);
  Myseries.AddPie(3,'test2',clblue);
  graph.Title.Visible := false;
  graph.Legend.Visible := false;
  graph.Series[0].Marks.Visible := false;
  graph.Show;
 end;
[edit=Daniel B]Delphi-Tags gesetzt. MfG Daniel B.[/edit]


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:20 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz