paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-10 10:36:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: MethodTypeDataToStr: add colon if parameter names added

Browse Source 
git-svn-id: trunk@28565 -
This commit is contained in:
mattias 2010-11-30 08:34:52 +00:00
parent a15e960f93
commit 4b2342c80b
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/codetools/eventcodetool.pas
View File

@ -211,8 +211,8 @@ begin
end else
s:='';
if phpWithParameterNames in Attr then
s:=s+ParamType.ParamName;
s:=s+':'+ParamType.TypeName;
s:=s+ParamType.ParamName+':';
s:=s+ParamType.TypeName;
if Reverse then begin
if i>0 then s:=s+';';
ParamString:=s+ParamString;