mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-17 13:39:36 +02:00
* make interfaces clickable.
git-svn-id: trunk@15796 -
This commit is contained in:
parent
0ca9fb281d
commit
2518a87deb
@ -2852,7 +2852,7 @@ var
|
||||
for i:=0 to AClass.interfaces.count-1 do
|
||||
begin
|
||||
AppendSym(CodeEl, ',');
|
||||
AppendText(CodeEl,TPasClassType(AClass.Interfaces[i]).Name);
|
||||
AppendHyperlink(CodeEl,TPasClassType(AClass.Interfaces[i]));
|
||||
end;
|
||||
end;
|
||||
AppendSym(CodeEl, ')');
|
||||
|
Loading…
Reference in New Issue
Block a user