| |
こんにちは、白雲斎です。
タブ・モードでも有効なマクロに訂正しました。
よろしかったら試してください。
---- 以下マクロ ----
// ウインドウ２個を縦横に配置（配置位置を指定可）
if( tabmode ) #windCount = tabgrouptotal;
else #windCount = hidemarucount;
if( #windCount != 2 ) endmacro;
#crHandle = hidemaruhandle(0);
menu "ウインドウを 横に並べる", "ウインドウを 縦に並べる";
#res = result;
if( #res == 0 ) endmacro;
if( #res == 2 ) goto VerticalOrder;
menu "実行画面を 左", "実行画面を 右";
#res = result;
if( #res == 0 ) endmacro;
else if( #res == 2 ) call ChgWind;
#wide = cxworkarea / #windCount;
if( windowstate != 1 ) showwindow 1;
setwindowpos 0, 0, #wide, cyworkarea;
call ChgWind;
if( windowstate != 1 ) showwindow 1;
setwindowpos #wide, 0, #wide, cyworkarea;
setactivehidemaru #crHandle;
endmacro;
VerticalOrder:
menu "実行画面を 上", "実行画面を 下";
#res = result;
if( #res == 0 ) endmacro;
else if( #res == 2 ) call ChgWind;
#hight = cyworkarea / #windCount;
if( windowstate != 1 ) showwindow 1;
setwindowpos 0, 0, cxworkarea, #hight;
call ChgWind;
if( windowstate != 1 ) showwindow 1;
setwindowpos 0, #hight, cxworkarea, #hight;
setactivehidemaru #crHandle;
endmacro;
ChgWind:
if( tabmode ) setactivehidemaru getcurrenttab( true, 1 );
else nexthidemaru;
return;
|
|