摘要： program CopyCurrentLine;uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;var Lines: TStringList; begin Lines := TStringList.Create; try IdeGetEditorSelectedLines(Lines); Lines.AddStrings(Lines); IdeSetEditorSelectedLines(Lines); finally Lines.Free; end;end. 阅读全文