I have a useful button that uses OnTopOn/OnTopoff parameter.
The code is below:
function OnClick(clickData)
{
var vlis = DOpus.listers.lastactive;
var vars = vlis.vars;
var cmd = DOpus.Create.Command();
cmd.SetSourceTab(vlis.activetab)
cmd.Clear();
if (vars.Exists("topsmall"))
{
var vtree=vars.get("vtrees");
var settree="";
if(vtree==1)
settree="Set TREE=on,left";
else if(vtree==2)
settree="Set TREE=on,right";
else if(vtree==3)
settree="Set TREE=on,dual";
var vdua=vars.get("vdual");
var setdual="";
if(vdua==1)
setdual="Set DUAL=vert";
else if(vdua==2)
setdual="Set DUAL=horiz";
cmd.AddLine("Set LISTERCMD=OnTopoff");
cmd.AddLine("Set LISTERSIZE="+vars.get("vwidth")+","+vars.get("vheight"));
cmd.AddLine("Set LISTERPOS="+vars.get("vleft")+","+vars.get("vtop"));
cmd.AddLine("Set LAYOUT=restore");
if(settree) cmd.AddLine(settree);
cmd.AddLine("Set TABPOSITION=reset");
if(setdual){
cmd.AddLine(setdual);
cmd.AddLine("Set DUALSIZE 50");
}
vars.Delete("topsmall");
}
else
{
vars.set("vtrees",vlis.tree);
vars.set("vdual",vlis.dual);
var left=vlis.left;
var top=vlis.top;
var width=vlis.right-left;
var height=vlis.bottom-top;
if(cmd.IsSet("LISTERCMD=maximize")){
left=0;width-=10;
top=0;height-=10;
}
if(left<0) left=0;
vars.set("vleft",left);
vars.set("vtop",top);
vars.set("vwidth",width);
vars.set("vheight",height);
cmd.AddLine("Toolbar CLOSE=all");
cmd.AddLine("Set TREE=off,dual");
if(vlis.dual){
cmd.AddLine("Set DUAL=horiz");
cmd.AddLine("Set DUALSIZE 95");
}
cmd.AddLine("Set TABPOSITION=left,normal");
cmd.AddLine("Set TABWIDTH=180,both");
cmd.AddLine("Set LISTERSIZE=780,900");
cmd.AddLine("Set LISTERPOS=170,100");
cmd.AddLine("Set LISTERCMD=OnTopon");
vars.set("topsmall",1);
}
cmd.Run();
}
I define a global hotkey to execute it.
Now in DO 13, it is no longer working.
So, I hope OnTopOn/OnTopoff get added back, please....