パスワードを忘れた? アカウント作成
15236742 journal
日記

route127の日記: AHK+Perlでツールチップ英和辞典

日記 by route127

文章中の分からない英単語を辞書引きするブラウザ拡張はありそうだが、今回必要になったのはAcrobatReaderでPDFを読んでる時だった。
ブラウザに切り替えてマウスをキーボードに手を移すのも煩わしいのでカーソル位置にツールチップで訳語が出るようにした。
autohotkeyのスクリプトは以下のような感じ。
①和訳の分からない英単語をマウスで選択する。
②Ctrl+F11を押下する。
③英単語がクリップボードにコピーされ、それを引数にeiwajish.plを実行する。
④eiwajish.plは与えられた引数でWeb辞書にアクセスし、結果をテキスト形式でクリップボードに保存する。
⑤クリップボードの内容をツールチップで1000ミリ秒表示する。
ツールチップの所は使いまわしだな。

^F11::
  oldClipboard = %Clipboard%
  Clipboard =
  Send, ^c
  RunWait, C:\hoge\perl\bin\perl c:\fuga\eiwajish.pl %Clipboard% ,,min
  ClipWait
  {
    Tooltip, %Clipboard%, A_CaretX, A_CaretY
    Sleep 1000
    Tooltip
  }
  Clipboard = %oldClipboard%
  return

当初スクレーパの出力をパイプ経由でクリップボードに送ろうとしたが上手くいかなかった。

  RunWait, C:\hoge\perl\bin\perl c:\fuga\eiwajish.pl %Clipboard% | clip ,, min

結局Win32::Clipboardを利用してスクレーパ側でクリップボードに結果を格納するようにした。

  RunWait, C:\hoge\perl\bin\perl c:\fuga\eiwajish.pl %Clipboard% ,, min

ツールチップ内での折り返し等課題はあるがひとまず形にはなった。

この議論は賞味期限が切れたので、アーカイブ化されています。 新たにコメントを付けることはできません。
typodupeerror

UNIXはシンプルである。必要なのはそのシンプルさを理解する素質だけである -- Dennis Ritchie

読み込み中...