<html>
  <head>
    <meta content="text/html; charset=windows-1252"
      http-equiv="Content-Type">
  </head>
  <body bgcolor="#FFFFFF" text="#000000">
    <br>
    <div class="moz-cite-prefix">Am 25.02.2015 um 20:37 schrieb Alfred:<br>
    </div>
    <blockquote
      cite="mid:em6257a260-f315-400d-af8e-7280bea4d545@alfsacer"
      type="cite">
      <style id="eMClientCss">BLOCKQUOTE.cite {
        PADDING-LEFT: 10px; MARGIN-LEFT: 5px; BORDER-LEFT: #cccccc 1px solid; PADDING-RIGHT: 0px; MARGIN-RIGHT: 0px
}
BLOCKQUOTE.cite2 {
        PADDING-TOP: 0px; PADDING-LEFT: 10px; MARGIN-LEFT: 5px; BORDER-LEFT: #cccccc 1px solid; MARGIN-TOP: 3px; PADDING-RIGHT: 0px; MARGIN-RIGHT: 0px
}
.plain PRE {
        FONT-SIZE: 100%; FONT-FAMILY: monospace; FONT-WEIGHT: normal; FONT-STYLE: normal
}
.plain TT {
        FONT-SIZE: 100%; FONT-FAMILY: monospace; FONT-WEIGHT: normal; FONT-STYLE: normal
}
A IMG {
        BORDER-TOP: 0px; BORDER-RIGHT: 0px; BORDER-BOTTOM: 0px; BORDER-LEFT: 0px
}
#x08cbef7a594047c290f2a29cf59a1a5a {
        FONT-SIZE: 12pt; FONT-FAMILY: Tahoma
}
#x0a1e5b0435564365913781b92e976507 {
        FONT-SIZE: 12pt; FONT-FAMILY: Tahoma
}
#x2d29ccc5fc9b457885b0b979f991396b {
        FONT-SIZE: 12pt; FONT-FAMILY: Tahoma
}
.plain PRE {
        FONT-SIZE: 12pt; FONT-FAMILY: Tahoma
}
.plain TT {
        FONT-SIZE: 12pt; FONT-FAMILY: Tahoma
}
BODY {
        FONT-SIZE: 12pt; FONT-FAMILY: Tahoma
}
</style>
      <style>#x0a1e5b0435564365913781b92e976507 BLOCKQUOTE.cite2
{PADDING-TOP: 0px; PADDING-LEFT: 10px; MARGIN-LEFT: 5px; BORDER-LEFT: #cccccc 1px solid; MARGIN-TOP: 3px; PADDING-RIGHT: 0px; MARGIN-RIGHT: 0px}
#x0a1e5b0435564365913781b92e976507 .plain PRE, #x0a1e5b0435564365913781b92e976507 .plain TT
{FONT-SIZE: 100%; FONT-FAMILY: monospace; FONT-WEIGHT: normal; FONT-STYLE: normal}
#x0a1e5b0435564365913781b92e976507 A IMG
{BORDER-TOP: 0px; BORDER-RIGHT: 0px; BORDER-BOTTOM: 0px; BORDER-LEFT: 0px}
#x0a1e5b0435564365913781b92e976507 #x08cbef7a594047c290f2a29cf59a1a5a, #x0a1e5b0435564365913781b92e976507 .plain PRE, #x0a1e5b0435564365913781b92e976507 .plain TT, #x0a1e5b0435564365913781b92e976507
{FONT-SIZE: 12pt; FONT-FAMILY: Tahoma}
</style>
      <div>Well. About the non <span
          id="x2d29ccc5fc9b457885b0b979f991396b"
          style="BACKGROUND-COLOR: #ffffff">compatible. I can only
          detect these:</span></div>
      <div><span style="BACKGROUND-COLOR: #ffffff"></span> </div>
      <div><span style="BACKGROUND-COLOR: #ffffff">1)</span></div>
      <div>RTTICount: Word; //$FFFF if there is no further info, or the
        value of Count</div>
      <div>I did not see it set to $FFFF in case of missing RTTI. As
        Delphi reportedly does.</div>
      <div>But perhaps this has already been done somewhere else.</div>
      <div> </div>
      <div>But, in my opinion, this is not of much importance</div>
    </blockquote>
    In my opinion this is never the case the way the RTTI is currently
    generated so this shouldn't be an issue.<br>
    <blockquote
      cite="mid:em6257a260-f315-400d-af8e-7280bea4d545@alfsacer"
      type="cite">
      <div>2)</div>
      <div>Properties are in front of methods.</div>
      <div>This is different from Delphi.</div>
      <div>But I know that this cannot be changed.</div>
      <div>That would break a whole lot of code !</div>
      <div>And again, if you are aware of this: no problems at all.<br>
        <br>
      </div>
    </blockquote>
    Here the opinion of others would be nice, since the RTTI was partly
    generated but not added to "typinfo.pas".<br>
    Original:<br>
    tkInterface:<br>
                  (<br>
                   IntfParent: PTypeInfo;<br>
                   IntfFlags : TIntfFlagsBase;<br>
                   GUID: TGUID;<br>
                   IntfUnit: ShortString;<br>
                   {<br>
                   IntfProps: array of TPropInfo;<br>
                   }<br>
                  );<br>
    //useless since you would not know how many properties there are<br>
    Current:<br>
    tkInterface:<br>
                  (<br>
                   IntfParent: PTypeInfo;<br>
                   IntfFlags : TIntfFlagsBase;<br>
                   GUID: TGUID;<br>
                   IntfUnit: ShortString;<br>
                   {<br>
                   IntfPropCount: Word;<br>
                   IntfProps: array[0..IntfPropCount-1] of TPropInfo;<br>
                   IntfMethTable : TIntfMethodTable;<br>
                   }<br>
                  );<br>
    //I simply assumed this to be the easier change. Still would break
    some code, if property RTTI for interfaces was ever used anywhere.<br>
    <br>
    How would the layout in Delphi look like?<br>
    <br>
    <blockquote type="cite">
      <div>And I am willing to test on simple ARM (Pi[2], BBB).</div>
      <div>If you provide me with code !</div>
    </blockquote>
    It seemed simple enough see attached Patch.<br>
    ParReg: r0-r3=0..3<br>
    <br>
    mfg Steve<br>
  </body>
</html>