<html><body><div style="font-family: arial, helvetica, sans-serif; font-size: 14pt; color: #000000"><div><style></style></div><div>Hola, la forma de crear el objeto es correcta. Creo que el problema está en que usas dentro de la clase Tfimprec la variable frecep que se supone que es del tipo Tfrecep pero no le asignas el valor que lo enlaza con el formulario padre. Deberías tener una variable o property dentro del formulario hijo que recoja el puntero al padre. Te pongo un ejemplo reducido, si no lo ves claro dime cosas. Un saludo</div><div><br data-mce-bogus="1"></div><div>En Tfimprec :</div><div>type Tfimpec</div><div> private</div><div> FParent: Tfrecep;</div><div><br data-mce-bogus="1"></div><div> public</div><div> property parent: Tfrecep read FParent write FParent;</div><div> end;</div><div><br data-mce-bogus="1"></div><div><div>procedure Tfimprec.cmdcerrarClick(Sender: TObject);</div><div>begin</div><div> Self.Parent.salvar := true;</div><div> Self.Close;</div><div>end; </div></div><div><br data-mce-bogus="1"></div><div>En la llamada desde Tfrecep:</div><div><div><br data-mce-bogus="1"></div><div> with Tfimprec.Create(nil) do</div><div> try</div><div> asignarnum:=strtoint(snorec);</div><div> entidad:=sentidad;</div><div> parent := Self;</div><div> Showmodal;</div><div> finally</div><div> Free;</div><div> end;</div></div><div><br></div><div><br data-mce-bogus="1"></div><div><br></div><hr id="zwchr" data-marker="__DIVIDER__"><div data-marker="__HEADERS__"><b>De: </b>"Spanish version of Lazarus List" <lazarus-es@lists.lazarus-ide.org><br><b>Para: </b>"Spanish version of Lazarus List" <lazarus-es@lists.lazarus.freepascal.org>, "Spanish version of Lazarus List" <lazarus-es@lists.lazarus-ide.org><br><b>CC: </b>"Ismael L. Donis Garcia" <slibre@natio.co.cu><br><b>Enviados: </b>Martes, 23 de Mayo 2017 18:23:39<br><b>Asunto: </b>[Lazarus-es] Error External SIGSEGV al asignar valor de propiedad<br></div><div><br></div><div data-marker="__QUOTED_TEXT__">
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;">Tengo un formulario que tiene una propiedad
pública:</span></div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"></span> </div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;">public<br> { public declarations
}<br> property salvar: boolean write setsalvar;<br></span></div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"></span> </div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;">procedure Tfrecep.setsalvar(AValue:
boolean);<br>begin<br> bvalida:=AValue;<br>end;</span></div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"></span> </div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;">El cual llama otro formulario de la siguiente
forma:</span></div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"></span> </div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"> with Tfimprec.Create(nil)
do<br>
try<br>
asignarnum:=strtoint(snorec);<br>
entidad:=sentidad;<br>
Showmodal;<br>
finally<br>
Free;<br> end;<br></span></div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;">Cuando desde el formalario Tfimprec trato de
asignarle un valor a la propiedad salvar me da dicho error el cual no encuentro
la posible causa.</span></div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"></span> </div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;">procedure Tfimprec.cmdcerrarClick(Sender:
TObject);<br>begin<br> frecep.salvar:=true;<br>
Self.Close;<br>end; </span></div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"></span> </div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;">Al alguien de ustedes le ha pasado esto? En caso
afirmativo como lo han solucionado?</span></div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"> </span></div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"></span> </div>
<div><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;">Desde ya Gracias</span></div>
<div>========<br>| ISMAEL |<br>========<br><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;">Devuan User :
<a href="http://distrowatch.com/table.php?distribution=devuan" target="_blank">http://distrowatch.com/table.php?distribution=devuan</a></span></div>
<div>WebSite: <a href="http://distrowatch.com/table.php?distribution=devuan" target="_blank"><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"></span></a><span face="Arial" size="2" data-mce-style="font-family: Arial; font-size: small;" style="font-family: Arial; font-size: small;"><a href="http://sisconge.byethost15.com" target="_blank">http://</a></span>sisconge.byethost15.com</div>
<br>_______________________________________________<br>Lazarus-es mailing list<br>Lazarus-es@lists.lazarus-ide.org<br>http://lists.lazarus-ide.org/listinfo/lazarus-es<br></div></div></body></html>