<p style="padding:0 0 0 0; margin:0 0 0 0;">Hi,</p>

<p style="padding:0 0 0 0; margin:0 0 0 0;"> </p>

<p style="padding:0 0 0 0; margin:0 0 0 0;">Bar shoud be released by Interface, no need to call Free.</p>

<p style="padding:0 0 0 0; margin:0 0 0 0;"><br />
V.</p>

<p style="padding:0 0 0 0; margin:0 0 0 0;">______________________________________________________________<br />
> Od: "Marcos Douglas B. Santos" <md@delfire.net><br />
> Komu: FPC-Pascal users discussions <fpc-pascal@lists.freepascal.org><br />
> Datum: 11.03.2018 14:23<br />
> Předmět: [fpc-pascal] Using Supports() I got an AV... bug?<br />
></p>

<div dir="ltr">
<div>The code below should work but I get an AV when the program calls `Bar.Free`.</div>
<div>Do you know why?</div>
<div>Lazarus 1.8.1 r57299 FPC 3.0.4 i386-win32-win32/win64</div>
<div>...</div>
<div>Regards,</div>
<div>Marcos Douglas</div>
</div>
<br />
 <br />
 ----------<br />
 <br />
 _______________________________________________<br />
 fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org<br />
 <a href="http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal">http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal</a>