+ Help debug infos added

git-svn-id: trunk@6046 -

ide/fphelp.pas

@@ -43,6 +43,7 @@ procedure HelpIndex(Keyword: string);
 procedure HelpTopicSearch(Editor: PEditor);
 procedure HelpTopic(const S: string);
 procedure CloseHelpWindows;
+procedure HelpDebugInfos;
 
 procedure InitHelpSystem;
 procedure DoneHelpSystem;
@@ -410,6 +411,12 @@ begin
   Message(Application,evCommand,cmUpdate,nil);
 end;
 
+procedure HelpDebugInfos;
+begin
+  HelpCreateWindow;
+  HelpWindow^.ShowDebugInfos;
+end;
+
 procedure PushStatus(S: string);
 begin
   if StatusLine=nil then