TA的每日心情 | 奋斗 2021-7-31 06:44 |
---|
签到天数: 5 天 [LV.2]偶尔看看I
|
本帖最后由 emptls 于 2022-8-7 16:53 编辑
6 y2 M! C( K* P) [5 n, s: g* e: V- [5 u: z
我就想要个双击取词的功能,常用软件是 firefox、SumatraPDF、notepad++
0 J8 i. b( w! P" G! j: @
, W# y4 i4 ^& |% c说说已经有的三种取词吧
) Y- \( z$ q& l8 t' u0 O1. 鼠标取词设置成双击取词,firefox、chrome 都取不准3 c" R" o! O* J' z7 e
2. 划词,你必须要划才行,双击选中在有的软件上,不生效
. ]6 H9 s. I' U# m3. 剪贴板取词或两次 Ctrl + C 取词,经常让正常的复制、粘贴功能失效+ K# |6 A0 v* d- S+ v
看起来选择多,没一个好用的。
; r/ j V" f/ I
$ R& D2 d$ a. Q& {" rfirefox 之前还无法取词,我把 Golden Dict 的双击取词脚本都反馈给客服了,态度倒是挺好。
0 v7 D* X# L" f p2 t( ^但研发没动静。AHK 脚本都能实现的功能,你们怎么就搞不了。! Z4 p8 N1 _' `1 p8 C
& P/ Y$ G1 G; ~9 [$ t, W: O这是我一直用的取词脚本,一个商业软件,这么多年了,居然还要依赖外部的脚本才能用,让人失望。
& ~" W# e1 h- ^! l1 Z& `- ; 弹出窗口还是欧路查词窗口显示结果,CtrlBreak 切换! l0 a/ K1 z$ v
- popup := true( S* ?1 v* v! K2 s, p
- ; suspend7 ?* \9 C3 }- V
- Pause::suspend/ O" H+ I/ K4 w( O" J6 [$ y) \6 K
- ^CtrlBreak::
- D* {3 v* z5 D4 R$ k& q4 I/ \ - popup := !popup, t' f) M! u. {3 j
- if (popup)+ ], f( |' |4 }/ f, [
- ToolTip, Popup mode ~* c: K3 I) f9 H
- else( H$ @3 G) P. D2 c, H
- ToolTip, Window mode- J2 W: g$ u/ \% g5 Q2 x
- SetTimer, RemoveToolTip, -2000
# q' X: f( V0 z/ r. _- C+ t - return6 [9 [% t9 _6 R, `1 { b
9 X0 \1 L. E( E! _% u! [- ~LButton::
3 J8 @* J6 [4 e) m% Z9 w$ U: T: {
G& j9 f" S5 c- Loop {
4 I: q C$ f# W6 a - LButtonDown := GetKeyState("LButton","P")
2 x$ e: i- g; w# P! a - If (!LButtonDown)
( [4 V$ a- }9 a, m - Break
% ~( q4 p8 }+ Y( H6 J, L - }& Q( {- {8 l3 a) o. U. D( T4 G; J
5 n" z5 Y8 j, q9 P/ {& s- WaitTime:=DllCall("GetDoubleClickTime")/400
8 p4 l: K, K# X" `' h - KeyWait, LButton, D T%WaitTime%) M& a& Y. x; y: h! }. h6 d& U
- If errorlevel=0% k/ U1 y5 B2 k$ g2 a
- GoSub, Routine8 t u0 M6 q+ k: _4 o0 G
- Return
* [. S3 P. x5 X( c( x+ M - ) ^" U5 B W3 C! Z
) X4 V: z" } F% `/ B- Routine:
( c1 A, g; ]5 x3 R6 Y - {
( K) p/ j! X5 s+ Q- d8 [; o# G8 A3 v - ; 暂时关闭,只对这些软件取词
! n) \5 {! `+ `3 d- S - ; if (!WinActive("ahk_class SUMATRA_PDF_FRAME") && !WinActive("ahk_class MozillaWindowClass") && !WinActive("ahk_exe msedge.exe")); L5 p- p( o5 Y! G) S
- ; return
% y8 S9 y" o0 Z) t - if (popup) {
" H: V$ f8 W [/ M - ; 设置欧路词典划词快捷键 Ctrl + F108 L! Y* \( O, x+ u* i
- send ,^{F10}
$ y% }2 |) Y9 ^ - return+ _) E: U4 I8 E: h P0 p; w9 w
- }$ b7 {8 t3 B1 d) Z: D
- 3 v6 h3 t' F }' y [
- ClipSaved := ClipboardAll* L& A- @+ j9 j( w* n
- k1 X) c* w$ |4 p- clipboard =6 C9 {: m6 m+ v) Q' Y
- send ,^c
) R) w7 C7 y/ O8 K# c, n, D% B - ClipWait,1
5 S- R& p6 M) d* r# n% v
* Z3 c5 D, y" J. a: |1 @" T- c- cliplen := StrLen(clipboard)9 _' [3 Y6 X& \8 w3 C* v+ m
- if (cliplen > 2 and cliplen < 20) {
; ? @1 m m! _1 X* k# q, ~ - run D:\soft\eudic\eudic.exe -w %clipboard%
& A: H- I6 \4 i - }
" ~3 t1 v3 _9 o! d. @1 O+ k
& k. [3 ]1 R7 _- clipboard =8 `9 b+ W& S, j, H4 G
- Clipboard := ClipSaved5 s. `& b8 L* e7 ~
- ClipWait,1
* l% k2 v6 U7 @: o+ n$ K - ClipSaved =9 {! ~( `7 ], t
- }- v6 [" E* P/ @. F# f/ f2 K5 z
- 6 @: U, y* V' V7 ?1 g9 L
- return) _! w6 V0 y' M& J
. C# c0 F z1 I& B- RemoveToolTip:
/ [* Z2 W4 V: j! E) g. b0 k - ToolTip* V( F- J1 N; k1 |- M- O
- return
复制代码 |
|