Walter, boa tarde,
O propósito é o seguinte: Estou desenvolvendo um CLC em software. O cara digita a hora de início de acionamento do dispositivo e digita a duração em minutos e segundos. Acontece, que se o cara (no caso o usuário) definir o tempo muito grande e quiser parar o programa porque digitou errado, não vai conseguir pelas vias normais. Então quero colocar uma condição no sleep para testar, e que se acionada, sair do sleep. Expliquei? Magine que o cara coloca 200 minutos, como clicou em acionar o CLC, vai clicar até nas estrelas e o programa não vai reagir. Tendeu? Abs Roberto(RJ) Em tempo, se eu substituir por Ttime e testar em cada segundo acho que consigo, queria é no sleep pois já to adiantado com a programação De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Walter Chagas (Bol) Enviada em: sexta-feira, 3 de abril de 2009 15:53 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Interromper o sleep(Duracao); Roberto, Qual o propósito disto? Te pergunto porque voce nos descrevendo o proposito da rotina dá pra gente ver o que pode lhe ser proposto a nível de solução mesmo ou alternativas. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br <mailto:wchagasj%40bol.com.br> http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com <mailto:whitesockets%40hotmail.com> SKYPE: WalterChagasJr ----- Original Message ----- From: Roberto To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> Sent: Friday, April 03, 2009 12:06 PM Subject: RES: [delphi-br] Interromper o sleep(Duracao); Pois é Guedes, se usar TTime e o que vc disse dá certo, mas tem forma sim de fazer isto, só que eu não sei. Valew, Abc. Roberto ///////////////////////////////////// Isso não é possível, creio eu (vai saber né?) Eu sugiro que você crie uma procedure personalizada, que receba, por exemplo, um ponteiro para um Boolean, que quando se tornar false interrompe a execução. Imagem removida pelo remetente. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]