主页
Top.Mail.Ru Yandeks.Metrika
论坛:“主要”;
当前存档:2002.07.25;
下载:[xml.tar.bz2];

向下

Tchart和提示...... 找到类似的分支


BillyJeans   (2002-07-12 09:46) [0]

先生们,程序员们,请告诉我如何将当前鼠标坐标填充为相对于所绘图表的提示(图表)



BAY   (2002-07-12 09:50) [1]

获取鼠标坐标时遇到问题?



BillyJeans   (2002-07-12 10:02) [2]

当然是鼠标的坐标。 例如,光标在坐标中心上方,因此在“提示”中,应为X:0 Y:0



BAY   (2002-07-12 10:08) [3]

这些是鼠标在屏幕上的坐标:
mouse.CursorPos.X;
mouse.CursorPos.Y;
还清楚吗?



BillyJeans   (2002-07-12 10:11) [4]

但是如何动态地将它们传递给提示?



BAY   (2002-07-12 10:11) [5]

例如在OnMouseMove中



BAY   (2002-07-12 10:12) [6]

procedure TForm1.FormMouseMove(Sender:TObject; Shift:TShiftState; X,
Y:整数);
开始
提示:= IntToStr(mouse.CursorPos.X)+“” + IntToStr(mouse.CursorPos.Y);
结束;

此处,米沙的坐标在屏幕上,但是您可以针对任何对象进行计算。



BAY   (2002-07-12 10:14) [7]

尽管可以使用X和Y,但传递给OnMouseMove



BillyJeans   (2002-07-12 10:20) [8]

好吧,我明白了! 最主要的是,相对于图表原点而言。 如果我做了Zoom,它就可以正常工作...



BAY   (2002-07-12 10:33) [9]

可以相对于表格或图表计算图表坐标的原点



BillyJeans   (2002-07-12 10:44) [10]

是的,如何防止提示随着时间消失?



BAY   (2002-07-12 10:54) [11]

Application.ActivateHint(mouse.CursorPos);
这在OnMouseMove中



BAY   (2002-07-12 10:56) [12]

但是我不知道如何设置提示延迟时间



BillyJeans   (2002-07-12 11:11) [13]

在这里
Application.ActivateHint(mouse.CursorPos);
真的有帮助!



BillyJeans   (2002-07-12 12:15) [14]

帮助确定相对于图表中心的鼠标坐标...



BAY   (2002-07-12 15:06) [15]

如果问题在于确定相对于海图的原点坐标,则必须使用“缩放”来查看其工作原理,如果不是,则:

xc,yc-相对于图表的原点坐标(左上角)
X,Y-屏幕上的鼠标坐标

(X-Form.x-xc,Y-Form.y-yc)



Страницы: 1 整个分支

论坛:“主要”;
当前存档:2002.07.25;
下载:[xml.tar.bz2];

楼上









内存:0.59 MB
时间:0.024 c
1-81243
DRT
2002-07-14 18:16
2002.07.25
课程烧伤! 帮助...... plz ......


7-81498
Crypter
2002-05-08 14:37
2002.07.25
如何找出被点击的内容


7-81501
ses1
2002-05-03 01:49
2002.07.25
如何确定显示器的类型? 视频内存量?


1-81269
Oleg Laukart
2002-07-08 12:44
2002.07.25
RichEdit的问题


14-81434
Chaynik2
2002-06-27 08:36
2002.07.25





南非荷兰语 阿尔巴尼亚人 阿拉伯语 亚美尼亚 阿塞拜疆 巴斯克 白俄罗斯 保加利亚语 加泰罗尼亚 简体中文 中国(繁体) 克罗地亚 捷克 丹麦语 荷兰人 英语 爱沙尼亚语 菲律宾人 芬兰 法文
加利亚西语 格鲁吉亚语 德语 希腊语 海地克里奥尔语 希伯来语 印地语 匈牙利 北日耳曼语 印度尼西亚人 爱尔兰语 意大利语 日本性玩偶 韩语 拉脱维亚 立陶宛 马其顿 马来语 马耳他语 挪威语
波斯语 波兰语 葡萄牙语 罗马尼亚 俄语 塞尔维亚 斯洛伐克 斯洛文尼亚 西班牙语 斯瓦希里 瑞典语 泰国人 土耳其 乌克兰 乌尔都语 越南人 威尔士语 意第绪语 孟加拉 波斯尼亚
宿务 世界语 古吉拉特语 豪萨语 苗族 伊博 爪哇 卡纳达语 高棉 老挝 拉丁语 毛利 马拉 蒙古人 尼泊尔 旁遮普 索马里 泰米尔人 泰卢固语 约鲁巴语
祖鲁
英文 Французский Немецкий Итальянский Португальский 俄文 Испанский