to properly help we'd really need to have an understanding of what your wait loop is waiting for, and how its waiting.. <br><br>you are most likely causing a deadlock where the handle message is passing it to something else that could be waiting for your wait to complete. The handle message could be forcing your code to act out of turn..<br>
<br>so without knowing why you are waiting, and for what.. as well as what you want handled the reasons could be numerous.<br><br><div class="gmail_quote">On Thu, Jul 28, 2011 at 11:09 PM, Ross Levis <span dir="ltr"><<a href="mailto:ross@stationplaylist.com">ross@stationplaylist.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"><div link="blue" vlink="purple" lang="EN-NZ"><div><p class="MsoNormal"><span style="font-size:12.0pt;color:#1F497D">I’m using the following code inside a wait loop so that most messages are processed except for some mouse and keyboard messages (I think) which I don’t want to be processed. It’s working perfectly here but for another user it hangs indefinitely.<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;color:#1F497D"><u></u> <u></u></span></p><p class="MsoNormal"><span style="font-size:12.0pt;color:#1F497D">If PeekMessage(Msg, MainForm.Handle , 0, 0, PM_NOREMOVE) and<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;color:#1F497D"> ((Msg.message < 160) or ((Msg.message > 264) and (Msg.message < 512))<u></u><u></u></span></p><p class="MsoNormal"><span style="font-size:12.0pt;color:#1F497D"> or (Msg.message > 524)) then<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;color:#1F497D"> Application.HandleMessage;<u></u><u></u></span></p><p class="MsoNormal"><span style="font-size:12.0pt;color:#1F497D"><u></u> <u></u></span></p><p class="MsoNormal">
<span style="font-size:12.0pt;color:#1F497D">I use to have an Application.ProcessMessages but this was causing a problem which I can’t remember now, and this code fixed it.<u></u><u></u></span></p><p class="MsoNormal"><span style="font-size:12.0pt;color:#1F497D"><u></u> <u></u></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;color:#1F497D">Cheers.<u></u><u></u></span></p></div></div><br>_______________________________________________<br>
NZ Borland Developers Group - Delphi mailing list<br>
Post: <a href="mailto:delphi@delphi.org.nz">delphi@delphi.org.nz</a><br>
Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>
Unsubscribe: send an email to <a href="mailto:delphi-request@delphi.org.nz">delphi-request@delphi.org.nz</a> with Subject: unsubscribe<br></blockquote></div><br><br clear="all"><br>-- <br>Kyley Harris<br>Harris Software<br>
+64-21-671-821<br>