Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-04-2012
escorpionrojo43 escorpionrojo43 is offline
Miembro
 
Registrado: abr 2010
Posts: 89
Poder: 14
escorpionrojo43 Va por buen camino
Problemas al utilizar sleep

Hola Compañeros del foro
Estoy realizando un proyecto de prueba para el puerto lpt1
el asunto es el siguiente.
Código Delphi [-]
procedure TForm1.Button10Click(Sender: TObject);
var x,i,tiempo,numero:integer;
begin
tiempo := strtoint(edit3.Text); //tiempo que tardara en espera para repetir 
numero := strtoint(edit2.Text);// es la cantidad de numeros que va a contar
    for i := 0 to numero do
    begin
      Out32($378,i);
      label2.Caption := inttostr(i);  // aqui tiene que mostrarme valor de (i) pero se friza el programa y solo veo el valor final del conteo
      Sleep(tiempo); //tiempo que tardara en espera para repetir
    end;
end;

el asunto es que al utilizar sleep(tiempo) el programa no responde pero si hace su trabajo con el puerto osea envia los datos. necesito que el programa siga respondiendo por si deseo detener el contador o pausarlo. espero me den una manito con esto.
Responder Con Cita
  #2  
Antiguo 12-04-2012
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Cita:
Empezado por escorpionrojo43 Ver Mensaje
Hola Compañeros del foro
Estoy realizando un proyecto de prueba para el puerto lpt1
el asunto es el siguiente.
Código Delphi [-]
procedure TForm1.Button10Click(Sender: TObject);
 var x,i,tiempo,numero:integer;
 begin tiempo := strtoint(edit3.Text); //tiempo que tardara en espera para repetir
  numero := strtoint(edit2.Text);// es la cantidad de numeros que va a contar 
    for i := 0 to numero do    
 begin
Application.ProcesMessages;
 Out32($378,i);     
  label2.Caption := inttostr(i);  // aqui tiene que mostrarme valor de (i) pero se friza el programa y solo veo el valor final del conteo
       Sleep(tiempo); //tiempo que tardara en espera para repetir 
    end; 
end;


el asunto es que al utilizar sleep(tiempo) el programa no responde pero si hace su trabajo con el puerto osea envia los datos. necesito que el programa siga respondiendo por si deseo detener el contador o pausarlo. espero me den una manito con esto.
Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #3  
Antiguo 12-04-2012
Avatar de javier7ar
javier7ar javier7ar is offline
Miembro
 
Registrado: abr 2006
Ubicación: Argentina
Posts: 124
Poder: 18
javier7ar Va por buen camino
yo pondria el Application.ProcesMessages; antes del Sleep, despues de haber actualizado el label

Igualmente, si te interesa saber todos los nros que lees, yo los pondria en un memo, asi te quedan todos los nros.

Saludos
Responder Con Cita
  #4  
Antiguo 14-04-2012
escorpionrojo43 escorpionrojo43 is offline
Miembro
 
Registrado: abr 2010
Posts: 89
Poder: 14
escorpionrojo43 Va por buen camino
Gracias chicos ya lo había encontrado, pero muchas gracias por el aporte, es bueno contar con su ayuda.
bueno pero el único detalle es que tiene el retaso de 1 segundo osea que lo pauso en el 3 y se detiene al llegar a 4
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
ASM En delphi - Me ayudan? (Sleep) MarkPwn ASM y Microcontroladores 6 03-07-2011 19:15:02
Sleep/delay? nena_yei OOP 6 22-07-2010 17:41:47
Hacer una pausa fuera del evento OnTimer y sin usar Sleep DarkByte Varios 9 28-06-2007 05:08:00
problemas para utilizar mas de 2GB de RAM Eolo Windows 2 21-11-2006 14:55:55
emular SLEEP o wait de C jymy788 Varios 3 18-09-2004 17:31:23


La franja horaria es GMT +2. Ahora son las 10:13:25.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi