Fecha actual Vie May 17, 2024 4:17 pm

Todos los horarios son UTC + 1 hora [ DST ]




Nuevo tema Responder al tema  [ 1 mensaje ] 
Autor Mensaje
NotaPublicado: Lun Sep 25, 2006 4:33 pm 

Registrado: Jue Jul 20, 2006 8:36 pm
Mensajes: 143
Ubicación: Bilbao
Estoy haciendome un programa que me descarga una pagina de internet. Usando la TCPClient es bastante facil ya que solo tiene 4 comandos emparejados asi:
open con close y read con write
Me he hecho el programa "mas o menos" asi y me funciona:

MessageDlg("Abriendo host")
TCPClient1:Open()
MessageDlg("Metiendo usuario")
TCPClient1:Write("USER "+Usuario:Caption+Chr(13)+chr(10))
MessageDlg("Metiendo contraseña")
TCPClient1:Write("PASS "+Password:Caption+Chr(13)+chr(10))

Para ver como se ejecuta paso a paso está bien, pero el problema está en que he de quitar los messagedlg() y no se como generar tiempo de espera entre el TCPClient1:Open() y el TCPClient1:Write() para que le de tiempo a TCPCLient1:Open() a ejecutarse completamente y estar abierto el puerto...

hay alguna funcion interna de windows que oblige a procesar los eventos pendientes? (en mi caso la meteria despues del Open() y antes del write()???

quedaria mas o menos asi:
MessageDlg("Abriendo host")
TCPClient1:Open()
ProcesaEventos()
TCPClient1:Write("USER "+Usuario:Caption+Chr(13)+chr(10))
ProcesaEventos()
TCPClient1:Write("PASS "+Password:Caption+Chr(13)+chr(10))
ProcesaEventos()

si no, se os ocurre como reprogramarlo para que funcione?

_________________
(C) Josu Udaondo...el fiera de clipper 5
Bilbao 2006


Arriba
 Perfil  
Responder citando  
Mostrar mensajes previos:  Ordenar por  
Nuevo tema Responder al tema  [ 1 mensaje ] 

Todos los horarios son UTC + 1 hora [ DST ]


No puede abrir nuevos temas en este Foro
No puede responder a temas en este Foro
No puede editar sus mensajes en este Foro
No puede borrar sus mensajes en este Foro
No puede enviar adjuntos en este Foro

Buscar:
Saltar a:  
cron