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

program InvokeIDEInsight;

{ Note: This program can be only compiled and run on XE5 or above.}

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

var
  Insight: IOTAIDEInsightService;
begin
  Insight := IOTAIDEInsightService(BorlandIDEServices);
  if Insight <> nil then
  begin
    Writeln('To Invoke IDEInsight.');
    Insight.Invoke;  // Or focus the IDE insight toolbar.
  end;
end.
 
