<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css" style="display:none;"><!-- P {margin-top:0;margin-bottom:0;} --></style>
</head>
<body dir="ltr">
<div id="divtagdefaultwrapper" style="font-size:12pt;color:#000000;background-color:#FFFFFF;font-family:Calibri,Arial,Helvetica,sans-serif;">
<p>synchronising tools do not do what you want?</p>
<p><br>
</p>
<div style="color: rgb(33, 33, 33);">
<hr tabindex="-1" style="display:inline-block; width:98%">
<div id="divRplyFwdMsg" dir="ltr"><font style="font-size:11pt" color="#000000" face="Calibri, sans-serif"><b>De:</b> fpc-pascal-bounces@lists.freepascal.org <fpc-pascal-bounces@lists.freepascal.org> em nome de Xiangrong Fang <xrfang@gmail.com><br>
<b>Enviado:</b> quarta-feira, 25 de fevereiro de 2015 12:33<br>
<b>Para:</b> FPC-Pascal users discussions<br>
<b>Assunto:</b> Re: [fpc-pascal] Use sleep in thread</font>
<div> </div>
</div>
<div>
<div dir="ltr">
<div class="gmail_default" style="font-family:monospace,monospace; font-size:large">
<span style="font-family:arial,sans-serif; font-size:small">2015-02-25 23:16 GMT+08:00
</span><span dir="ltr" style="font-family:arial,sans-serif; font-size:small"><<a href="mailto:hinstance@yandex.ru" target="_blank">hinstance@yandex.ru</a>></span><span style="font-family:arial,sans-serif; font-size:small">:</span><br>
</div>
<div class="gmail_extra">
<div class="gmail_quote">
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex; border-left-width:1px; border-left-color:rgb(204,204,204); border-left-style:solid; padding-left:1ex">
not sure if this helps, but:<br>
for example, if you want thread T to run using approx. 70% of max. available capacity, try this:<br>
<br>
repeat<br>
T.Resume;<br>
Sleep(70);<br>
T.Resume;<br>
Sleep(30);<br>
until ...<br>
</blockquote>
<div><br>
</div>
<div>
<div class="gmail_default" style="font-family:monospace,monospace; font-size:large; display:inline">
This seems not what I want. I would like to schedule it from within the thread. My demo program is here:</div>
</div>
<div>
<div class="gmail_default" style="font-family:monospace,monospace; font-size:large; display:inline">
<br>
</div>
</div>
<div>
<div class="gmail_default" style="font-family:monospace,monospace; font-size:large; display:inline">
<a href="https://github.com/xrfang/fpcollection/blob/master/src/demos/asyncdo/demo.lpr">https://github.com/xrfang/fpcollection/blob/master/src/demos/asyncdo/demo.lpr</a></div>
</div>
<div>
<div class="gmail_default" style="font-family:monospace,monospace; font-size:large; display:inline">
<br>
</div>
</div>
<div>
<div class="gmail_default" style="font-family:monospace,monospace; font-size:large; display:inline">
TAsyncDo is the class I wrote to have a procedure run in parallel. </div>
</div>
<div>
<div class="gmail_default" style="font-family:monospace,monospace; font-size:large; display:inline">
<br>
</div>
</div>
<div>
<div class="gmail_default" style="font-family:monospace,monospace; font-size:large; display:inline">
I want to control priority of the thread from within the worker, not from the main thread. </div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</body>
</html>