On Friday 22 November 2013 13:42:32 Marcos Douglas wrote:
> On Fri, Nov 22, 2013 at 9:26 AM, Martin Schreiber <[email protected]> 
wrote:
> > "
> > tfoo = class
> >  private
> >   fprop1: int32;
> >   fprop2: int32;
> >  protected
> > {$rtti streaming}
> >   property prop1: int32 read fprop1 write fprop1;
> >  public
> >   property prop2: int32 read fprop2 write fprop2;
> > end;
> > "
>
> But you need to close the compiler switch, right?
> "
> tfoo = class
>  private
>   fprop1: int32;
>   fprop2: int32;
>  protected
> {$rtti on}
>   property prop1: int32 read fprop1 write fprop1;
>  public
>   property prop2: int32 read fprop2 write fprop2;
> {$rtti off}
> end;
> "

{$rtti xxx} is local to the object type definition, default at start is {$rtti 
off}. {$rtti streaming} means "make rtti which can be used for streaming, set 
the streaming flag in rtti".
"
type
 tfoo = object //rtti is off
  private
   fprop1: int32;
   fprop2: int32;
   fprop3: int32;
  protected
   property prop1: int32 read fprop1 write fprop1; //not streamed
 {$rtti streaming}
   property prop2: int32 read fprop2 write fprop2; //streamed
  public
   property prop3: int32 read fprop3 write fprop3; //streamed
  end;

 tfoo1 = object(tfoo)   //rtti is off
  private
   fprop4: int32;
  public
   property prop4: int32 read fprop4 write fprop4; //not streamed
 end;
"

------------------------------------------------------------------------------
Shape the Mobile Experience: Free Subscription
Software experts and developers: Be at the forefront of tech innovation.
Intel(R) Software Adrenaline delivers strategic insight and game-changing 
conversations that shape the rapidly evolving mobile landscape. Sign up now. 
http://pubads.g.doubleclick.net/gampad/clk?id=63431311&iu=/4140/ostg.clktrk
_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Reply via email to