Thanks, David. All these years and I never thought to play with the TitleBar property. That sparked an idea for something else. Thanks for pointing me in the right direction.
-- Andrew Baker P&E Project Administration P&G Gillette Company 617.463.3024 (voice) 617.463.3783 (fax) Starnet: 420-3024 E-mail: [email protected] OASIS blog: http://blogs.pg.com/oasis -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of Dave Crozier Sent: Friday, December 11, 2009 10:06 AM To: 'ProFox Email List' Subject: RE: VFP 9 Form BorderStyle Property Andrew, These settings are only effective if the title Bar is turned off. In which case: BorderStyle=2 - Fixed Dialogue gives a border around the form BorderStyle=3 - Sizeable - As per 2 but allows sizing BorderStyle=0 - Removes the Border completely Take care if removing the titlebar as you won't be able to move or close the form. If you need to move the form then place the following code in the mousedown event of the form: ******* * Start Code * LPARAMETERS nButton, nShift, nXCoord, nYCoord DECLARE Long ReleaseCapture IN WIN32API DECLARE Long SendMessage IN WIN32API ; Long HWND, Long wMsg, Long wParam, Long Lparam #DEFINE WM_SYSCOMMAND 0x112 #DEFINE WM_LBUTTONUP 0x202 #DEFINE MOUSE_MOVE 0xf012 IF nButton = 1 && LMB = ReleaseCapture() * Complete left click by sending 'left button up' message = SendMessage(Thisform.HWnd, WM_LBUTTONUP, 0x0, 0x0) * Initiate Window Move = SendMessage(Thisform.HWnd, WM_SYSCOMMAND, MOUSE_MOVE, 0x0) Endif * Return * * End Code ************ Dave Crozier _______________________________________________ Post Messages to: [email protected] Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[email protected] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
