AutoHotkey スレッド part26

■ このスレッドは過去ログ倉庫に格納されています
2018/04/25(水) 18:08:09.39ID:LmrG+Efz0
!extend:on:vvvvv:1000:512
!extend:on:vvvvv:1000:512

■配布元
http://ahkscript.org/download/

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

■日本語解説等
AutoHotkey Wik
http://ahkwiki.net
AutoHotkeyを流行らせるページ(ミラー)
http://ahk.xrea.jp/ (不調時は http://hdd.s300.xrea.com/ahk/ )
AutoHotkeyJp(過去ログdatあり)
http://sites.google.com/site/autohotkeyjp/
Autohotkey日本語ヘルプ(chmファイル)
http://www6.atwiki.jp/eamat/
Autohotkey専用うpろだ
http://ux.getuploader.com/autohotkeyl/
簡易スクリプト掲示板
http://pastebin.com/

■派生版
IronAhk (.NET製、クロスプラットフォーム)
https://github.com/polyethene/IronAHK
AutoHotkey.dll (真のマルチスレッド対応など, AHKLの派生)
http://www.autohotkey.com/board/topic/39588-autohotkeydll/
VIPQ2_EXTDAT: default:vvvvv:1000:512:----: EXT was configured 👀
Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)
2018/06/12(火) 21:57:21.16ID:zqrDN+4l0
>>200
俺はSplashImageを画像無しで使ってる。
2018/06/12(火) 22:01:53.10ID:+E5cZsHs0
一応ToolTipでも

ToolTip, ツールチップを10秒間表示します。
sleep 10000
ToolTip
return

みたいにsleepを入れれば消えるまでの時間は調整できるよ
2018/06/12(火) 22:25:51.15ID:+yDiYOBA0
>>201
ありがとうございます。まだこちらのほうが文字が大きくていいですね。
>>202
スリープ入れたら長くできるんですね。でもスリープを入れるとその間スクリプトが止まるのが
なんか嫌でして。スクリプトの進行を止めずに文字を一定時間表示させたいという希望がありまして。
settimerとかいうのを設定すればそういうのができるのかな?わからないですが。

ありがとうございました。汚いながらとりあえずグリーン載ったって感じです。
2018/06/12(火) 22:45:48.29ID:BneWZD2B0
tooltipの代わりになるProgress
https://qiita.com/neokix/items/c38d0bfae93650e90e59
2018/06/12(火) 22:50:27.00ID:4hgE51+C0
>>203
ToolTipは消さなければずっと表示されるだろ
sleepなんて要らねえよ
まず使って試してから発言しろよ
2018/06/12(火) 23:11:09.23ID:+E5cZsHs0
>>203l
ToolTipの仕様から説明するのは面倒だから省略したけど、>>205の人が言うように別に表示時間を
伸ばすためにsleepを入れたわけじゃないよ
表示されっぱなしでいいなら特にスクリプトを止める要素も無い
2018/06/13(水) 02:00:44.69ID:kee9CeXG0
>>205
試してから言ったんだが。
謝れよ
2018/06/13(水) 02:16:04.10ID:WE+4cSWn0
>>207が勘違いで無礼な口をききまして誠に申し訳ございませんでした
2018/06/13(水) 02:16:27.04ID:kee9CeXG0
うちの環境だとToolTipだけだと表示なにもされない。
sleepいれた複数行だとはじめてツールチップが表示される。
なにこれ。なにが作用してんの。ツールチップちっちゃくて色薄いし身づらい〜

SplashTextOnでタイトルのみってシンプルでいいかなと思ったけど、表示位置変えられないっぽいのが
がっかり。
204のサンプルgif?が良さげなんで見てみます。ちょっとむずいのかな
2018/06/13(水) 03:24:33.08ID:ijaZStKH0
>>207
じゃあ実際に試したそのスクリプトを貼ってみろよ
本当に試していたら

>ToolTipって文字が小さいしすぐに消えるイメージがあって

こんなアホなことは絶対書かないし「イメージ」だけで喋らない
謝れよ
2018/06/13(水) 03:41:39.87ID:ijaZStKH0
どうせ常駐しないスクリプトで一瞬で終了して「すぐ消える」とか言ってるアホなんだろうな
2018/06/13(水) 09:02:55.61ID:kee9CeXG0
>>210

202だよ
あの時点のカキコミでは>>202をおれのやりたいスクリプトのなかにコピペしてやってた。
それを証明しろってか。アホ。

>こんなアホなことは絶対書かないし

探偵くんの絶対っていう決めつけですか?(笑)
イメージがあるっておれがちょこっと言っただけで
"絶対"イメージ"だけ"でやらずに書いたことにおまえの中では確定するんですね。素敵。

おまえこそ決めつけですぐ書き込んだことについてとにかくはやく謝れよ
アホ
2018/06/13(水) 09:50:19.13ID:gPo1rC530
あんまり関わりたくないが…

>>209
>うちの環境だとToolTipだけだと表示なにもされない。
>>202の4行スクリプトをsleep抜きで実行すれば当たり前

>SplashTextOnで 〜 表示位置変えられないっぽいのががっかり。
ToolTipに関しても言えるがネット上に日本語リファレンスあるんだから、ちゃんと読んだ上でそこにあるサンプルスクリプトも試せ
2018/06/13(水) 10:12:00.75ID:77WhG2kh0
Googleさんに質問をぶつける方が早いよね。
2018/06/13(水) 10:18:06.86ID:fhWlT+8OH
>>212
馬鹿に高度な要求をしてすみませんでした
あなたでも理解できるくらい低レベルな説明をするのはぼくには無理です
許してください
2018/06/13(水) 10:32:09.90ID:WE+4cSWn0
回答者にダメ出しするクズ質問者を最近各地でやたらと見かけるんだが流行りなのかね
2018/06/13(水) 10:54:40.84ID:kee9CeXG0
もう結構です。解決しましたので209とかにこれ以上回答しないでください。
210のアホは除いて。
>>212
許すもなにもだれだか知らんが悔しかったのか?しょうもない内容ない最後っ屁のレスしやがって。
二度と俺にレスするな
2018/06/13(水) 11:06:01.84ID:Hz7oGYjX0
>>212
~LButton::
ToolTip, 謝れよ
Return
2018/06/13(水) 11:16:45.49ID:fhWlT+8OH
>>217
悔しそうな最後っ屁レスのいい見本を見せていただきありがとうございます
これからは気をつけます
2018/06/13(水) 11:29:50.63ID:lZPXjxk30
久々に伸びてると思ったら…
>>218 見て和んだからよしとするか
AutoHotkeyスレ的にはこうあって欲しいな
2018/06/13(水) 12:29:15.56ID:WE+4cSWn0
NGEx Tooltip, 謝れよ君@AHK
対象タイトル [含む] [AutoHotkey]
NG Name [含む] [09]

こういう子はしれっと何度でも来やがるので二度とレスしないで済むようあぼ〜ん規則置いときますね
2018/06/13(水) 17:03:30.85ID:YzLKE9Rd0
アクティブウインドウ以外を最小化したいです。
WinMinimizeAllとWinRestoreでほぼいけるんですが、一瞬アクティブウインドウも最小化されるのが難点です。
なにかいい方法ありませんか?
2018/06/13(水) 17:09:56.55ID:H3aXWF370
Send, #{Home}
2018/06/13(水) 17:33:45.70ID:YzLKE9Rd0
そういやあったな
前試したとき使えなかったけど、Windows10 スナップ機能を無効にしてたのが原因だったみたいだわ
2018/06/13(水) 19:06:33.60ID:/1MllKIW0
FileReadLineで10行目を読み取って、ヒットした文字列をRegExMatchで検索する所まで来ました。
しかし指定行に書き加える所がわかりません。

FileReadLine, HAGE, HAGE.txt, 10
If (RegExMatch(HAGE,"FUSA"))
{
---指定行に書き加えるこの部分がわかりません---- StringReplace?
FileDelete, HAGE.txt
FileAppend, %FUSA%, HAGE.txt
}
2018/06/14(木) 00:20:21.09ID:Z2OsG3OR0
もう何年もバージョンアップしてなかったと思ったら
仕様変え過ぎだろ
2018/06/14(木) 01:24:39.75ID:PHfD01XQ0
>>226
>もう何年もバージョンアップしてなかった

いやそんなこと無いだろ
お前が情弱なだけで
2018/06/14(木) 08:01:25.30ID:xpUFTmrw0
vk sc 以外に何か大きな変更ってあった?
2018/06/14(木) 10:45:44.95ID:kRIw/nNl0
便利そうなオカン

henkan_group_winchanger()
{
 IfWinActive,ahk_exe calc.exe
 {
  IfWinExist, ahk_exe notepad.exe
   WinActivate
  return
 }

 IfWinActive,ahk_exe notepad.exe
 {
  IfWinExist, ahk_exe wmplayer.exe
   WinActivate
  return
 }
 
 IfWinActive,ahk_exe wmplayer.exe
 {
  IfWinExist, ahk_exe calc.exe
   WinActivate
  return
 }
}

; 関連ありそうなアプリ間でのみウィンドウを切り替える
sc79 & tab:: henkan_group_winchanger()
2018/06/14(木) 11:08:57.90ID:YPXm0M8Y0
GroupAdd & GroupActivate でよくね?
2018/06/15(金) 00:01:26.94ID:H2S0dOu+H
アプデするたびになにかしら問題でるのはなんなの
2018/06/15(金) 00:08:24.69ID:qL05x0j60
じゃあアプデしなければ良いのでは?
2018/06/15(金) 15:46:40.65ID:TM0zxQ290
v1.1.24.01安定
2018/06/16(土) 15:55:40.54ID:G06nkSYx0
最近ネタ切れ気味なので、
みなさんのおすすめのネタ、小ネタ、関数、スクリプト、連携ツールなどの投下待ってます!^^

■用途
.     メイン│キー割り当て変更…タップ/複数タップ/長押し
ホットキーランチャー│プログラム起動…メーラー/ブラウザ/エディタ
    自動化│キーボード操作
.        │マウス操作
 選択文字列│WEB検索…ウェブ/画像/動画/Wiki/2ch/地図/翻訳
.        │FILE検索 ※Everythingと連携
.        │プログラム起動…関連付け/エディタ/ファイラー
.        │置換…環境変数/レジストリ/日付表記/年表記/3桁ごとにコンマ
.        │修飾
.        │変換…文字種/URLエンデコ/進数
.        │計算
.  ウィンドウ│タスク切替
.        │移動/リサイズ
.        │最前面化
.        │全面化
.        │どこでもドラッグ
.        │シェード
.        │タイトルバー非表示
.        │メニューバー非表示
.    マウス│マウスジェスチャー[MouseGestureL.ahk]
.        │ホイールリダイレクト ※Win10デフォ
.        │カーソル非表示
.     取得│コマンドID(wParam)
.        │カラーピッカー(RGB)
2018/06/16(土) 15:56:33.90ID:G06nkSYx0
.   タイマー│IME
.        │自動クリック
.        │最前面化
.        │プログラム…起動/終了
.        │優先度変更…アクティブ時/非アクティブ時
    その他│クリップボード拡張[Clipboard History]
.        │サウンド…音量調整/ミュート/デバイス切替

■関数
ΘIME.ahk…IME制御用 関数群 ttp://www6.atwiki.jp/eamat/pages/17.html
ΘSwitchTask.ahk…タスク切替 ttp://blog.livedoor.jp/user5/archives/44475387.html
ΘTray_Refresh()…タスクトレイリフレッシュ ttp://autohotkey.com/boards/viewtopic.php?t=19832#p95533
ΘUrlEncode()…URLエンコード(Shift_JIS/UTF-8) ttp://hibari.5ch.net/test/read.cgi/software/1280482227/235

■スクリプト
□常駐
ΘClipboard History…クリップボード拡張 ttp://www.vector.co.jp/soft/winnt/util/se512783.html
ΘMouseGestureL.ahk…マウスジェスチャー ttp://www.vector.co.jp/soft/winnt/util/se498500.html
ΘWheelScroll.ahk…ホイールリダイレクト ttp://www6.atwiki.jp/eamat/pages/30.html
Θカーソル非表示 ttp://anago.2ch.net/test/read.cgi/software/1398655195/807
Θどこでもドラッグ ttp://autohotkey.com/board/topic/25106-altlbutton-window-dragging/#entry256906

□非常駐
ΘコマンドID(wParam)取得 ttp://autohotkey.com/board/topic/19754-get-info-from-context-menu/#entry130297

■連携ツール
ΘApp=Device…サウンドデバイス切替 ttp://www.vector.co.jp/soft/winnt/art/se486862.html
ΘEverything…ファイル検索 ttp://www.voidtools.com/
ΘTablacus Script Control 64…計算 ※64bitOS ttp://www.eonet.ne.jp/~gakana/tablacus/scriptcontrol.html
Θue…WEB検索 ttp://www.axfc.net/u/3902154
Θue2clip…URLエンコード ttp://www.axfc.net/u/3902154
2018/06/17(日) 02:49:17.37ID:LEHoSucJ0
乙。
一覧になってみると、特別な事はしてないなと再確認。
どれも上記の組合せに過ぎないとゆーか、連係するソフトウェアの理解度が重要だったり。
2018/06/17(日) 08:06:16.82ID:YAxRdcxB0
小ネタ
ΘPrintScreenキーで情報取得 ttp://pastebin.com/c5dJTcFG
Θタイトルバー上アクション ttp://pastebin.com/4ZHJVHTV
  Shift+左…シェード
 左ダブル…ポップアップメニュー(menuHackerモドキ)

未完のおま環オナニースクリプトのため、ご興味のある方のみどうぞ!^^
2018/06/18(月) 15:11:26.39ID:esoE5FB60
タブ単位ではなくてブラウザ単位でミュート/解除する.ahkファイルなどありませんか?

https://gist.github.com/Trellmor/6548709
でそれらしいのをみつけたのですが、どこにミュートさせたいブラウザを指定するのかわかりません。
最初^!Mを一度押すとボリュームミキサーがでてくるようですが、2回目同じキーを押してもボリュームミキサー出てきません
クリックでミュートするのではなくランチャーなどに.ahkファイルを登録させてそれの起動ですぐブラウザ単位のミュートがしたいです。
2018/06/18(月) 16:43:17.63ID:+42gcIGk0
こないだの謝れよ君か

また暴れられると面倒だから答えは書かないけど修正3ケ所で行けたわ
なかなか便利なスクリプトやな
2018/06/18(月) 16:48:32.62ID:esoE5FB60
>>239
なんでわかるの
2018/06/18(月) 16:51:57.87ID:AKI8Z7dt0
いつもお前を見ているぞ


   <◎>  <◎>

 
2018/06/18(月) 18:58:13.38ID:81hwV4880
>>238さんの使い方なら
Θ7行目を変更「VolumeMixer = 音量ミキサー」
Θ15行目に追記
 Sleipnirなら「MuteApps("Sleipnir")」
 Chromeなら「MuteApps("Chrome")」
 など
で、大丈夫だと思います^^
2018/06/18(月) 19:04:41.30ID:81hwV4880
すいません追加で
Θファイル末に追記「ExitApp」
2018/06/18(月) 19:06:07.93ID:cw6YxUPa0
>>242-243
空気読めよ
2018/06/18(月) 20:20:35.98ID:81hwV4880
Θ15行目を「MuteApps(A_Args[1])」
でファイルを作成し、ランチャーなどで下記コマンド実行の方がいいかも^^

Θコマンド
 Sleipnirなら「hoge.ahk "Sleipnir"」
 Chromeなら「hoge.ahk "Chrome"」
 など
2018/06/18(月) 20:35:02.11ID:3UPizNgs0
>>245
んなこと誰も聞いてない
2018/06/18(月) 20:48:26.20ID:esoE5FB60
>>242
おしえてくださってありがとうございました。
助かりました。
わたしに教えてはいけないというノリにしたいヤカラがいるので反発がありますね ^ ^
2018/06/18(月) 21:04:04.08ID:+n8z2HMA0
教えて君五大要素
1. 読まない
2. 調べない
3. 試さない
4. 理解力が足りない
5. 人を利用することしか頭にない
2018/06/18(月) 21:36:47.91ID:/Bs4ggs+M
ワッチョイ 3e91-m0US
>234 も大概うざいと思ってたがこれは酷い
己の承認要求満たすことが最重要なタイプか
2018/06/18(月) 21:47:21.51ID:E7KH139L0
>>249
スルーできずにレス付けちゃうお前も同類だぞ
2018/06/19(火) 00:03:00.21ID:5mFe2tNK0
3e91-m0US は黙認したらダメなタイプ
スルー対象は 謝れよ君のほう
2018/06/19(火) 00:16:49.96ID:q0WAzgGW0
承認欲求はレスされることで満たされるんだから黙ってあぼーんしとけばいい
2018/06/19(火) 00:52:17.09ID:OxIVLmPa0
タスクトレイ右にあるソフトウェアを右クリックしてそのメニューの上から二番目をクリックする、
といった動作をAutohotkeyですることはできるんでしょうか?
昔そういう単機能のソフトウェアがあったように思うのですが忘れてしまいました。
>>251 地獄に落ちろ
2018/06/19(火) 01:19:12.88ID:zvqTkEbA0
>>253
TrayCommand
http://hp.vector.co.jp/authors/VA026310/soft2.htm

ソフトはこれでしょ
2018/06/19(火) 01:29:58.37ID:/YJKKxwR0
>>254
空気読めよ
2018/06/19(火) 02:00:08.76ID:m0Y+Gbe+0
>>253
http://pastebin.com/9YEj7wg6
2018/06/19(火) 13:55:13.23ID:0cmVsDTa0
SoundBeep有能

SoundBeep,400,25 ; 何かが無効になったときに鳴らす
SoundBeep,1000,25 ; 何かが有効になったときに鳴らす

とりあえずIME ON/OFFやその他に組み込んでみたが安心感が増す
人前ではうるさくて使えないだろうが

これのLEDバージョン作ってみたいがプログラマブルUSB LEDって2万とかするんだな…
300円位でないのか
2018/06/19(火) 14:06:01.56ID:8FWyy9TaH
Arduinoで作れんじゃね?
3000円ぐらいはかかりそうだけど
2018/06/19(火) 17:10:38.43ID:42EnPnsg0
ラズパイは?
260名無しさん@お腹いっぱい。 (ワッチョイ 31b2-/RsH)
垢版 |
2018/06/20(水) 07:37:19.98ID:ha/OsVg60
IE11でボタンをクリックした後、反応の有無を判断できる方法はありますか?
クリック→無反応→クリック…roop
クリック→反応有→roop break
想定している似たような状況は、ビジー状態の通販サイトの「商品カゴへ入れる」ボタンを成功するまでクリックする。

OS:Windows10(1803) Pro 64bit
AutoHotkey(x64) 1.1.29.01
2018/06/20(水) 12:08:36.98ID:W9QYsAxV0
>>260
クリックに成功した場合ボタンの表示が変わる、もしくは何かの表示が出るのならImageSearchで行けるんじゃないかね
262260 (ワッチョイ 31b2-/RsH)
垢版 |
2018/06/20(水) 16:07:09.18ID:ha/OsVg60
>>261
レスありがとうございます。
表示は変わりませんが、特徴的な音が出ます。
表示の変化に関して指摘して頂いたので、Sound関係の変化に関してコマンドを探してみましたが、使えそうなのがないです。
2018/06/20(水) 16:45:56.19ID:K//20RcR0
判断する方法ではないけど
ボタンを押してから離すまでの時間を長くすれば反応するようになるのでは?
SendならSetkeydelayで
Setkeydelay,100,200

もしくは
send,{left down}
sleep,200
send,{left up}

clickなら
click,left,down
sleep,200
click,left,up
264260 (ワッチョイ 31b2-/RsH)
垢版 |
2018/06/20(水) 17:37:47.93ID:ha/OsVg60
>>263
レスありがとうございます。
試してみます。
ただ、ビジー状態に対応できるスクリプトを組みたいので、サイトがビジー状態でないと試せません。
報告は早くて数日後になります。
2018/06/21(木) 04:48:21.38ID:AY8E+xgd0
>>264
人気商品は確定するまでカゴ入れ状態になかなかならないからやり続けるて意味だよね?
ビジー状態の意味がブラウザが固まるような表現になってるし
266260 (ワッチョイ 1fb2-E6HK)
垢版 |
2018/06/21(木) 13:46:05.91ID:uo6bOHK00
>>265
いえ、ブラウザは固まってる状態です。
その状態で酷い時は、数秒に一度、一瞬クリックできる状態になる時があって、その隙にクリックしたいのです。
2018/06/21(木) 15:01:33.74ID:VVK4xcOd0
ポップアップメニューを表示して戻り値にキーを返す関数
https://paste.ofcode.org/cpAPU8WT64bJd4WWJCiPS4

testcode()
{
menu=
(
ファイル(&F)
編集(&E)
検索(&S)

終了
)
ret := ShowPopupMenu(menu)
if ret=F
msgbox,ファイル処理
if ret=E
msgbox,編集処理
if ret=S
msgbox,検索処理
if ret=5 ; &がない場合は数値で返す
msgbox,終了処理
if ret=
msgbox,キャンセルされた
}
2018/06/21(木) 16:23:27.41ID:5cOpvXIJ0
>>264
詳しくないけどIEにぶん投げて、ComObjCreate("InternetExplorer.Application")から.ReadyStateでページ表示の完了状態を調べるとかは?
無理にahkでやる案件でもないような気がするけど
2018/06/22(金) 14:32:53.34ID:ugMFpfsi0
ControlGet SysListView321を使って、値を取得することは出来ます。
逆に、SysListView321に値をセットすることは出来ませんか。 ゲットした値の一部を変更したいのですが
270260 (ワッチョイ 1fb2-E6HK)
垢版 |
2018/06/22(金) 21:12:40.61ID:PUo1zf840
>>268
確かにIEの操作はAHKでやるより、IEから直接の方が確実なような気がしますね…。

>>263
少しスリープの時間を長めにしましたが、軽いビジー状態なら結構いけますね。
正直、長押しでいけるとは思ってもいませんでしたからびっくりしました。

とりあえず、長押しでしのいで、将来的にはVBAでIEを直接操作する方向で考えたいと思います。
予定していた方法とは異なりますが、そこそこどうにかなりそうなので、これで締め切らせて頂きます。
皆さんありがとうございました(o*。_。)oペコッ
2018/06/23(土) 07:17:36.20ID:0OH7ylO90
ヒアドキュメントがあまりにも見づらいのでクラスにしてみた
m.Add("ファイル(&F)")

m.Add,ファイル(&F)
とは書けないのな

http://textuploader.com/dzt72

testcode2()
{
m:=new PopupMenu()
m.Add("ファイル(&F)")
m.Add("編集(&E)")
m.Add("検索(&S)")
m.Add()
m.Add("終了")
ret := m.Show()
msgbox,% "ret=" ret
}
2018/06/23(土) 22:27:36.89ID:Ztr4TmAR0
>>271
>>1に「Autohotkey専用うpろだ」紹介されてるんだから、以降そっちでやってね
2018/06/24(日) 01:05:16.40ID:gl6IIcaZ0
ちなみにAHK v2のMenuはまさにそんな感じ
https://lexikos.github.io/v2/docs/objects/Menu.htm
2018/06/27(水) 17:27:43.88ID:hg8rqnbu0
iniwriteの時に書き込む値にカンマがあった場合はどうすればいいのでしょうか?
2018/06/27(水) 17:32:41.64ID:0iRb2wcH0
エスケープするor変数に入れる
2018/06/27(水) 18:25:58.86ID:hg8rqnbu0
hensuu = 111,aaa,222,bbb
iniwrite, %hensuu%, test.ini, test, test

iniwrite, 111`,aaa`,222`,bbb, test.ini, test, test

こんな事が出来るなんて知りませんでした。
どちらでもできました、ありがとうございます。
2018/07/02(月) 03:06:06.99ID:g0LGh7eu0
ATOKの日付変換が便利なんだけど、使いたいフォーマットがない。
例えば "yyyy_mmdd" とか。
now対象だけならahkで作れそうなきがするけど、ATOKみたく「あした」「あさって」とか
「げつようび」とかで、前後の日をサポートするとなると大変そう。
こんな日付変換に対応したものってありますか?
2018/07/02(月) 08:08:57.58ID:obbanbrL0
別のスクリプト同士で変数をやり取りする方法はありませんか?

情報をやり取りするためのファイルに書き込んでおき、
別のスクリプトで読み込むしかないでしょうか?
2018/07/02(月) 10:28:37.55ID:2sJUYxCT0
>>277
http://ahkwiki.net/EnvAdd

::nitiyoubi::
SUNDAY=1
send,% DateCalc(SUNDAY-A_WDay,"yyyy-MMdd")
return

DateCalc(offset,format) {
TimeStamp := A_Now
TimeStamp += %offset%, Days
FormatTime,TimeStamp,%TimeStamp%,%format%
return TimeStamp
}

>>278
http://ahkwiki.net/OnMessage()
2018/07/02(月) 12:22:32.02ID:obbanbrL0
>>279
サンクスコ助かりました
2018/07/02(月) 13:08:15.58ID:YBwm2/8CH
>>279
わぁ、作っていただけるなんて。
ありがとうございます。
これを元にメニュー化してみます。
2018/07/07(土) 02:08:28.79ID:qwGCuEP30
GUIで使われるデフォルトのフォントはコレであっていますか?
分かる人いたらお願いします。

OS日本語 MS UI Gothic (win7で確認、win10も同じ?)
OS英語 MS Sans Serif?
2018/07/07(土) 08:53:40.58ID:OoZZ3/qe00707
>>282
ググればわかることだが両方違う

win7はメイリオ、win10は遊ゴシック系
http://www.atmarkit.co.jp/ait/spv/1702/01/news038.html
英語版OSは Segoe UI
https://ja.m.wikipedia.org/wiki/Segoe
2018/07/07(土) 09:50:28.34ID:qwGCuEP300707
>>283
言葉足らずでした、AHKのGUIコマンドの話です
原文のリファレンスを読むとデフォルトはGetStockObjectのDEFAULT_GUI_FONTの事だとは思うのですが
他環境のフォント情報がなかなか見つからず質問した次第です

> Omit the last two parameters to restore the font to the system's default GUI typeface, size, and color.

Gui, Font,, メイリオ
Gui, Add, Text,, あいうえおABCDEabcde (メイリオ)
Gui, Font,, MS UI Gothic
Gui, Add, Text,, あいうえおABCDEabcde (MS UI Gothic)

A_GuiFont := GuiDefaultFont()
A_GuiFontSize := A_LastError

Gui, Font
Gui, Add, Text,, %A_GuiFont%`t%A_GuiFontSize% (デフォルト)
Gui Show
Return

GuiDefaultFont() { ; By SKAN www.autohotkey.com/forum/viewtopic.php?p=465438#465438
hFont := DllCall( "GetStockObject", UInt,17 ) ; DEFAULT_GUI_FONT
VarSetCapacity( LF, szLF := 60*( A_IsUnicode ? 2:1 ) )
DllCall("GetObject", UInt,hFont, Int,szLF, UInt,&LF )
hDC := DllCall( "GetDC", UInt,hwnd ), DPI := DllCall( "GetDeviceCaps", UInt,hDC, Int,90 )
DllCall( "ReleaseDC", Int,0, UInt,hDC ), S := Round( ( -NumGet( LF,0,"Int" )*72 ) / DPI )
Return DllCall( "MulDiv",Int,&LF+28, Int,1,Int,1, Str ), DllCall( "SetLastError", UInt,S )
}
2018/07/07(土) 11:20:45.04ID:OoZZ3/qe00707
失礼
win10も MS UI Gothic だったよ
2018/07/08(日) 18:55:55.14ID:jnfyQm1X0
ありがとうございました

他のフォント情報も見つけることができました
https://msdn.microsoft.com/ja-jp/library/system.drawing.systemfonts.defaultfont(v=vs.110).aspx
2018/07/14(土) 00:28:43.55ID:c9o5o3bi0
「コントロール+クリック」を「無変換+クリック」に割り当てられるといいんだけどな@あ
2018/07/14(土) 00:33:52.87ID:wrBaH4zb0
割り当てられますけど
2018/07/14(土) 07:29:02.66ID:TH1SIGBe0
>>287
失敗した書き方はどんな感じ?
290名無しさん@お腹いっぱい。 (ワッチョイ ea67-LQig)
垢版 |
2018/07/15(日) 09:50:14.97ID:bqpX/mGQ0
関数内でループをさせて、そのループのA_indexを使ったことをさせたいんですが、A_indexを使ったことというのを関数内で何度も使うのでその記述を簡略化したいんですが
どうすればいいですかね?やりたことは下記のようなことなんですが、labelとgosubで動くものなのかがよくわからないでいます

test()
{
loop,10
{

label:
tooltip,%A_index%
return

gosub,label
sleep,500
gosub,label
sleep,500
gosub,label
sleep,500
}
return
}
2018/07/15(日) 20:19:37.01ID:we5y7DJBM
関数内でもラベルは使えるけどサブルーチンは無理
そのコードだとtooltipの下のreturnで関数ごと抜けてしまうよ
2018/07/15(日) 21:19:24.01ID:p+q5mhPf0
>>290
サブルーチン部分をloop外に出せば動くとは思うが、正直何をしたいかよく分からん
同じA_indexで同じ処理を3回してるから、その部分をloopで回せば簡略化できると思うが…

test() {
loop,10 {
count := A_index
loop,3 {
gosub,label
sleep,500
}

}
return

label:
tooltip,%count%
return
}

長いので次レスで
2018/07/15(日) 21:19:59.91ID:p+q5mhPf0
続き

それとも、こんなことか?

test() {
loop,10 {
gosub, label1
gosub, label2
gosub, label3
}
return

label1:
tooltip,%A_index%
sleep,500
tooltip,
return
label2:
MsgBox,%A_index%
sleep,500
return
label3:
Clipboard := A_index
MsgBox,Clipboard は %Clipboard%
sleep,500
return
}

以上、かなり適当
2018/07/15(日) 21:21:21.92ID:p+q5mhPf0
>>293
かなり見づらくてスンマソン
2018/07/18(水) 16:42:54.30ID:trYB5odT0
290 ですが返事がおそくなってすみません。
結局loopでlabel部分をループさせました。ありがとうございました。
2018/07/20(金) 14:55:17.40ID:2RsjRDqU0
win7から10へマシン変えようか考えてますが
ahkスクリプトは相当書き換える必要あるのでしょうか? 今あらゆる作業でずいぶん頼ってるのでそこが悩みどころでして
2018/07/20(金) 15:09:10.38ID:wv55im470
>>296
もしWin7のUAC設定を一番下にしてオフにしてるならばWin10に移行後にUAC絡みで気を付ける必要があるかも
Win7ではUAC一番下にするだけでほぼ機能しなくなるけどWin10では一番下にしても完全にはオフにならないので
必要に応じてスクリプトを管理者権限で実行したり、標準権限で実行したりを気を付けなきゃならない
元からWin7でUACオンにして使ってるなら特に使い勝手は変わらないと思う
2018/07/20(金) 16:04:35.24ID:2RsjRDqU0
>>297
ありがとうございました!ユーザーアカウントというあたりは元々ぜんぜんいじってないです。
スクリプトそのまま移行して使い続けられそうでホッとしてます
2018/07/20(金) 16:20:15.17ID:IY43ug2o0
>>296
自分はahk以外にもWSHやAutoItも使ってるので参考になるか分からないが…

スクリプトでレジストリにアクセスしようとしてもブロックされまともに動かなかったので、
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System]
の"EnableLUA"=dword:00000001 → "EnableLUA"=dword:00000000
にしてUACを無効化した

自分はwin7 32bitからwin10 64bitにしたけど、特に大掛かりなスクリプトの書き換えはしなかったような気がするが、
win7時代に動いていたスクリプトがwin10で動かなくなったのはあったな
このスレにあったヤツだったか忘れたが、ウインドウに穴開けてデスクトップを見るスクリプトだった
他人作だし使う機会も少なかったのでもう使用はしていない…
2018/07/20(金) 20:57:51.00ID:GOaXWtHw0
無理矢理UAC完全無効化はストアアプリに不具合出るしMS的にはストアアプリ推しだから
将来的に大きなトラブルになる可能性もある
2018/07/20(金) 21:09:21.49ID:9LPAAB/e0
UAC無効化しなくてもUI Access有効化でよくない?
■ このスレッドは過去ログ倉庫に格納されています
16歳の水野カイトが封印の刀を見つけ、時間が裂けて黒い風と亡霊の侍が現れ、霊の時雨と契約して呪われた刀の継承者となる場面

ニューススポーツなんでも実況