0 Members and 1 Guest are viewing this topic.
This script lets you define and use classes, methods, etc like you would normally do in C++/C# or Object Pascal?
Oh and is there class inheritance possible?
- base types (support for more than one)
myBaseClassType := newClassType('_myBaseClass', [], [], [], []);myClassType := newClassTypeB('_myClass', [], [], [], [], [myBaseClassType]);myClass := newClass(myClassType, []);
procedure _myBaseClass(const ClassIndex: TClassIndex; const ArgsIndex: TArgsIndex);begin WriteLn('myBaseClass Constructor');end;procedure _myClass(const ClassIndex: TClassIndex; const ArgsIndex: TArgsIndex);begin newBaseClass(ClassIndex, 0, []); WriteLn('myClass Constructor');end;