Path: csiph.com!v102.xanadu-bbs.net!xanadu-bbs.net!feeder.erje.net!eu.feeder.erje.net!news.stack.nl!aioe.org!.POSTED!not-for-mail From: Deanna Earley Newsgroups: microsoft.public.vb.general.discussion,comp.lang.basic.visual.misc Subject: Re: PBM_SETMARQUEE in VB6 Date: Tue, 10 Dec 2013 12:28:31 +0000 Organization: Aioe.org NNTP Server Lines: 39 Message-ID: References: NNTP-Posting-Host: rjApkXnSOjrT83QpZ8fKqg.user.speranza.aioe.org Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8; format=flowed Content-Transfer-Encoding: 7bit X-Complaints-To: abuse@aioe.org User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:24.0) Gecko/20100101 Thunderbird/24.1.1 X-Notice: Filtered by postfilter v. 0.8.2 Xref: csiph.com comp.lang.basic.visual.misc:1912 On 10/12/2013 12:02, David Youngblood wrote: > "Deanna Earley" wrote in message > news:l86ue8$bv1$1@speranza.aioe.org... >> On 10/12/2013 11:00, MikeD wrote: >>>> Does anyone have any deeper insight as to why the VB wrapper is >>>> dropping the PBM_SETMARQUEE message or the associated timer events and >>>> why I need to do it "manually"? >>> >>> OK. Did you actually *start* the timer? The below code worked fine for >>> me, and this was within the IDE (with a VB6.exe.manifest file). >> >> You misunderstand, the timer method works. My problem was with the >> PBM_SETMARQUEE message that runs a timer internally in the progress bar >> window/control. >> >> I am using the extra timer as a workaround for now. > > I tested your code on XP (without the timer) and it works as documented. I > can change the interval via the last parameter. Only when I move the > compiled app to Win7 it fails to animate. Interesting, thanks for that. > Your workaround may be your only alternative, but you may want to > restrict it the later OS's as including the timer on XP doubles the > speed. I've removed the call to PBM_SETMARQUEE in favour of an external timer for now so should run at "normal" speed. -- Deanna Earley (dee.earley@icode.co.uk) iCatcher Development Team http://www.icode.co.uk/icatcher/ iCode Systems (Replies direct to my email address will be ignored. Please reply to the group.)