コピー(CopyString)

メーラー部の場合は、ビュー画面、エディタ部の場合はメッセージ作成画面の文章をコピーします。

// Start of EdMax Macro
CHAR MacroComment[] = "全て複写"
SetFocusToEditor( ) ;           //フォーカス:メッセージ作成画面へ
SetFocusToView( ) ;             //フォーカス:ビュー画面へ
SelectAllString( ) ;            //すべてを選択
CopyString( ) ;                 //コピー
// End of EdMax Macro

現在選択中のメールのヘッダ部をコピーします。このとき表示しているヘッダだけでなく、全てのヘッダ情報をコピーします。エディタ部でこのマクロを起動した場合、メーラー部への切替えを行います。

// Start of EdMax Macro
CHAR MacroComment[] = "全てのヘッダ情報を複写する"
// #----------------------* Prolog
SaveCurrentFindCondition( ) ;       //保存:検索条件
ActivateMailerPart( ) ;             //メーラー部へ切替え
SaveMailEditHeaderEditMode( ) ;     //保存:メール編集+ヘッダ編集
OnHeaderEdit( ) ;                   //ON:メール編集+ヘッダ編集
SetFocusToView( ) ;                 //フォーカス:ビュー画面へ
// *----------------------* COPY
KeyDown( VK_HOME , 2 ) ;            //Ctrl+Homeキー
FindString( TRUE , FALSE , FALSE , FALSE , TRUE , FALSE , FALSE , FALSE , FALSE , "\\n\\n" ) ;  //文字列の検索(次を検索)
KeyDown( VK_RIGHT , 0 ) ;           //→キー
KeyDown( VK_UP , 0 ) ;              //↑キー
KeyDown( VK_HOME , 3 ) ;            //Ctrl+Shift+Homeキー
CopyString( ) ;                     //コピー
// *----------------------* Epilog
RestoreCurrentFindCondition( ) ;    //復元:検索条件
RestoreMailEditHeaderEditMode( ) ;  //復元:メール編集+ヘッダ編集
// End of EdMax Macro

現在選択中のメールの本文だけをコピーします。エディタ部でこのマクロを起動した場合、メーラー部への切替えを行います。

// Start of EdMax Macro
CHAR MacroComment[] = "メッセージビュー画面で\r\n本文のみをコピーする"
// #----------------------* Prolog
SaveCurrentFindCondition( ) ;       //保存:検索条件
ActivateMailerPart( ) ;             //メーラー部へ切替え
SetFocusToView( ) ;                 //フォーカス:ビュー画面へ
// *----------------------* COPY
KeyDown( VK_HOME , 2 ) ;            //Ctrl+Homeキー
FindString( TRUE , FALSE , FALSE , FALSE , TRUE , FALSE , FALSE , FALSE , FALSE , "\\n\\n" ) ;  //文字列の検索(次を検索)
KeyDown( VK_RIGHT , 0 ) ;           //→キー
KeyDown( VK_END , 3 ) ;             //Ctrl+Shift+Endキー
CopyString( ) ;                     //コピー
// *----------------------* Epilog
RestoreCurrentFindCondition( ) ;    //復元:検索条件
// End of EdMax Macro