Lazarus
Home
Help
TinyPortal
Search
Login
Register
Lazarus
»
Forum
»
Programming
»
Graphics and Multimedia
»
TAChart
(Moderator:
Ask
) »
[SOLVED] THintWindow and TAChart
Free Pascal
Website
Downloads
Wiki
Documentation
Bugtracker
Mailing List
Lazarus
Website
Downloads (Laz+FPC)
Packages (OPM)
FAQ
Wiki
Documentation (RTL/FCL/LCL)
Bugtracker
CCR Bugs
IRC channel
GIT
Mailing List
Other languages
Foundation
Website
Useful Wiki Links
Project Roadmap
Getting the Source
Screenshots
How to use the forum
About donations (wiki)
Bookstore
Computer Math and Games in Pascal
(preview)
Lazarus Handbook
Search
Advanced search
Recent
Forum slow
by
TRon
[
Today
at 01:16:26 am]
Demoscene The Champs Crac...
by
Gigatron
[
Today
at 01:05:16 am]
How to use the Event Log?
by
n7800
[
Today
at 12:47:25 am]
v3.99 code completion que...
by
440bx
[
Today
at 12:45:55 am]
FpDebug breakpoint on "be...
by
440bx
[
Today
at 12:36:23 am]
Generics - correct syntax
by
jamie
[
Today
at 12:09:16 am]
Access violation when re-...
by
TRon
[April 19, 2024, 11:44:51 pm]
[solved] how to get class...
by
jamie
[April 19, 2024, 11:34:44 pm]
Lazarus for Windows on aa...
by
Wallaby
[April 19, 2024, 10:52:25 pm]
Poll: Watches and Display...
by
440bx
[April 19, 2024, 07:13:51 pm]
InstallAware Using Lazaru...
by
marcov
[April 19, 2024, 04:46:46 pm]
Who is Indy mattias?
by
paweld
[April 19, 2024, 04:17:53 pm]
I just released a commerc...
by
BrassGear
[April 19, 2024, 03:17:28 pm]
Does anyone know why thes...
by
Laksen
[April 19, 2024, 03:04:14 pm]
Database standards OR Am ...
by
gidesa
[April 19, 2024, 02:37:56 pm]
How to: create DLL file f...
by
TRon
[April 19, 2024, 02:26:53 pm]
A fairly simple sound sol...
by
paweld
[April 19, 2024, 01:46:11 pm]
Access violation when ope...
by
Чебурашка
[April 19, 2024, 12:27:34 pm]
Step-into the field sette...
by
Martin_fr
[April 19, 2024, 11:31:48 am]
AI, NLP and CAI: Text Gen...
by
Dzandaa
[April 19, 2024, 11:03:26 am]
dwindows for Android
by
PierceNg
[April 19, 2024, 10:54:44 am]
create system unit from s...
by
Laksen
[April 19, 2024, 10:53:57 am]
[Solved] Find child contr...
by
Joanna
[April 19, 2024, 09:53:43 am]
FpDebug unexpected Assemb...
by
Marc
[April 19, 2024, 08:46:38 am]
Offical launch of the 1 B...
by
Handoko
[April 19, 2024, 07:59:07 am]
« previous
next »
Print
Pages: [
1
]
Author
Topic: [SOLVED] THintWindow and TAChart (Read 3534 times)
apeoperaio
Sr. Member
Posts: 273
[SOLVED] THintWindow and TAChart
«
on:
June 08, 2021, 04:14:18 pm »
I am using a THintWindow to show a proper hint when moving on a point over a TAChart.
In order to show the hint I am using the OnHintPosition event of the TDataPointHintTool and it works properly.
But, what should I use to hide the hint? I would like to hide the hint as soon as the mouse is no more over a point (like the text hint provided by TAChart).
How can I do that? Any hint?
Thank you.
«
Last Edit: June 09, 2021, 03:55:12 pm by apeoperaio
»
Logged
arneolav
Full Member
Posts: 195
Re: THintWindow and TAChart
«
Reply #1 on:
June 08, 2021, 05:28:11 pm »
Hi!
I'm using event "OnHint" and do not have this problem.
Add series like this:
ASeries.AddXY(myDateTime, MyValue, MyHintText, myColor);
In OnHint:
AHint:= TLineSeries(ATool.Series).Source.Item[ATool.PointIndex]^.Text;
«
Last Edit: June 08, 2021, 05:52:47 pm by arneolav
»
Logged
Win XP, Win7, Win 10, Win 11, win64 , Lazarus 3.0RC1
Delphi/DevExpress
apeoperaio
Sr. Member
Posts: 273
Re: THintWindow and TAChart
«
Reply #2 on:
June 08, 2021, 05:31:55 pm »
Do you use THintWindow or simple text hints?
Logged
wp
Hero Member
Posts: 11916
Re: THintWindow and TAChart
«
Reply #3 on:
June 08, 2021, 06:20:39 pm »
Since I don't know what you are doing exactly I cannot give specific help. However, maybe it helps when you study the attached demo in which the hint immediately disappears when the mouse is moved away from the data point.
Logged
apeoperaio
Sr. Member
Posts: 273
Re: THintWindow and TAChart
«
Reply #4 on:
June 09, 2021, 03:03:25 pm »
Your example works properly with hint provided by TAChart.
I would like to use a THintWindow instead (
https://lazarus-ccr.sourceforge.io/docs/lcl/forms/thintwindow.html
) since I would like to paint other controls on the hint, not only a text.
I attached a modified version of your project using THintWindow, it is showed in OnHintPosition event of TDataPointHintTool
You will see that the hint is shown when the mouse is over a point but it remains there when the mouse move away from the point.
Logged
wp
Hero Member
Posts: 11916
Re: THintWindow and TAChart
«
Reply #5 on:
June 09, 2021, 03:46:39 pm »
You can catch the OnAfterMouseMove event and check whether the Series property of the DatapointHintTool is nil. When this is true, the mouse is no longer over a datapoint, and you can destroy your HintWindow:
Code: Pascal
[Select]
[+]
[-]
procedure
TForm1
.
ChartToolset1DataPointHintTool1AfterMouseMove
(
ATool
:
TChartTool
;
APoint
:
TPoint
)
;
begin
if
TDatapointHintTool
(
ATool
)
.
Series
=
nil
then
FreeAndNil
(
_hint
)
;
end
;
Logged
apeoperaio
Sr. Member
Posts: 273
Re: [SOLVED] THintWindow and TAChart
«
Reply #6 on:
June 09, 2021, 03:55:35 pm »
It works as expected.
Thank you!
Logged
Print
Pages: [
1
]
« previous
next »
Lazarus
»
Forum
»
Programming
»
Graphics and Multimedia
»
TAChart
(Moderator:
Ask
) »
[SOLVED] THintWindow and TAChart
TinyPortal
© 2005-2018