- This topic has 12 replies, 2 voices, and was last updated 14 years, 9 months ago by HeDiBo.
-
AuthorPosts
-
January 19, 2010 at 1:16 pm #33507HeDiBoParticipant
Putting Application.ProcessMessages inside the OnPaint event of a form will hang the application. See [attachment=3687:AuSync.rar]
January 19, 2010 at 2:56 pm #41467HeDiBoParticipantThis problem has more ramifications: if during the paint event, a dialog is created, that dialog is not shown
January 26, 2010 at 3:39 pm #41500HeDiBoParticipantI think there is more to it. I have removed the Application.ProcessMessages and the OnPaint event. Now, many times, when I start the application it does not show the initial screen and appears to be hanging (at least in the debugger of the Delphi development environment). Only a process reset and restart will fix it, albeit a few restarts may be needed.
Debugging reveals the application is looping in the windows message retrieval loop. In other words: some needed message has not arrived.
I consider this a serious bugJanuary 27, 2010 at 4:00 pm #41520HeDiBoParticipantSerge, Did you have a chance to look at this one?
January 28, 2010 at 12:33 pm #41529SupportKeymasterHello
I'm sorry for delay, all topics are answered in order from bottom (from old topics) to top of the list…
Cause of your problem in a form animation. Set sSkinManager1.AnimEffects.FormShow.Active to False and looping will not be occured in this case.January 28, 2010 at 4:13 pm #41533HeDiBoParticipantIs this the solution? Or is it a bug (I would say it's a bug)
February 1, 2010 at 2:06 pm #41554HeDiBoParticipantIs this the solution? Or is it a bug (I would say it's a bug) <img src="style_emoticons//happy.gif” style=”vertical-align:middle” emoid=”^_^” border=”0″ alt=”happy.gif” />
In the new release (6.54), this bug has become horrible. I cannot debug my project anymore! It simply hangs on startup. I have set the sSkinManager1.AnimEffects.FormShow.Active to False. It doesn't help.It appears to have to do with a form that's autocreated in the DPR file. If I create that form dynamically in the main form there's no problem.
The form in question contains among others a custom form resizer, that resizes the form and all its controls dynamically upon request. The resize operation is not done though; only the current size is saved at the form create time.
This is the open source form resizer: [attachment=3726:EasySize.rar]
HELP <img src="style_emoticons//huh.gif” style=”vertical-align:middle” emoid=”:huh:” border=”0″ alt=”huh.gif” />February 2, 2010 at 7:19 am #41559SupportKeymasterHello
In the v6.54 the problem with OnPaint must be solved, your demo was tested in several Delphi versions and haven't the problem now (animation state is not important now).
I have installed TFormResizer and check it too, but can't receive an issue. How you are using this component? Could you help me to reproduce the problem?February 2, 2010 at 11:10 am #41567HeDiBoParticipantQUOTE (Support @ Feb 2 2010, 08:19 AM) <{POST_SNAPBACK}>I have installed TFormResizer and check it too, but can't receive an issue. How you are using this component? Could you help me to reproduce the problem?
Here is a test application that hangs when started (with Run) from the IDE of Delphi 7.I think the problem is more in another component: AuAniBmp. If I remove that one from the Aura_messager form the problem disappears.
So, I've included that component. And the ThreadedTimer it uses. I think it's complete now, but if you miss something please let me know.Remember, the problem only appears if you run the application from the IDE under the Delphi debugger. Not if you start it stand-alone.
[attachment=3732:AppHang.rar]February 2, 2010 at 11:29 am #41569SupportKeymasterThank you.
What is TBCBitmap? (abort_icon: TBCBitmap;)February 2, 2010 at 1:59 pm #41577HeDiBoParticipantQUOTE (Support @ Feb 2 2010, 12:29 PM) <{POST_SNAPBACK}>Thank you.
What is TBCBitmap? (abort_icon: TBCBitmap;)
Don't worry, just replace it with a standard bitmap.February 2, 2010 at 2:52 pm #41578HeDiBoParticipantI'm getting a bit nearer to the problem.
If you place an extra statement in the DPR file like this:SetProcessAffinityMask(GetCurrentProcess, 1);
and add ause Windows,
to the top, the problem goes away.
This is a problem occurring with hyperthreaded CPU's and Delphi 7.So, unless you have a hyperthreaded CPU, you cannot reproduce it!
Now that I found it, I don't think AlphaControls is to blame. Just because it incurs extra processing this old bug resurfaces.
February 5, 2010 at 4:02 pm #41619HeDiBoParticipantUnfortunately, despite all measures I took, the program still appears to be hanging sometimes at start-up.
AuthorPostsViewing 13 posts - 1 through 13 (of 13 total)- You must be logged in to reply to this topic.