マクロ 公開データ (2000.10~2008.01)

[1011] Re: ヘッダーCM削除(先頭~空白行) - matsui <> 00/10/29 14:31


Subject: [1011] Re: ヘッダーCM削除(先頭~空白行) Date: Sun, 29 Oct 2000 14:31:11 +0900 From: matsui <>
matsui です。 [1004] ヘッダーCM削除(先頭~空白行) のマクロの一部を マクロ呼び出しに変更してみました。 //*********************************************************** // ヘッダーCM削除(先頭~空白行) // // [説明] // 文頭~空白行までを、CM(不要部)と判断し削除します。 // 行頭が改行(\n)の場合を、空白行と判断します。 // EdMax Ver2.76.2 以降で動作します。 // 別途「設定の保存」、「設定の復元」が必要です。 // // [補足] // 削除部はクリップボードに複写されています。 // 誤って削除した場合は「メール編集」をONの状態で「貼り付け」で戻ります。 // // 下記URLに操作記録手順があります。 // http://www.geocities.co.jp/SiliconValley/7492/ExHdCmCut.html // // [履歴] // 2000/10/29 matsui 「設定の保存」、「設定の復元」をマクロ呼び出しに変更 // 2000/10/21 matsui マクロのテキスト化 // 2000/04/13 matsui 「複写」→「delete」の部分を「切り取り」に変更 // 2000/04/10 matsui delete前に複写を追加 // 2000/04/06 matsui 新規作成 //*********************************************************** CHAR MacroComment[] = "文頭~空白行までを、CM(不要部)と判断し削除\r\n2000/10/29 written by matsui" CallMacro( 設定の保存 ) ; // *----------------------* View画面の先頭行へ位置付け SetFocusToView( ) ; SelectAllString( ) ; KeyDown( VK_LEFT , 0 ) ; // *----------------------* 対象をAnchor設定 FindString( TRUE , FALSE , TRUE , FALSE , TRUE , FALSE , FALSE , FALSE , FALSE , "\\n\\n" ) ; KeyDown( VK_RIGHT , 0 ) ; SetAnchor( ) ; FindString( TRUE , FALSE , TRUE , FALSE , TRUE , FALSE , FALSE , FALSE , FALSE , "\\n\\n" ) ; KeyDown( VK_RIGHT , 0 ) ; SetAnchor( ) ; // *----------------------* Anchor間を削除 SelectAnchorArea( ) ; CutString( ) ; // *----------------------* フォーカスをリスト画面へ SetFocusToList( ) ; CallMacro( 設定の復元 ) ;