Remove useless comments like { private declarations } from class skeletons.

git-svn-id: trunk@52832 -
This commit is contained in:
juha 2016-08-18 18:51:56 +00:00
parent 2cdcbefef6
commit 3eb143d1bc
4 changed files with 9 additions and 10 deletions

View File

@ -1025,9 +1025,9 @@ begin
'type'+LE
+' T'+ResourceName+' = class('+ResourceClass.ClassName+')'+LE
+' private'+LE
+' { private declarations }'+LE
+LE
+' public'+LE
+' { public declarations }'+LE
+LE
+' end;'+LE
+LE;

View File

@ -108,9 +108,8 @@ begin
Add('type');
Add(' ' + GetNextThreadName + ' = class(TThread)');
Add(' private');
Add(' { Private declarations }');
Add('');
Add(' protected');
Add(' { Protected declarations }');
Add(' procedure Execute; override;');
Add(' end;');
Add('');

View File

@ -544,9 +544,9 @@ begin
'type'+LE
+' T'+ResourceName+' = class('+ResourceClass.ClassName+')'+LE
+' private'+LE
+' { private declarations }'+LE
+LE
+' public'+LE
+' { public declarations }'+LE
+LE
+' end;'+LE
+LE;

View File

@ -805,13 +805,13 @@ begin
+'type'+LE
+' '+Params.NewClassName+' = class('+Params.AncestorType+')'+LE
+' private'+LE
+' { Private declarations }'+LE
+LE
+' protected'+LE
+' { Protected declarations }'+LE
+LE
+' public'+LE
+' { Public declarations }'+LE
+LE
+' published'+LE
+' { Published declarations }'+LE
+LE
+' end;'+LE
+LE
+'procedure Register;'+LE