Hello, I have problem if I call: IDEScripter1.DefineClassByRTTI(TForm1, TRedefineOption.roOverwrite,false,[mvPublished]); then I do not see Free method of any other classes. It's because TObject is ancestor and Free is mvPublic. How to solve this situation? I do not want to see public properties …

Use RemoveProperty: [image] Prevent published properties from adding TMS Scripter You can delete properties from existing classes this way: atScripter1.Classes.ClassByName('TLabel').RemoveProperty('Caption');

Example code: type TMyClass=class published procedure MyCode; end; procedure TForm1.Button3Click(Sender: TObject); begin IDEScripter1.DefineClassByRTTI(TForm1,roOverwrite,false,'',[mvPublished]); IDEScripter1.DefineClassByRTTI(TMyClass); IDEDialog1.Show; end;

[image] Zdenek_Vasku: I do not want to see public properties of some forms. If you need such specific registration, I recommend that you do some manual tweaking of the classes. You can for example remove the properties you don't want, or manually add the properties you want.

Ok, what is the best solution to remove some Properties after DefineClass?

Problem accessing Free method of Class after DefineClassByRTTI

BIZ TMS Scripter

wlandgraf (Wagner Landgraf) January 5, 2023, 12:21pm 5

Use RemoveProperty:

Topic		Replies	Views
Problem with DefineClassByRTTI TMS Scripter	8	375	January 3, 2023
DefineClassByRTTI, TMS Scripter	5	592	January 16, 2019
DefineClassByRTTI() - missing properties TMS Scripter	1	409	April 10, 2017
Prevent published properties from adding TMS Scripter	1	353	July 30, 2020
Define classes, units for scripts TMS Scripter	1	541	June 24, 2021

Problem accessing Free method of Class after DefineClassByRTTI

Related topics