Link to home
Start Free TrialLog in
Avatar of Jenny Coulthard
Jenny CoulthardFlag for Australia

asked on

vb6 scroll bars windows api no longer works under windows 7

I have been using a class moduel from the website vbAccelerator.com which is fantastic at putting a scroll bar onto a Visual Basic form.
This code no longer works under windows 7 32bit.   I have tried running in compatability mode of windows xp.

I have attached a sample project the line where it falls over is AttachMessage Me, m_hWnd, WM_HSCROLL inside the pAttachMessages function.  I have only ever done basic api calls but cant even find any info relating to attachmessage

I am wondering if this is easy to fix.
project.zip
Avatar of CSI-Windows_com
CSI-Windows_com
Flag of United States of America image

I suspect this may be using window messaging to monitor controls.  If so, this would be blocked by a Windows 7 feature known as User Interface Process Isolation (UIPI).

The only way to open it up without disabling UAC is to use AppCompat to allow specific messages to pass.
ASKER CERTIFIED SOLUTION
Avatar of eemit
eemit
Flag of Germany image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of Jenny Coulthard

ASKER

Wow, I have to say I love this web-site.  I am supporting legacy code and when I came across this problem with running vb code on windows7 I thought I was in trouble, after wasting yesterday I asked the question and overnight I have two solutions both of which work.  I am accepting eemits answer as it uses the same vbAccelerator.com code I already have in my projects.  
thanks you for providing a working project.
I understand now that I can use the two subclass modules to replace the ssubtmr.dll.  And also found the attachmessage sub in these subclass modules.
thank you
excellent response, complete project
Not even a little taste? ;)
Thanks purbrick,
I'm glad I was able to help.
lol MartinLiss.  Normally I do share the points/love around but today I didnt.  I was too excited about the lack of work I needed to do to get exe up and running.
If eemit didn't mind you could ask for admin assistance, but no big deal.
OK, but does not have to be fifty fifty :-)
I don't need 50/50.
OK, so I can ask admin assistance to change to 20/80 but I am actually not sure how to do this.
I clicked the 'Request attention' link and asked the moderators to help you do it.