ページレイアウト切り替え

ヘッダの charset(ISO-2022-JP,US-ASCII等) を判断し、言語typeに対応したページレイアウト設定を行います。該当メールのcharsetが対象外の場合は、ページレイアウト設定は行わずプレビュー表示のみを行います。

サンプルマクロのページレイアウト設定は、ISO-2022-JPの場合は「MS ゴシック」、US-ASCIIの場合は「MS P明朝」に設定しています。レイアウトやfontを変更したい場合は、ファイル(F)→ページレイアウトの設定(L) だけを記録し、SetPrintPageLayout の部分に貼り付けてください。

// Start of EdMax Macro
CHAR MacroComment[] = "charsetに対応した\r\nページレイアウト設定を行い\r\nプレビュー表示する"
// #----------------------* Prolog
SaveCurrentFindCondition( ) ;       //保存:検索条件
SaveMailEditHeaderEditMode( ) ;     //保存:メール編集+ヘッダ編集
OnHeaderEdit( ) ;                   //ON:メール編集+ヘッダ編集
SetFocusToView( ) ;                 //フォーカス:ビュー画面へ
// #----------------------* ヘッダ終端へ位置付け
FindString( TRUE , FALSE , FALSE , FALSE , TRUE , FALSE , FALSE , FALSE , FALSE , "\\n\\n" ) ;
KeyDown( VK_LEFT , 0 ) ;            //←キー
// #----------------------* ISO-2022-JP用ページレイアウトの設定
FindString( FALSE , FALSE , TRUE , FALSE , FALSE , FALSE , FALSE , FALSE , FALSE , "charset=ISO-2022-JP" ) ;
IfStringNotFound( 1 ) ;             //ISO-2022-JPでない場合skip
  SetPrintPageLayout( 20 , 10 , 10 , 10 , 1 , 1 , FALSE , 0 , 0 , TRUE , 2 , "FileName = &f  &d &t" , FALSE , 1 , "- &p -" , 12 , 0 , 0 , 0 , 400 , 0 , 0 , 0 , 128 , 3 , 2 , 1 , 49 , "MS ゴシック" ) ;
// #----------------------* US-ASCII用ページレイアウトの設定
FindString( FALSE , FALSE , TRUE , FALSE , FALSE , FALSE , FALSE , FALSE , FALSE , "charset=US-ASCII" ) ;
IfStringNotFound( 1 ) ;             //US-ASCIIでない場合skip
  SetPrintPageLayout( 20 , 10 , 10 , 10 , 1 , 1 , FALSE , 0 , 0 , TRUE , 2 , "FileName = &f  &d &t" , FALSE , 1 , "- &p -" , 12 , 0 , 0 , 0 , 400 , 0 , 0 , 0 , 128 , 3 , 2 , 1 , 18 , "MS P明朝" ) ;
// #----------------------* Epilog
RestoreCurrentFindCondition( ) ;    //復元:検索条件
RestoreMailEditHeaderEditMode( ) ;  //復元:メール編集+ヘッダ編集
PrintPreview( ) ;                   //印刷プレビュー
// End of EdMax Macro