paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-23 00:39:44 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: code help hint: show elements pre, table, tr, th, td

Browse Source 
git-svn-id: trunk@33796 -
This commit is contained in:
mattias 2011-11-26 11:19:08 +00:00
parent 246cf4a714
commit b76c5cf019
2 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/codetools/ide/codyidentifiersdlg.pas
View File

@ -30,7 +30,7 @@
-check if identifier still exists
-check if unit conflicts with another unit in path
-buttons: add unit to interface, add unit to implementation
-add unit to uses
-button: jump to identifier
-add dependency to owner
-clean up old entries
-When, How?

9
ide/codehelp.pas
View File

@ -2657,7 +2657,14 @@ function TCodeHelpManager.GetFPDocNodeAsHTML(FPDocFile: TLazFPDocFile;
else if Node.NodeName='seealso' then
Result:=Result+'<div class="title">'+'See also'+'</div>';
Result:=Result+'<div class="'+Node.NodeName+'">'+s+'</div>'+LineEnding;
end else if (Node.NodeName='p') or (Node.NodeName='b')
end else if (Node.NodeName='p')
or (Node.NodeName='b')
or (Node.NodeName='pre')
or (Node.NodeName='table')
or (Node.NodeName='th')
or (Node.NodeName='tr')
or (Node.NodeName='td')
or (Node.NodeName='hr')
then begin
Result:=Result+'<'+Node.NodeName+'>'+AddChilds(Node)+'</'+Node.NodeName+'>';
end else if (Node.NodeName='var') then begin