![]() |
[TChart] Zeichnen von Custom Axes
Hallo Leute
Ich habe wieder einmal ein kleines Problemchen, bei dem ich eure Hilfe benötige. Mit folgendem Code will ich in einer TChart Kompo die Achsen in der Mitte des Diagramms anzeigen lassen (der Code stammt aus einem der mitgelieferten Beispiele):
Delphi-Quellcode:
So weit läuft auch alles ganz gut; die Achsen werden tatsächlich in der Mitte angezeigt.
// im OnAfterDrawValues-Ereignis einer beliebigen LinienArt (Serie)
With Chart1 do begin PosAxis := ChartRect.Left + Trunc(ChartWidth*50/100.0); LeftAxis.CustomDraw(posaxis-10, posaxis-40, posaxis, false); PosAxis := ChartRect.Left + Trunc(ChartWidth*(100.0-50)/100.0); LeftAxis.CustomDraw(posaxis-10, posaxis-40, posaxis, false); PosAxis := ChartRect.Top + Trunc(ChartHeight*50/100.0); BottomAxis.CustomDraw(posaxis+10, posaxis+40, posaxis, false); PosAxis := ChartRect.Top + Trunc(ChartHeight*(100.0-50)/100.0); BottomAxis.CustomDraw(posaxis+10, posaxis+40, posaxis, false); end; Verscheibe ich nun das Diagramm mittels Mauszeiger oder sonst auf irgend eine Weise nach links (sodass die positiven Werte grösser werden), verschwinden die beiden Achsen in der Mitte plötzlich. Schiebe ich das Diagramm jedoch wieder zurück, erscheinen sie wieder. Wenn ich das selbe aber in Richtung negative Werte mache, bleiben die Achsen (egal wie weit ich nach links gehe). Nun meine Frage: Warum? Und was kann/muss ich ändern, damit die Achsen in der Mitte immer angezeigt werden? |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:54 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz