This repository has been archived by the owner on Apr 1, 2024. It is now read-only.
-
Notifications
You must be signed in to change notification settings - Fork 2
/
AboutDialog.ahk
116 lines (105 loc) · 5.4 KB
/
AboutDialog.ahk
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
/*
o-----------------------------------------------------------------------------o
| Author : Lokesh Govindu |
| Email : lokeshgovindu@gmail.com |
| HomePage : http://lokeshgovindu.blogspot.in/ |
(-----------------------------------------------------------------------------)
| About Dialog / A Script file for AutoHotkey 1.1.23+ |
| ----------------------------------------|
| |
o-----------------------------------------------------------------------------o
*/
;~ ; This is for my testing
;~ #Include VersionInfo.ahk
;~ If (true) {
;~ ProductPage := "http://alttabalternative.sourceforge.net/"
;~ AuthorName := "Lokesh Govindu"
;~ AuthorPage := "http://lokeshgovindu.blogspot.in/"
;~ AutoHotkeyPage := "https://autohotkey.com/"
;~ AboutDialogHtml =
;~ (
;~ <html>
;~ <body>
;~ <b style='mso-bidi-font-weight:normal'><span
;~ style='font-size:11.0pt;mso-bidi-font-size:12.0pt;font-family:"Calibri",sans-serif;
;~ mso-fareast-font-family:"Times New Roman";color:red'>This program is a free
;~ software.</span></b><span style='font-family:"Calibri",sans-serif;mso-fareast-font-family:
;~ "Times New Roman"'><br>
;~ <span class=SpellE><span style='color:#002060'>AltTabAlternative</span></span><span
;~ style='color:#002060'> is a small application created in <a
;~ href="https://autohotkey.com/"><span class=SpellE><span style='color:#002060'>AutoHotkey</span></span></a>,
;~ is an alternative for windows native task switcher (<span class=SpellE>Alt+Tab</span>
;~ / <span class=SpellE>Alt+Shift+Tab</span>).
;~ It also supports Alt+Backtick / Alt+Shift+Backtick to switch between the windows of the same application.</span>
;~ <br>
;~ <br>
;~ </span>
;~ <span class=SpellE><b style='mso-bidi-font-weight:normal'><span
;~ style='font-size:11.0pt;mso-bidi-font-size:12.0pt;font-family:"Calibri",sans-serif;
;~ mso-fareast-font-family:"Times New Roman";color:#002060'>%ATAPRODUCTNAME%</span></b></span><b
;~ style='mso-bidi-font-weight:normal'><span style='font-size:11.0pt;mso-bidi-font-size:
;~ 12.0pt;font-family:"Calibri",sans-serif;mso-fareast-font-family:"Times New Roman";
;~ color:#002060'><br>
;~ <span class=SpellE>FullVersion %ATAPRODUCTFULLVERSION%</span><br>
;~ %ATACOPYRIGHT%<o:p></o:p><br><a href="mailto:lokeshgovindu@gmail.com?Subject=AltTabAlternative">
;~ mailto: lokeshgovindu@gmail.com</a></span></b>
;~ <hr>
;~ <b style='mso-bidi-font-weight:normal'>
;~ <span style='font-size:11.0pt;mso-bidi-font-size:12.0pt;font-family:"Calibri",sans-serif;
;~ mso-fareast-font-family:"Times New Roman";color:#C00000'>First thanks to God :-)</span></b>
;~ <br><br>
;~ <style>
;~ table {border-spacing: 8px 2px;}
;~ </style>
;~ <table style='font-size:11.0pt;mso-bidi-font-size:12.0pt;font-family:"Calibri",sans-serif;color:#98B87E' cellspacing="0" cellpadding="0">
;~ <tr style='color:#774620'><td align="right"><b><a href="https://github.com/ralesi">Rich Alesi</a>, <a href="https://github.com/studgeek">David Rees</a></b></td><td>: AltTab initial version</td><tr>
;~ <tr style='color:#3D113B'><td align="right"><b><a href="https://autohotkey.com/boards/memberlist.php?mode=viewprofile&u=58">jballi</a></b></td><td>: For AddTooltip, Font Library v0.5</td><tr>
;~ <tr style='color:#778E64'><td align="right"><b>kdoske</b></td><td>: For CSV Library</td><tr>
;~ <tr style='color:#53A390'><td align="right"><b><a href="http://www.elegantthemes.com/">elegantthemes</a></b></td><td>: Icon design</td><tr>
;~ <tr style='color:#4C4AA8'><td align="right"><b><a href="https://in.linkedin.com/in/madhu-sameena-05084b38">Madhu Sameena</a></b></td><td>: Suggestions & testing</td><tr>
;~ <tr style='color:#7D3858'><td align="right"><b><a href="https://in.linkedin.com/in/satish-samayam-077a4a2b">Satish Samayam</a></b></td><td>: Suggestions & testing</td><tr>
;~ </table>
;~ <br>
;~ <span style='font-size:11.0pt;mso-bidi-font-size:12.0pt;font-family:"Calibri",sans-serif;;color:#049308'><b>And Everyone !!!</b></span>
;~ </body>
;~ </html>
;~ )
;~ AboutDialog()
;~ Return
;~ Esc::
;~ ExitApp
;~ }
AboutDialog()
{
Global
Gui, AboutDialog: New, , About %ATAPRODUCTNAME%
Gui, Margin, 10, 10
Gui, Font, s11
Gui, Add, Link, hWndhAppSysLink vProgNameSysLink, <a href="%ProductPage%">%ATAPRODUCTNAME%</a> Version %ProductVersion%
Gui, Add, Link, y+1 hWndhAuthorSysLink vAuthorSysLink, <a href="%AuthorPage%">%AuthorName%</a> (C) %ProductYear%
Gui, Add, Text, y+9, About && Credits
Gui, add, ActiveX, y+1 vHF w510 multi r12 +Border, HTMLFile
HF.write(AboutDialogHtml)
Gui, Font
Gui, Add, Button, w75 gBtnOk vBtnOk +Default +Center, OK
Gui, Show, AutoSize Center
Return
AboutDialogGuiEscape:
AboutDialogGuiClose:
BtnOk:
Gui, AboutDialog:Hide
AboutDialogGuiSize:
WinGetPos, X, Y, Width, Height, A
MoveControlToHorizontalCenter("ProgNameSysLink", Width)
MoveControlToHorizontalCenter("AuthorSysLink", Width)
MoveControlToHorizontalCenter("BtnOk", Width)
GuiControl, Focus, BtnOk
Return
; End of the GUI section
}
MoveControlToHorizontalCenter(CtrlvName, Width)
{
GuiControlGet, CtrlPos, Pos, %CtrlvName%
XPos := (Width - CtrlPosW) / 2
GuiControl, Move, %CtrlvName%, x%XPos%
}