<div>
I don't know the nature of Your pause but maybe the use of TTimer would be good solution.<br />
<br />
It is also important what time periods do You need.
</div>


I don't know the nature of Your pause but maybe the use of TTimer would be good solution.

It is also important what time periods do You need.

<div>
<div class="content wysiwyg-content">
Hi,<br />
<br />
last question, then mi application is finished! ;-)<br />
<br />
Is there a possibility to pause my application without using a lot of CPU power or blocking it from taking any new commands?<br />
<br />
When I use &quot;sleep()&quot;, my application is blocked and doesn't take any new commands.<br />
<br />
And with:<br />
<br />
procedure TForm1.pause(time1: longword);<br />
var time2 : longword;<br />
begin<br />
&nbsp; &nbsp; &nbsp; time2 := GetTickCount;<br />
&nbsp; &nbsp; &nbsp; repeat<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Application.ProcessMessage<wbr />s;<br />
&nbsp; &nbsp; &nbsp; until (GetTickCount - time2 &gt;&nbsp;time1);<br />
end;<br />
<br />
CPU usage raises to 100% immediately. This is not very usefull, because I have a thread which is waiting for CPU usage to fall below a specific percentage...<br />
<br />
Any other ideas? thanks
</div>
</div>


Hi,

last question, then mi application is finished! ;-)

Is there a possibility to pause my application without using a lot of CPU power or blocking it from taking any new commands?

When I use "sleep()", my application is blocked and doesn't take any new commands.

And with:

procedure TForm1.pause(time1: longword);
var time2 : longword;
begin
      time2 := GetTickCount;
      repeat
                Application.ProcessMessages;
      until (GetTickCount - time2 > time1);
end;

CPU usage raises to 100% immediately. This is not very usefull, because I have a thread which is waiting for CPU usage to fall below a specific percentage...

Any other ideas? thanks

Pausing without using CPU power or blocking application

Delphi is the most powerful Object Pascal IDE and component library for cross-platform Native App Development with flexible Cloud services and broad IoT connectivity. It provides powerful VCL controls for Windows 10 and enables FMX development for Windows, Mac and Mobile. Delphi is your choice for ultrafast Enterprise Strong Development™. Look for increased memory for large projects, extended multi-monitor support, improved Object Inspector and much more. Delphi is 5x faster for development and deployment across multiple desktop, mobile, cloud and database platforms including 32-bit and 64-bit Windows 10.