<div dir="ltr">debes usar las contantes de teclas no el #13, que seguramente en linux la maneja diferente</div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">El lun, 31 ene 2022 a las 14:12, Ismael L. Donis Garcia via Lazarus-es (<<a href="mailto:lazarus-es@lists.lazarus-ide.org">lazarus-es@lists.lazarus-ide.org</a>>) escribió:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><u></u>





<div bgcolor="#ffffff">
<div><font face="Arial" size="2">He venido presentando problemas con Linux ya que no 
se me disparan los eventos al igual que Linux an instanciar un 
formulario.</font></div>
<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2">Esto es un comportamiento normal o algo que tengo 
mal configurado o un error de lazarus?</font></div>
<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2">Por ejemplo he tenido que hacer lo siguiente para 
poder resolver algunos problemas, pero en otros me está siendo complicado por el 
código que tengo implementado.</font></div>
<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2"> with Tfccomp.Create(nil) 
do<br> try<br>    Show;<br>    {$IFDEF 
UNIX}<br>      txtregEnter(Sender);<br>     
 txtreg.Text:=lstcom.Selected.Caption;<br>      
txtregExit(Sender);<br>      
txtcomp.SetFocus;<br>      
txtcompEnter(Sender);<br>      
txtcomp.Text:=lstcom.Selected.SubItems[0];<br>      
txtcompExit(Sender);<br>    {$ELSE}<br>      
ckey:=#13;<br>      
txtreg.Text:=lstcom.Selected.Caption;<br>      
txtcomp.SetFocus;<br>      
txtcomp.Text:=lstcom.Selected.SubItems[0];<br>      
txtcompKeyPress(Sender, ckey);<br>    
{$ENDIF}<br>    Hide;<br>    
Showmodal;<br> finally<br>   Free;<br> end;<br></font></div>
<div><font face="Arial" size="2">Los eventos</font></div>
<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2">      txtregEnter(Sender);<br>      
txtregExit(Sender);</font></div>
<div><font face="Arial" size="2">      
txtcompEnter(Sender);<br>      
txtcompExit(Sender);<br></font></div>
<div><font face="Arial" size="2">En Linux NO se disparan de forma automática, 
en windows SI</font></div>
<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2">Saludos Cordiales</font></div>
<div><font face="Arial" size="2">--<br>Ismael<br>Devuan User: <a href="http://distrowatch.com/table.php?distribution=devuan" target="_blank">http://distrowatch.com/table.php?distribution=devuan</a><br>Web 
Site: <a href="https://gitlab.uic.cu/ismael.donis/sistema-de-contabilidad-general/" target="_blank">https://gitlab.uic.cu/ismael.donis/sistema-de-contabilidad-general/</a></font></div></div>
_______________________________________________<br>
Lazarus-es mailing list<br>
<a href="mailto:Lazarus-es@lists.lazarus-ide.org" target="_blank">Lazarus-es@lists.lazarus-ide.org</a><br>
<a href="https://lists.lazarus-ide.org/listinfo/lazarus-es" rel="noreferrer" target="_blank">https://lists.lazarus-ide.org/listinfo/lazarus-es</a><br>
</blockquote></div><br clear="all"><div><br></div>-- <br><div dir="ltr" class="gmail_signature"><div dir="ltr">El que pregunta aprende, y el que contesta aprende a responder.<br><br>No a la obsolecencia programada: <a href="http://www.rtve.es/noticias/20110104/productos-consumo-duran-cada-vez-menos/392498.shtml" target="_blank">http://www.rtve.es/noticias/20110104/productos-consumo-duran-cada-vez-menos/392498.shtml</a><br></div></div>