Kamis, 20 Juli 2017

Re: [MS_AccessPros] Re: Dragging borderless form

 

While I'm looking (it's a bit busy at the moment), I can tell you the basics.


It was based on the clsFormInfo VBA Class from the Access Developers Handbook.

On a MouseDown event on a label on the form (could have been on the form but I was using a label as a titlebar so it looked right to click and drag the label acting as a titlebar.) The Form was assigned to a New clsFormInfo instance and the X,Y coordinates were saved.

Then, the MouseMove event of the label (again, could have been the form) was used to move the form relative to the old X,Y coordinates.

MouseUp Event released the clsFormInfo and stopped the magic.

As you can see, the magic all really happened inside the clsFormInfo from Ken Getz et al. Plus a sprinkling of my own special sauce.

clsFormInfo was/is awesome.

P.S. this was all using a 32-bit Access. I might have a go at a 64-bit version if no-one has done it yet.

Yours,
Andrew

__._,_.___

Posted by: yahoo@craven.de
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (9)

Have you tried the highest rated email app?
With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated email app on the market. What are you waiting for? Now you can access all your inboxes (Gmail, Outlook, AOL and more) in one place. Never delete an email again with 1000GB of free cloud storage.


.

__,_._,___

Tidak ada komentar:

Posting Komentar