把下面的代码保存成SwitchSourceEditorMaximize.pas,然后在脚本专家里添加进去。
给个热键,我使用的是Ctrl+Alt+-。
把“手动执行脚本时需要确认”去掉,对于这个脚本非常的烦。
最后试试你刚设的热键,爽吧?再也不需要去双击标题了。
代码非常简单,所以就没有写注释了。
{*******************************************************}
{ }
{ Pascal Script Source File }
{ Run by RemObjects Pascal Script in CnWizards }
{ }
{ Generated by CnPack IDE Wizards }
{ }
{ Using maximize or restore source editor window }
{ Writed by Kend }
{ }
{*******************************************************}
program SwitchSourceEditorMaximize;
uses
CnWizUtils;
var
srcEditor: IOTASourceEditor;
editView: IOTAEditView;
editWindow: TCustomForm;
begin
srcEditor := CnOtaGetCurrentSourceEditor;
editView := CnOtaGetTopMostEditView(srcEditor);
editWindow := editView.GetEditWindow.GetForm;
if IsIdeEditorForm(editWindow) then
if editWindow.WindowState <> wsMaximized then
editWindow.WindowState := wsMaximized
else
editWindow.WindowState := wsNormal;
end.