Einzelnen Beitrag anzeigen

Anna

Registriert seit: 30. Jan 2003
Ort: Mainz
2 Beiträge
 
Delphi 6 Personal
 
#1

TChart Element in ein Drawgrid einfügen

  Alt 2. Apr 2003, 16:33
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 , 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]
  Mit Zitat antworten Zitat