FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Conexion con reloj mediante TClientSocket
Hola a todos.
Me surgio la necesidad de hacer un programa que se conecte a un reloj de personal por tcp/ip y que traiga la marcas de los empleados. Con el reloj venia un ejemplo en Delphi que usaba el TClientSocket (tuve que agregarlo porque en el Delphi 7 no viene por def). El ejemplo tiene un TEdit, un TMemo1 y 3 botones, uno para activar el TClientSocket, otro para desactivarlo y el tercero para enviar el comando que se escriba en el TEdit. En el evento OnRead del TClientSocket se graba lo que se recibe en el memo. Este funciona bien. Ahora yo tenía la necesidad de que sea más o menos en tiempo real por lo que hice un proyecto con un TTimer para poder consultar automáticamente cada 60 segundos al reloj las nuevas marcas. El exe queda en el tray con el componente de las trivial TApp2Tray Mi sorpresa es que al poner todo dentro de un procedimiento deja de funcionar la comunicación, o al menos no funciona como debería. Este es el código que uso, haber si alguien me puede dar una mano o tiene idea de porque pasa esto.
Probe poner sleep entre cada paso del procedure pero tampoco llega el programa al evento OnRead. Ahora si pongo 5 botones y en cada boton pongo Voy apretando secuencialmente los botones y funciona ..... Me esta quemando la cabeza, alguien me puede tirar algun cable. Saludos Última edición por adfa fecha: 07-08-2007 a las 20:57:12. |
#2
|
||||
|
||||
Y... ocurre alguna excepción o simplemente no trae nada?
Saludos.
__________________
Juan Antonio Castillo Hernández (jachguate) Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate |
#3
|
|||
|
|||
hola jachguate.
Ahora veo donde fue a morir mi otro post, perdón que lo halla posteado tambien en varios . No ninguna excepción, solo que no trae datos al memo. El event OnRead del TClientSocket no llega a ejecutarse nunca. |
#4
|
||||
|
||||
Bien... no se si será una tontería... pero te has dado cuenta que los mensajes que envías con los trozos de código que enviaste no son los mismos?
Saludos.
__________________
Juan Antonio Castillo Hernández (jachguate) Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate |
#5
|
|||
|
|||
Perdón, la pifie al postear .. ya lo edite, no existe comando4 solo 1,2 y 3
De paso pongo el contenido de las constantes |
#6
|
||||
|
||||
Francamente no se me ocurre nada, mas porque hace mucho no he trabajado con los componentes que estas usando... pero, por curiosidad, y viendo que es bastante sencillo... ¿has intentado con las indy?. En otras palabras... ¿no será un problema del componente?.
En lo personal, prefiero las Indy por muchas razones que ya no recuerdo, pero en resumen es mucho mas limpio, robusto y estable. Saludos.
__________________
Juan Antonio Castillo Hernández (jachguate) Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate |
#7
|
|||
|
|||
Supongo que si, pero el ejemplo que venia con el reloj estaba con TClientSocket. Por lo que vi en el TidTCPClient no hay un evento OnRead y yo desconozco bastante de este tipo de componentes de tcp.
Si tienes algun ejemplo de como sería la lectura con Indy quiza pueda hacer una prueba. Lo que me parece raro es que con los botones fucione, no se si un tema de hilos en el componente para manejar el evento OnRead. (no si digo pensando, porque en realidad se poco de esto). |
#8
|
|||
|
|||
Bueno al final cambie por el TidTCPClient, no me resulto tan dificil.
Los metodos writeLn y readLn del componente me ayudaron a hacerlo más fácil. Gracias jachguate por tu tiempo. Saludos |
#9
|
||||
|
||||
Me alegra que te haya servido de algo el consejo... podemos suponer que todo funcionó bien?
Saludos.
__________________
Juan Antonio Castillo Hernández (jachguate) Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Realizar una conexion FTP mediante Delphi | KeyMan | Varios | 21 | 24-09-2007 15:45:46 |
Conexion mediante ODBC, OLE DB, ADO? | tsomarp | Conexión con bases de datos | 1 | 25-02-2005 13:05:27 |
Conexion con Oracle mediante ADO | PTW | Oracle | 0 | 21-02-2005 14:50:25 |
Conexion a Access Mediante una DLL | Draco | Conexión con bases de datos | 0 | 29-04-2004 04:27:47 |
Conexion a DBF mediante DBE | Celta777 | Conexión con bases de datos | 2 | 18-10-2003 19:59:52 |
|