![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#3
|
||||
|
||||
|
muy bien...
procedure TForm1.idTCPSocketServer(//parametros); var algo: string; begin algo:= AThread.Connection.ReadLn; // aqui leo la respuesta // del cliente. if algo = 'mostrar' then begin form1.hide; form2.show; // aqui es donde no funciona.... se congela // el form2, solo aparece el cuadrillo donde // deberia estar. end; end; pero si pongo el mismo codigo en un timer funciona... procedure TForm1.idTCPSocketServer(//parametros); var algo: string; begin algo:= AThread.Connection.ReadLn; // aqui leo la respuesta // del cliente. if algo = 'mostrar' then begin timer1.enabled:= true; end; end; cuando se ejecuta el evento onTimer que tiene Form2.Show; funciona perfectamente. Es decir que mientras este dentro del envento Execute del Server no puedo hacer nada con otros Forms.
__________________
Diego. Colombia es pasión. |
|
|
|