谁知道鲁大师（一款软件）的任务栏标尺是什么原理

几罗星人 2012-09-09 11:48:04

看图，红圈的部分，是鲁大师的任务栏标尺，可以动态地显示CPU温度，这个是怎么做的？

...全文

893 23 打赏收藏转发到动态举报

写回复

用AI写文章

23 条回复

切换为时间正序

请发表友善的回复…

发表回复

zhangweilst 2015-02-23

打赏
举报

引用 3 楼 Veron_04 的回复:

至于你说的显示，那相比与获取温度，容易的多了

获取温度不难，这种GUI倒是真不会~

几罗星人 2012-09-22

打赏
举报

还没搞出来，不过了解到了很多细节，到时候可以慢慢弄，谢谢各位了

sosoben 2012-09-17

打赏
举报

用 spy++也获取不了句柄吗？？如果是你自己建的空间，不是可以获取 .handle 属性吗？

几罗星人 2012-09-16

打赏
举报

[Quote=引用 18 楼的回复:]
成功了！恭喜你一下
[/Quote]
革命尚未成功，同志仍需努力

嗷嗷叫的老马 2012-09-16

打赏
举报

MSDN里好东西多着呢.

几罗星人 2012-09-15

打赏
举报

可是要发送消息，也要知道句柄啊，发出消息总要有接受的地方吧。

c_cyd2008 2012-09-15

打赏
举报

成功了！恭喜你一下

几罗星人 2012-09-15

打赏
举报

终于发现MSDN的好用之处了~~

几罗星人 2012-09-15

打赏
举报

[Quote=引用 5 楼的回复:]

这不过就是一个任务栏上的ReBar控件中新建个Band.

向那个ReBar发送个RB_INSERTBAND消息插入一个Band,再把自己某个窗口定位上去应该就行了.
[/Quote]
写了个代码试了一下：



    hWndTemp = FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString)

    hWndTemp = FindWindowEx(hWndTemp, 0, "ReBarWindow32", vbNullString)

'   SendMessageCallback hWndTemp, RB_INSERTBANDA, 0, 0, AddressOf WndProc, 0

    MsgBox SendMessage(hWndTemp, RB_INSERTBANDA, 0, 0)

最后消息框出来的是0。如果用注释了的那个回调发送消息函数，回调的结果也是0.那么发送消息返回结果是0是不是意味着成功了呢？如果是的话，任务栏上也没见到任何变化啊。到底是创建Band没成功；还是成功了，还需要有后续的步骤，才会出现一些变化呢？

c_cyd2008 2012-09-15

打赏
举报

[Quote=引用 14 楼的回复:]
可是要发送消息，也要知道句柄啊，发出消息总要有接受的地方吧。
[/Quote]
虽然没试过，但老马的意思是你应该向"ReBarWindow32"发消息，而不是ToolbarWindow32,"ReBarWindow32"的句柄你应该得到了吧

c_cyd2008 2012-09-14

打赏
举报

[Quote=引用 12 楼的回复:]
引用 10 楼的回复:

引用 8 楼的回复:

为什么我总是拿不到ToolbarWindow32的句柄呢？
…………
…………
统统都是返回0，为什么？

为什么，自己用法不对呗。
没看我在1F说的那些“层次关系”吗！

你以为要拿它的句柄，能那么省事么？
VB code
Private Sub Command1_Click()
Dim hWndTemp A……
[/Quote]

win7和XP不同，MSTaskSwWClass下没有ToolbarWindow32,当然拿不到，还是看看5楼老马的建议

几罗星人 2012-09-14

打赏
举报

[Quote=引用 10 楼的回复:]

引用 8 楼的回复:

为什么我总是拿不到ToolbarWindow32的句柄呢？
…………
…………
统统都是返回0，为什么？

为什么，自己用法不对呗。
没看我在1F说的那些“层次关系”吗！

你以为要拿它的句柄，能那么省事么？
VB code
Private Sub Command1_Click()
Dim hWndTemp As Long
……
[/Quote]
你的代码我试过了，还是为0。我调试看了一下，到这一句还是有返回的句柄的



 hWndTemp = FindWindowEx(hWndTemp, 0, "MSTaskSwWClass", vbNullString)

但是，最后去拿托盘区的这句，偏偏返回的是0



 hWndTemp = FindWindowEx(hWndTemp, 0, "ToolbarWindow32", vbNullString)

好吧，怎么回事？？？

几罗星人 2012-09-14

打赏
举报

哇~~~，难怪~~

舉杯邀明月 2012-09-14

打赏
举报

[Quote=引用 8 楼的回复:]

为什么我总是拿不到ToolbarWindow32的句柄呢？
…………
…………
统统都是返回0，为什么？
[/Quote]

为什么，自己用法不对呗。
没看我在1F说的那些“层次关系”吗！

你以为要拿它的句柄，能那么省事么？

Private Sub Command1_Click()

   Dim hWndTemp   As Long

   hWndTemp = FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString)

   hWndTemp = FindWindowEx(hWndTemp, 0, "ReBarWindow32", vbNullString)

   hWndTemp = FindWindowEx(hWndTemp, 0, "MSTaskSwWClass", vbNullString)

   hWndTemp = FindWindowEx(hWndTemp, 0, "ToolbarWindow32", vbNullString)

   MsgBox "ToolbarWindow32的句柄是：" & hWndTemp

End Sub

赵4老师 2012-09-14

打赏
举报

推荐楼主使用Spy4Win软件。

几罗星人 2012-09-13

打赏
举报

为什么我总是拿不到ToolbarWindow32的句柄呢？



hWnds = FindWindow("Shell_TrayWnd", vbNullString)

MsgBox FindWindowEx(hWnds, 0, "ToolbarWindow32", vbNullString)

消息框出来的是0.这样写也不行：



MsgBox FindWindowEx(0, 0, "ToolbarWindow32", vbNullString)

这样也不行：



MsgBox FindWindow("ToolbarWindow32", vbNullString)

统统都是返回0，为什么？

贝隆 2012-09-12

打赏
举报

我觉得就是个美工活儿

东方之珠 2012-09-12

打赏
举报

[Quote=引用 2 楼的回复:]
这个问题我也研究过，不知道它的这个温度是怎么获得的。反正网上的方法我都试过了，要不获取不了数据，要不获取的数据是固定的。我想它获取的应该是BIOS中的数据，但BIOS的数据存在什么地方？怎么获取？是一个问题。我们可以说获取BIOS的数据可以采用读写系统IO来实现，但问题的关键就在于这些数据存储在什么地方呢？？？
[/Quote]
应该是用底层驱动实现的。我爱用ATI显卡，这种显卡能取得显卡的温度，还能控制风扇，这些都是用硬件驱动实现的。

嗷嗷叫的老马 2012-09-12