HLink [v2.01]

Author: majkinetor Last Modified: nonexistent


Creates in a gui a hyperlink control, like those from websites.

HLink("oldNotify", RegisterCallback(old)
HLink_Add(hGui, X, Y, W, H, Handler="", Text="'HLink Control':")
HLink_add2Form(hParent, Txt, Opt)
HLink_onNotify(Wparam, Lparam, Msg, Hwnd)

For more details of the functions's parameters and return value, please see it's source code.

Remarks

This module is part of the Forms Framework package.

MSDN Reference: http://msdn2.microsoft.com/en-us/library/bb760704.aspx

For update's details and remarks related to the functions, please see the AutoHotkey Forum: http://www.autohotkey.com/forum/viewtopic.php?t=53317

License

The functions is an open source item under the GNU GPL license. For details, please see gpl-2.0.txt

Example

; #Include HLink.ahk
#NoEnv
SendMode Input
SetWorkingDir %A_ScriptDir%
#SingleInstance force

   Gui, +LastFound
   hGui := WinExist() +0

   HLink_Add(hGui, 10,  10,  250, 20, "OnLink", "Click 'here':www.Google.com to go to Google" )
   HLink_Add(hGui, 10,  40,  250, 20, "OnLink", "Click 'this link':www.Yahoo.com to go to Yahoo")
   HLink_Add(hGui, 10,  170, 100, 20, "OnLink", "'About HLink':About")
   HLink_Add(hGui, 110, 170, 100, 20, "OnLink", "'Forum':http://www.autohotkey.com/forum/topic19508.html")
   HLink_Add(hGui, 10,  60,  100, 20, "", "'Google':www.Google.com") ;without handler
   Gui, Show, w300 h200
return

OnLink(hCtrl, Text, Link){
    if Link = About
        msgbox Hlink control`nby majkinetor
    else return 1

}

GuiClose:
ExitApp