AutoHotkey スレッド part30

2022/02/07(月) 21:22:19.36

!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512
↑スレ立てする時は3行にして下さい

■配布元
https://autohotkey.com/download/

■前スレ
AutoHotkey スレッド part29
https://egg.5ch.net/test/read.cgi/software/1620768466/

■日本語解説等
AutoHotkey Wiki
http://ahkwiki.net
AutoHotkeyを流行らせるページ(ミラー)
http://hdd.s300.xrea.com/ahk/
AutoHotkeyJp(過去ログdatあり)
https://sites.google.com/site/autohotkeyjp/
Autohotkey日本語ヘルプ(chmファイル）
https://www6.atwiki.jp/eamat/

■スクリプト投稿
Autohotkey専用うpろだ
https://ux.getuploader.com/autohotkeyl/
簡易スクリプト掲示板
https://pastebin.com/

■その他のテンプレ（5chのURL規制が厳しいのでpastebinに退避しました）
https://pastebin.com/raw/bWipuNmt

次スレは>>950が建てましょう。建てられなかったらレス番指定して頼みましょう

VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured

2022/02/09(水) 11:34:01.53

>>1乙
あげ

2022/02/10(木) 00:00:08.50

スレが2つある。どうすれば

2022/02/10(木) 00:21:50.73

wikiにある左手カーソル移動を15年前に知りたかった。。。。。。
sc07B & I::Send, {Blind}{Up}
sc07B & K::Send, {Blind}{Down}
sc07B & J::Send, {Blind}{Left}
sc07B & L::Send, {Blind}{Right}

2022/02/10(木) 00:46:01.55

>>3
5ch運営も重複認めてるから好きなの使えばいい
俺はこっち使うわ

2022/02/10(木) 01:17:00.94

sc79(変換)＋A-Z0-9も活用しろよ

2022/02/10(木) 17:40:02.60

D&Dしか受け付けないソフトにファイル送るための方法探していて行き着いたんですが、動きません。
関数のパラメーター指定が解っていないのかもしれないですが、アドバイス頂きたいです。

Run, notepad,,
Sleep, 1000
DropFiles(ahk_class EmEditorMainFrame3, "D:\_mov\疑惑.mp4", ptX=100, ptY=100, fNC=False)
ExitApp

以下関数本体
DropFiles(hwnd, files, ptX=0, ptY=0, fNC=False) {

https://p.ahkscript.org/?p=912e4b6a

2022/02/10(木) 20:36:48.36

最終的にドロップしたいアプリ先はなに？
EmEditorがドロップしか受け付けないということはないのでとりあえずのお試しなんたろうけど
動作を見たいだけならサンプルの通りまずはメモ帳で確認してみては

2022/02/10(木) 20:50:20.05

>>7
>DropFiles(hwnd, ～ ) {
・・・
PostMessage, WM_DROPFILES := 0x233, hDrop , 0, , ahk_id %hwnd%
}
関数へ渡す引数はウインドウハンドル(hwnd)じゃないとだめのような…
なのに ahk_class EmEditorMainFrame3 とか違うのを渡してるからじゃないかな

2022/02/10(木) 23:37:28.10

^g::
^c　;①
#Down　;②
sleep, 500　;③
Run, "C:\Program Files\xxx\xxx.exe" %clipboard%　;④
return

ctrl+g でテキストをコピーした後、コピー元のウィンドウを最小化して
クリップボードの文字列をプログラムxxxに渡して起動したいんですが

①、③、④はそれぞれ単独だと動くけど、一緒にすると動きません
②は何も反応しません
どうしたら良いでしょうか

2022/02/10(木) 23:42:23.78

>>10
Send使えよ

2022/02/10(木) 23:49:00.76

ありがとうございます
動きました

10 (ｱｳｱｳｱｰ Sa4f-Bi1Y) · 2022/02/11(金) 09:31:28.70

>>10
④だけだと実行されるプログラムは最前面に表示されるしアクティブになってるけど
他と組み合わせると最背面に表示されてアクティブになりません
この違いは何が原因ですか

2022/02/11(金) 09:44:57.35

Runしただけではアクティブ化は保証されない
その時々の処理待ち時間や同時に動いてるタスクの有無で挙動が変わるので
理由を探してもしょうがないよ
確実にアクティブ化したいなら相応の処理を足したらいい
https://egg.5ch.net/test/read.cgi/software/1620768466/873

10 (ｱｳｱｳｱｰ Sa4f-Bi1Y) · 2022/02/11(金) 10:19:48.35

>>14
ありがとうございます

2022/02/11(金) 14:38:25.56

サンプルコード見せただけで発狂するキチガイ消えて良かったね

2022/02/11(金) 14:54:56.57

>>8
>>9
ありがとうございます
ドロップ先は動画カッターというソフトです。

うわー恥ずかしいpastbinには隠して書いたのに検証中のコード入っちゃいました...
色々試すもまだうまく動きません。

ウィンドウハンドル部分を””で囲む、ahk_id入れる、0x0000の0x取る、をやってもダメでした。
念の為ウィンドウアクティブにしてます。

WinGet, hwnd, ID, ahk_class (notopadを指定)
WinActivate, ahk_class (notopadを指定)
Sleep, 1000
DropFiles(%hwnd%, "D:\test.txt", ptX=100,ptY=100, fNC=False)
ExitApp

2022/02/11(金) 15:12:24.10

>>8
実はffmpegでカットするべくがんばったのですが「時間を変更するとリアルタイムでコマンドライン部分のテキストを書き換える」動作が上手く行かず断念していました。もうソフトに投げればいいやと。
あと00:00:00 / 00:00:00のテキストトリミングが分からず1時間以下の動画は数値変更に反映できないというお粗末な理由でも断念しました...
https://i.imgur.com/Y7dzMca.png

q::
Run, %A_ScriptDir%\_tool\movie_cutter.ahk
ControlGetText, var_winctr_get_text_in, Static2, A
StringTrimRight, var_trim_text_out, var_winctr_get_text_in, 11
Sleep, 50
ControlSend, Edit1, %var_trim_text_out%, 動画カッター
WinActivate, ahk_class MediaPlayerClassicW
Return

2022/02/11(金) 15:51:39.41

>>17
DropFiles の引数 hwnd は %% で括る必要は無いよ
あとはドロップ対象のプログラムが管理者権限で動いていて、AHK側が非管理者の場合も上手くいかないと思う

2022/02/11(金) 16:02:26.35

>>17
関数のパラメータに%%は要らない
あとドロップは背面でもいけるのでアクティブにしなくてもいい
WinGet, hwnd, ID, ahk_class Notepad
DropFiles(hwnd, "D:\test.txt")

アプリ起動からやるならsleepじゃなくて>14同様pid指定したほうがいい
Run,notepad,,,pid
WinWait,ahk_pid %pid%
DropFiles(WinExist("ahk_pid " pid), "D:\test.txt")

2022/02/11(金) 16:16:31.60

>>17-18
やりたいことはahkを使って何かをしたいわけじゃなく、
動画編集ソフトに動画ファイルを送る(渡す)→動画を無劣化カット
なんだとしたら Avidemux 使っとけば？
Avidemux.exe ほげ.mp4
で普通にほげ.mp4 を編集できる状態で起動できるぞ

10 (ｱｳｱｳｱｰ Sa6e-GONP) · 2022/02/12(土) 18:58:53.65

Esc::
Keywait, Esc, U
Keywait, Esc, D, T0.2
If (ErrorLevel=1)
{
Send,{Esc}
}
else
{
Send, WinMinimizeAll
}
return

esc2回でボスが来たボタンにしようと思ったのですが動きません
どこを直したら良いですか