TTitanMethodBody

type TTitanMethodBody = class

public

  PSelf: Pointer;

  Scripter: Pointer;

  Name: string;

  constructor Create();

  destructor Destroy; override;

  procedure Clear;

  function DefaultValue;

  function FindNestedClass();

  property ParamCount: Integer; [rw]

  property FieldCount: Integer; [rw]

  property Params []: TTitanParameter; [rw]

  property Fields []: TTitanParameter; [rw]

  property Result: TTitanParameter; [rw]

  property Self: TObject; [rw]

end;

TTitanMethodBody

TObject