Forum Discussion
tristaanogre
14 years agoEsteemed Contributor
A very simple example would be something like this.
procedure DemoObject;
var
NewClass;
NewObject;
begin
NewClass := ODT.Classes.Declare('NewClass');
NewClass.AddProperty('Property1');
NewClass.AddProperty('Property2');
NewObject := ODT.Classes.New('NewClass');
NewObject.Property1 := 'This is my first property';
NewObject.Property2 := 'This is my second property';
Log.Message('This demonstrates my object: Property 1 - ' + NewObject.Property1);
end;
Related Content
- 2 years agomitov
- 2 months agochris90mn
- 12 months agolalit_singh
- 12 years agoMorgan