适合双屏幕的双击取词 Win+AHK+GD

deeke

特点：
1.适合配置双屏幕的电脑使用。
2.在指定软件窗口中双击取词，如 SumatraPDF、Firefox、EditPlus 等等。
3.在任意软件窗口中选中单词或词组，然后后按右边 Ctrl 键取词。
4.取词后还原剪切板内容、焦点回到原窗口。
5.按 Pause 键暂停或继续。
* C5 i1 S8 N2 b' @( q
' ]# b$ `8 O4 e9 j参考：
GoldenDict+Autohotkey-> 高亮即取词[Windows]
超级实用！自制MDict取词小助手！
/ I# p& |& p. O
东拼西凑的 AutoHotkey 脚本，错漏不足之处请不吝指正。

1. ~Pause::Suspend
   
2. 
   
3. ~RControl::
   ; A8 [0 S% V. e! |
4. LookUp()
   
5. return
   
6. 
   : p2 D# \9 U6 a5 F* T
7. ~LButton Up::
   + t/ M& q% I" b! f
8. if (A_TickCount - t) < 350
   
9. {
   
10.         if(IsMySoft())
    
11.                 LookUp()
    
12. }
    % ^% Z# y' r- P5 |! r/ o
13. t := A_TickCount
    
14. return
    3 }) d: M( @- M8 G4 E) O2 [
15. 
      v, L. c1 J8 f6 S8 t, s# D% ?: W
16. IsMySoft()
    
17. {
    ' c! ]) E3 u& K" v
18.         MouseGetPos, ,,win
    & X  J/ ]$ {6 j, j) A( y8 o
19.         SetTitleMatchMode, 2
    ) a  b( s+ ~7 _
20.         if WinActive("SumatraPDF") = win
    
21.                 return true
    
22.         if WinActive("Firefox") = win
    4 Q+ a& B( W3 z* @5 M7 f
23.                 return true
    " H" n  M7 ?, i# X
24.         if WinActive("EditPlus") = win
    0 w) P3 s- Z4 M0 w
25.                 return true
    ; E9 T- X2 ]8 g0 h5 Z$ y! M
26.         return false
    4 z: |- j9 U" n. p& {" ?  H
27. }
    
28. 
    % ?; t9 c- ~5 i) P" Y
29. LookUp()
    . p' S8 B( D! {7 T
30. {
    9 L2 x0 m) j$ ^! f
31.         Sleep, 300
      L- `3 @  `/ O
32.         a = %Clipboard%
    1 w! F6 j: v# Y
33.         Clipboard =
    
34.         Send ^c
    
35.         Sleep, 300
    5 W3 F' a2 k5 \- ~6 [
36.         b = %Clipboard%
    % m% i' I) t0 z6 I4 I
37.         if StrLen(b) > 0 and StrLen(b) < 20
    
38.         {
    2 l. e+ O% W! b* e/ m4 [
39.                 WinGetActiveTitle, Title
    
40.                 run "c:\Portable Program\GoldenDict\GoldenDict.exe" "%b%"
    + F4 u2 u/ R9 S( E5 Q$ v
41.                 Sleep, 800
    6 }0 d7 @  b( t( u. b$ Q
42.                 IfWinExist, %Title%
    : [1 O3 T2 }& I/ p" P# d
43.                         WinActivate
    ! x2 L" v; _8 k9 W
44.         }
    $ Q% y* g9 }4 b6 C3 _' s, Q2 y
45.         Clipboard =
    ; D6 p4 p& n) W2 M2 _
46.         if StrLen(a) > 0
    
47.         {
    3 o* |( M3 P$ q1 y7 n
48.                 Clipboard = %a%
      D/ P' O7 o; H5 c/ [
49.         }
    
50.         VarSetCapacity(a, 0)
    
51.         VarSetCapacity(b, 0)
    , n) L: w( D+ F% E6 b! d
52.         return
    3 C8 \1 c# Y  u" C$ e7 Y
53. }

复制代码

注意：修改成你电脑上的 GoldenDict.exe 路径。

deeke

% M* R( N" N2 F, d( h+ w( h
& ?6 Q, Y  e, w/ ]* w1. 删除 移动窗口 的快捷键。
2. 增加 按右边 Ctrl键去查询被选中的词组、短语。
5 y2 g; b" r+ U. Y, y
如果是单屏幕计算机使用，去掉代码区的 39、42、43 那三行即可。

lxchen2001

想法挺棒：
3 s3 }5 u+ Q/ g5 P- 可以限制使用GD的应用，并不是想在所有的应用上都使用GD

deeke

  X' Q' I  t& g2 L+ W" b* p' z" M增加三行内容

1. #SingleInstance ignore
   
2. ;此脚本的实例一次只能运行一个。
   
3. 
   ) k& y' _# Z4 P1 t& V$ V  M. o
4. ~Pause::Suspend
   3 o: y; m9 @5 a" g
5. ;按下Pause键会挂起脚本，关闭功能。
   
6. 
   
7. #z::Send #+{Left}
   & {: u! ^/ _( l( t6 b
8. ;按下 Win + z 键会把当前窗口移动到另一屏幕上，需Win7以上。

复制代码

xuwen2288502

谢谢

xuwen2288502

谢谢