エディタの文字の大きさ変更No.18272
Takahito さん 04/05/27 13:31
 
こんにちは。

表題の通り、質問させて下さい。
OutLookの様に Ctrl + ホイール操作 で文字のサイズ変更ができるようにした
いのですが、何か方法ありますでしょうか?

上記操作が絶対ではなく、いちいち設定画面を開いてエディタの設定を変える
という手順を無くしたいのですが…。
マクロとかでも可能なのでしょうか?

どなたかご存じでしたらお教え頂けると助かります。
よろしくお願いいたします。

[ ]
RE:18272 エディタの文字の大きさ変更No.18275
秀まるお2 さん 04/05/27 15:58
 
 Ctrl+ホイール操作でのフォントサイズ変更には対応していません。

 マクロを使えばそれ風の動作は可能ですが、どうでしょ?

 以下、サンプルマクロです。

    loaddll "tkinfo.dll";
Loop:
    menu "文字拡大", "文字縮小";
    #result = result;
    if( #result == 0 ) {
        endmacro;
    }
    openreg "CURRENTUSER"
          , "Software\\Hidemaruo\\TuruKame\\Config\\View";
    #size = getregnum( "FontPoint" ) * 10 + getregnum( "FontDecimal" );
    if( #result == 1 ) {
        #size = #size + #size / 10;
    } else {
        #size = #size - #size / 10;
    }
    writeregnum "FontPoint", #size / 10;
    writeregnum "FontDecimal", #size % 10;
    closereg;
    openreg "CURRENTUSER"
          , "Software\\Hidemaruo\\TuruKame\\Config\\Edit";
    writeregnum "FontPoint", #size / 10;
    writeregnum "FontDecimal", #size % 10;
    closereg;
    #n = dllfunc("EnvChanged");
    goto Loop;

[ ]
RE:18275 エディタの文字の大きさ変更No.18276
Takahito さん 04/05/27 16:42
 
秀まるお2 さん、お返事ありがとうございます。

マクロ提供ありがとうございました。
この機能で十分です。

ですが、本体側では有効なのですが、エディタで利用しようとすると、
#n = dllfunc("EnvChanged");
が、エディタで利用できない呼び出しをしていると、エラーを出すの
ですが、受信・送信エディタではやはり無理でしょうか?
エディタ側のenvchangedを使えばよいかと思い、試したのですが、レジ
ストリのどのキーになるかがよくわかりませんでした。

お手数かとは思いますが、是非お教え頂けますでしょうか?

よろしくお願いいたします。

[ ]
RE:18276 エディタの文字の大きさ変更No.18277
秀まるお2 さん 04/05/27 18:46
 
   #n = dllfunc("ExecAtMain", "EnvChanged");

 とすれば、エディタ上でも実行できるようです。ただ、動作がかなり遅いです。

[ ]
RE:18277 エディタの文字の大きさ変更No.18278
秀まるお2 さん 04/05/28 09:58
 
 動作が遅い原因が分かりました。次のV3.57β2にて直します。

[ ]
RE:18278 エディタの文字の大きさ変更No.18282
Takahito さん 04/05/28 13:51
 
秀まるお2さん:

> 動作が遅い原因が分かりました。次のV3.57β2にて直します。

いろいろとありがとうございます。
よろしくお願いいたします。

いただいたマクロは、適当に使いやすく改造したらアップさせて
頂きたいと思います。

[ ]
RE:18282 エディタの文字の大きさ変更No.18314
Takahito さん 04/05/31 19:07
 
秀まるお2さん、こんにちは。

>> 動作が遅い原因が分かりました。次のV3.57β2にて直します。

こちらの動作をV3.57 β2 + WinXP SP1

で確認致しました。
対応いただきありがとうございました。

[ ]