hide TCollection default editor

for example in the category Editor, 'Shortcuts' are not anymore visible but editable in the category shortcuts
This commit is contained in:
Basile Burg 2015-05-26 11:13:52 +02:00
parent e2e9aa8bfe
commit 0fdab64271
1 changed files with 5 additions and 3 deletions

View File

@ -241,9 +241,11 @@ begin
if aEditor.GetComponent(0) is TComponent then
begin
if aEditor.GetPropInfo^.Name = 'Tag' then
aSHow := false;
if aEditor.GetPropInfo^.Name = 'Name' then
aSHow := false;
aShow := false
else if aEditor.GetPropInfo^.Name = 'Name' then
aShow := false
else if aEditor.GetPropInfo^.PropType = TypeInfo(TCollection) then
aShow := false;
end;
end;