Show a traytip with the resolution of an image by pressing space+LMB

[careca]

Works with ctrl+left mouse click, displays a traytip, balloon-like with the image resolution, if can be read. Not entirely mine, got help from forum, without you i couldn't have done it. thanks ppl.

#include "image_get_info.au3"
#include <Misc.au3>
AutoItSetOption("TrayAutoPause", 0)
Local $DLL = DllOpen("user32.dll")
Local $file, $aInfo, $keyR1, $keyR2
RegWrite("HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced", "EnableBalloonTips", "REG_DWORD", "1")

While 1
Sleep(50)
If _IsPressed("11", $dll) Then ;CTRL
$keyR1 = 1
CTRLkey()
ElseIf $keyR1 + $keyR2 = 2 Then
RES()
EndIf
WEnd
DllClose($dll)

Func CTRLkey()
If _IsPressed("01", $dll) Then ;LMB
$keyR2 = 1
EndIf
EndFunc ;==>CTRLkey

Func RES()
$keyR1 = 0
$keyR2 = 0
Send("^c")
Sleep(50)
$file = ClipGet()
$aInfo = _ImageGetInfo($file)
TrayTip("Resolution", _ImageGetParam($aInfo, "Width") & "x" & _ImageGetParam($aInfo, "Height"), 2, 1)
EndFunc ;==>RES

EDIT: Required UDF attached, had to change code as it wasn't working flawlessly as it should, now it's good, press ctrl and click on the image, once you release ctrl, the traytip will show the resolution of the image. Got to investigate why it wasn't working well the other way.

image_get_info.au3

AutoIt Res.au3

Edited October 23, 2012 by careca

[czyt]

Missing ‘image_get_info.au3’ fie.

[careca]

Hi, sorry, my bad. Included the UDF and updated first post.

UDF can be found