![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#4
|
||||
|
||||
|
tienes razon Roman, y pido disculpas... ademas ya me he leido la guia de estilo en el foro y se especifican este tipo de conductas... lo cierto es que no he podido solucionar mi problema con expuesto en los otros hilos... haber si ahora con un poco mas de calma me pueden colaborar. El codigo que utilizo lo pongo en el evento OnExecute de un TidTCPServer de las Indy:
procedure Tmain.sockExecute(AThread: TIdPeerThread); var cont: integer; texto: string; win: TChat; // form que se crea dinamiamente para cada conversacion begin text:= AThread.Connection.ReadLn(); win:= TChat.Create(Self); win.name:= nombre_aleatorio // este nombre se lo asigno de acuerdo al usuario win.caption:= nombre_usuario // este es el nombre de la persona que envia el mensaje win.show; // aqui es donde se ponen mal las cosas, se congela y simplemente no sucede nada // ya probe con: Synchronize(win.show); // pero sucede lo mismo. end; los otros valores se generan en otro codigo que no pongo por que simplemente no tiene que ver con el problema... haber si me dan una mano con esto... Salu2 ![]()
__________________
Diego. Colombia es pasión. |
|
|
|