Macro/投稿/7

http://sakura.qp.land.to/?Macro%2F%C5%EA%B9%C6%2F7


Top > Macro > 投稿 > 7

挿入モードにする

  • ページ: Macro/投稿
  • 作者: PAPA?
  • カテゴリー: ppa
  • 投稿日: 2003-02-09 (日) 08:02:43

メッセージ

入力モードを調べて、インサートモードにするためのマクロです。

  0
  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
// 実行には PPA.DLL が必須です。sakura.exe と同じフォルダに 
// PPA.DLL を入れておいてください。
// また、マクロファイルの拡張子は .PPA でなくてはなりません。
// 入力モードを調べて、インサートモードにするためのマクロです。
var
        st:String;
begin
                                            //インサートモードでなければインサートモードにする。
        S_GoFileEnd();
        S_Char(13);                         //改行を入力する。
        S_GoLineTop(1);                     //行頭にカーソルを移動する。
        S_Char(97);                         //行頭に'a'を入力する。
        S_GoLineTop(1);                     //行頭にカーソルを移動する。
        S_Char(98);                         //行頭に'b'を入力
        st := S_GetSelectedString(0);       //カーソル位置の文字列を取得する。
        if st <> 'ba' then begin            //インサートモードであったなら、'a'の前に'b'が挿入されて'ba'となっている。
                S_ChgmodINS();              //'ba'でなければ、上書きモードなので、モードを変更してインサートモードにする。
        end;
        //調査時の変更を戻す。
        S_Undo();
        S_Undo();
        S_Undo();
        //カーソルをファイルの先頭に移動する。
        S_GoFileTop();
end; 


URL B I U SIZE Black Maroon Green Olive Navy Purple Teal Gray Silver Red Lime Yellow Blue Fuchsia Aqua White

リロード   新規 編集 凍結 差分 添付 複製 名前変更   ホーム 一覧 単語検索 最終更新 バックアップ リンク元   ヘルプ   最終更新のRSS
Last-modified: 2006-07-29 (土) 23:31:40 (4284d)