[Lazarus-es] Comportamiento de Lazarus diferente en Windows a Linux
Ismael L. Donis Garcia
slibre en natio.co.cu
Lun Feb 7 19:18:50 CET 2022
Na da que ver al menos lacontante no tendría nada que ver con los eventos:
txtregEnter(Sender);
txtregExit(Sender);
txtcompEnter(Sender);
En ese caso solo sería el evento:
txtcompExit(Sender);
Además antes solo tenía:
ckey:=#13;
txtreg.Text:=lstcom.Selected.Caption;
txtcomp.SetFocus;
txtcomp.Text:=lstcom.Selected.SubItems[0];
txtcompKeyPress(Sender, ckey);
Sin especificar SO, pero en linux no se disparaban los eventos y en windows si, eso fue lo que me extraño y por eso tuve que poner código diferente en dependencia del SO que se estuviera ejecutando.
Saludos Reiterados
--
Ismael
Devuan User: http://distrowatch.com/table.php?distribution=devuan
Web Site: https://gitlab.uic.cu/ismael.donis/sistema-de-contabilidad-general/
----- Original Message -----
From: Maxi via Lazarus-es
To: Spanish version of Lazarus List
Cc: Maxi
Sent: Monday, February 07, 2022 9:57 AM
Subject: Re: [Lazarus-es] Comportamiento de Lazarus diferente en Windows a Linux
debes usar las contantes de teclas no el #13, que seguramente en linux la maneja diferente
El lun, 31 ene 2022 a las 14:12, Ismael L. Donis Garcia via Lazarus-es (<lazarus-es en lists.lazarus-ide.org>) escribió:
He venido presentando problemas con Linux ya que no se me disparan los eventos al igual que Linux an instanciar un formulario.
Esto es un comportamiento normal o algo que tengo mal configurado o un error de lazarus?
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.
with Tfccomp.Create(nil) do
try
Show;
{$IFDEF UNIX}
txtregEnter(Sender);
txtreg.Text:=lstcom.Selected.Caption;
txtregExit(Sender);
txtcomp.SetFocus;
txtcompEnter(Sender);
txtcomp.Text:=lstcom.Selected.SubItems[0];
txtcompExit(Sender);
{$ELSE}
ckey:=#13;
txtreg.Text:=lstcom.Selected.Caption;
txtcomp.SetFocus;
txtcomp.Text:=lstcom.Selected.SubItems[0];
txtcompKeyPress(Sender, ckey);
{$ENDIF}
Hide;
Showmodal;
finally
Free;
end;
Los eventos
txtregEnter(Sender);
txtregExit(Sender);
txtcompEnter(Sender);
txtcompExit(Sender);
En Linux NO se disparan de forma automática, en windows SI
Saludos Cordiales
--
Ismael
Devuan User: http://distrowatch.com/table.php?distribution=devuan
Web Site: https://gitlab.uic.cu/ismael.donis/sistema-de-contabilidad-general/
_______________________________________________
Lazarus-es mailing list
Lazarus-es en lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus-es
--
El que pregunta aprende, y el que contesta aprende a responder.
No a la obsolecencia programada: http://www.rtve.es/noticias/20110104/productos-consumo-duran-cada-vez-menos/392498.shtml
------------------------------------------------------------------------------
_______________________________________________
Lazarus-es mailing list
Lazarus-es en lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus-es
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20220207/1190da7e/attachment.htm>
Más información sobre la lista de distribución Lazarus-es