2010-5-6 11:46 jAmEs_
[BUG?]脚本功能

IdeSetEditorSelectedText每次执行后,会多一个回车的动作,导致当前源码换行,这个是什么原因?能否改掉?

2010-5-6 16:30 zjy
这个函数是用来进行多行和整行文本处理的

参数也是用TStringList来保存文本,所以转换后会有个回车。
如果不想要回车,可以自己用OTA的块操作接口来处理。

2010-5-6 16:41 jAmEs_
:L 晕哦,不能由CW处理吗?
本来是希望把ToUpper功能放到工具栏的,使用才方便,但是这个功能不能放,所以用脚本,结果。。。

2010-5-6 18:31 zjy
选择块转大写,可以用这个:

[code]{*******************************************************}
{                                                       }
{       Pascal Script Source File                       }
{       Run by RemObjects Pascal Script in CnWizards    }
{                                                       }
{       Generated by CnPack IDE Wizards                 }
{                                                       }
{*******************************************************}

program Script3;
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ToolsAPI, CnWizUtils;
var
  View: IOTAEditView;
begin
  View := CnOtaGetTopMostEditView(nil);
  if (View <> nil) and (View.GetBlock <> nil) then
  begin
    View.GetBlock.UpperCase;
  end;
end.[/code]

2010-5-6 19:28 jAmEs_
:victory: :loveliness: 太感激了:)

页: [1]
查看完整版本: [BUG?]脚本功能


Powered by Discuz! Archiver 5.0.0  © 2001-2006 Comsenz Inc.