使用MaximizeCommandWindow等函数,可以实现服务器窗口显示、最小化和终止运行等功能。
1.MaximizeCommandWindow函数
该函数在Windows桌面上显示服务器窗口,语法格式为:
如果MATLAB为客户程序:
h.MaximizeCommandWindow
MaximizeCommandWindow(h)
invoke(h,'MaximizeCommandWindow')
如果VBA作为客户程序:
void MaximizeCommandWindow;
MaximizeCommandWindow函数显示句柄为h的服务器程序的窗口,并使它成为当前激活的窗口。如果服务器窗口并不处于最小化状态,则MaximizeCommandWindow函数不起作用。
下面的例子创建一个COM服务器,使它的窗口最小化,然后最大化窗口并使它成为当前激活的窗口。
MATLAB为客户程序时,使用下面的命令行:
code.matlab
>> h=actxserver('matlab.application');
>> h.MinimizeCommandWindow;
>> % 现在,将服务器窗口返回到前一状态
>> % 并使之成为当前激活的窗口
>> h.MaximizeCommandWindow;
VBA作为客户程序时,使用类似下面的语句行:
code.excel vba
Dim Matlab As Object
Set Matlab=text-blue-400">CreateObject("matlab.text-blue-400">application")
Call Matlab.MinimizeCommandWindow
rem 现在,将服务器窗口返回到前一状态
rem 并使之成为当前激活的窗口
Call Matlab.MaximizeCommandWindow
2.MinimizeCommandWindow函数
该函数使服务器窗口最小化,调用格式与MaximizeCommandWindow函数的相同。
3.Quit函数
该函数终止MATLAB服务器的运行。调用格式为:
如果MATLAB为客户程序:
h.Quit
Quit(h)
invoke(h,'Quit')
如果VBA为客户程序:
void Quit