AutoHotkey Community

feiyue

This method can automatically get the correct control: :dance: :beer: F1:: WordObj:=Word_Get("A") Word_Get(WinTitle="ahk_class OpusApp") { return Office_Get(WinTitle) } Ppt_Get(WinTitle="ahk_class PP12FrameClass") { return Office_Get(WinTitle) } Excel_Get(WinTitle="ahk_class XLMAIN") { return Office...

feiyue

Updated to 7.6 version - 2020/11/09 :dance: :beer: .... 1. Modify: The functions are packaged into the FindText class, ....... which can generate multiple objects, bind different windows, ....... and store different screenshots. However, this creates some incompatibility. ....... For example: MouseT...

feiyue

Sorry, GetTextFromScreen() has been changed to FindText_GetTextFromScreen() in the new version.
If you can't use this combination hotkey (^RButton),
It can be changed to a simple hotkey, such as F1.

feiyue

这是一个与360浏览器中的鼠标手势类似的功能，鼠标手势的轨迹可视化，也许有人需要。 :dance: :beer: ;------------------------------------ ; 简单可视化鼠标手势 v1.5 By FeiYue ;------------------------------------ #NoEnv #SingleInstance, force SetWinDelay -1 SetBatchLines, -1 CoordMode, Mouse CoordMode, ToolTip 生成画板() tip:= { 0 : 0 , "上" : "上翻页" , "下" ...

feiyue

If you use a continuation section larger than 16,383 characters,
an error message will appear: "Continuation section too long"

Code: Select all

fs=
(` %
...... too long > 16,383
)

It can be modified as follows:

Code: Select all

fs=
(` %
...... not too long < 16,383
)
fs=%fs%
(` %
...... not too long < 16,383
)

feiyue

@djuga You still haven't made it clear. You should publish some of your code.
You see, there is no problem using FileInstall here, Why can't you?
FileInstall, AutoHotkey.exe, %Ahk%

feiyue

djuga wrote: ↑
11 Oct 2020, 16:23
How to fileinstall? Continuation section too long

Your questions are puzzling. You should be more specific and put in the code so that others can help you.

feiyue

@JavierBO You can do this:

Code: Select all

#Include <FindText>

^RButton::
w:=10, h:=6
CoordMode, Mouse
MouseGetPos, x, y
KeyWait, RButton
s:=FindText_GetTextFromScreen(x-w, y-h, x+w, y+h)
Clipboard=if (ok:=FindText(0,0,150000,150000,0,0,"%s%"))
MsgBox, 4096,, Copy OK !, 0.5
return

feiyue

I don't mind.

feiyue

最近的版本会读取AutoHotkey.exe主程序的数据计算Hash值，用于源代码加密，
这样确实提高了破解难度，但是如果主程序被病毒修改，会导致源代码无法解密，
可能造成无法挽回的结果，所以我又放弃了这种绑定主程序数据的做法。

其实对于高手而言，再怎么加密都没用，对于菜鸟而言，这样加密已经够了。

feiyue

Error: Functions cannot contain functions.
eg:
a() {

b() {
}

; or #Include <FindText>

}

feiyue

@gandalfgarfield You can start the script with "Listlines, Off" ,
And don't use the "Listlines" command anywhere else in the script.

feiyue

目前，脚本加密会使用AHK主程序的数据，所以脚本和AHK主程序必须一起复制给其他人，或者将脚本编译成程序再复制给其他人使用，单独发布脚本是不可靠的。 :dance: :beer: At present, script encryption will use the data of AHK main program, so the script and AHK main program must be copied to other people together, or the script must be compiled into a program and then copied to...

feiyue

Please try the latest version. Recently, I fixed a small bug, but there is no updated version. This bug is about the virtual screen of the system, it may not start from (0,0), as in your case.. :beer: DllCall("BitBlt",Ptr,mDC,"int",x-zx,"int",y-zy,"int",w,"int",h , Ptr,hDC, "int",x, "int",y, "uint",...

feiyue

You just need to debug to find the problem.

Code: Select all

  x:=Round(x), y:=Round(y), w:=Round(Active_width)  h:=Round(Active_height)
  ; MsgBox, % w  ; Debug w --> w:=Round(Active_width), h:=Round(Active_height)

feiyue

I think the default comparison threshold is too large. You can set it smaller. I recommend that the range used to detect screen changes is as small as possible. #Include <FindText> WinGetPos, x, y, w, h, A pic1:=GetPicArr(x, y+50, w, h-50) Loop { Sleep, 500 WinGetPos, x, y, w, h, A pic2:=GetPicArr(x...

feiyue

Updated to 7.5 version - 2020/04/13 .... 2. Modify: in order to reduce the conflict of function names, ....... Use "FindText_" as the function prefix. However, this creates some incompatibility. ....... For example: MouseTip() must be changed to FindText_MouseTip() GetPicArr(x, y, w, h) { ListLines...

feiyue

更新到 v3.1 版本：

1、新增了 Thread() 函数，利用多线程的方式防止主程序的命名管道卡住。
2、更新了 OnlyOne() 函数，利用 CreateMutex 生成互斥体对象，更好地防止重复运行。

feiyue

Show your code for debug.

feiyue

You can use FindText_GetTextFromScreen(x1, y1, x2, y2)

Search found 260 matches

Re: Excel_Get

Re: FindText - Capture screen image into text and then find it Topic is solved

Re: FindText - Capture screen image into text and then find it Topic is solved

简单可视化鼠标手势 v1.5

Re: AHK源代码加密器 v3.1

Re: AHK源代码加密器 v3.1

Re: AHK源代码加密器 v3.1

Re: FindText - Capture screen image into text and then find it Topic is solved

Re: Disable all keyboard buttons

Re: AHK源代码加密器 v3.1

Re: FindText - Capture screen image into text and then find it Topic is solved

Re: AHK源代码加密器 v3.1

Re: AHK源代码加密器 v2.8

Re: FindText - Capture screen image into text and then find it Topic is solved

Re: FindText - Capture screen image into text and then find it Topic is solved

Re: FindText - Capture screen image into text and then find it Topic is solved

Re: FindText - Capture screen image into text and then find it Topic is solved

Re: AHK源代码加密器 v3.1

Re: AHK源代码加密器 v3.0

Re: FindText - Capture screen image into text and then find it Topic is solved