DELPHI

Thread View: be.comp.programming

4 messages

[T] Back to Threads [V] Tree View [G] Group Articles

4 total messages Started by Ivan Van den Bossche Fri, 21 Feb 2003 08:47

#5864

Author: Ivan Van den Bossche
Date: Fri, 21 Feb 2003 08:47

7 lines
1175 bytes

Hi,

Ik heb een vraagje ivm Delphi.  Hoe kan ik op een eenvoudige manier een
Delphi programma enkele seconden laten wachten vooraleer verder te gaan?

Alvast bedankt
Ivan

Re: DELPHI

#5865

Author: Rene A
Date: Fri, 21 Feb 2003 09:08

33 lines
1753 bytes

"Ivan Van den Bossche" <i.vandenbossche@vinke.com> schreef in bericht
news:3e55e6d0$0$81502$ba620e4c@news.skynet.be...
> Hi,
>
> Ik heb een vraagje ivm Delphi.  Hoe kan ik op een eenvoudige manier een
> Delphi programma enkele seconden laten wachten vooraleer verder te gaan?
>

Het kan met  :

Sleep(1000); // 1 sec pauze

Alleen is dat niet zo'n mooie manier omdat voor deze pauze 100%
processortijd word gebruikt, Beter kun je dit gebruiken :

Procedure TForm1.Pauze(Tijdje:LongInt);
var
 T: LongInt;
begin
 T := GetTickCount + Tijdje;
 repeat
  Application.ProcessMessages;
 until T <= GetTickCount;
end;

Pauze(1000); // 1 sec. pauze


--

Rene
Http//www.EasyFactuur.com

Re: DELPHI

#5866

Author: Keyser Soze
Date: Fri, 21 Feb 2003 09:25

17 lines
1738 bytes

"Ivan Van den Bossche" <i.vandenbossche@vinke.com> wrote in message
news:3e55e6d0$0$81502$ba620e4c@news.skynet.be...
> Hi,
>
> Ik heb een vraagje ivm Delphi.  Hoe kan ik op een eenvoudige manier een
> Delphi programma enkele seconden laten wachten vooraleer verder te gaan?

De beste manier is met een timer.
Delphi bevat een TTimer control, waarvan je het Interval kan instellen.
Na deze tijd vuurt de control een OnTimer event af.
Vergeet daarna niet de Enabled property van de timer af te zetten,
als het maar een eenmalig gebeuren is.

Als je de Windows API wil gebruiken, moet je eens kijken naar de
SetTimer en KillTimer API functies.

Keyser Soze

Re: DELPHI

#5867

Author: Carlo Kok
Date: Fri, 21 Feb 2003 09:54

11 lines
1402 bytes

Ivan Van den Bossche wrote:

> Hi,
> 
> Ik heb een vraagje ivm Delphi.  Hoe kan ik op een eenvoudige manier een
> Delphi programma enkele seconden laten wachten vooraleer verder te gaan?

sleep(1000); // wacht 1 seconden, maar de applicatie bevriest dan.


Carlo Kok

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads