نحوه چسبناک کردن لبه های فرم در VB6 !!

[butterfly8528]

سلام دوستان و اساتید عزیز .

حتما بارها برنامه هایی مانند KM Player و ... را دیده اید که لبه های فرم های آن به یک دیگر و گوشه های محیط کاری می چسبند .

سورس کد ضمیمه شده نحوه انجام این کار رو در VB6 به شما آموزش خواهد داد . :کف:

موفق و پیروز باشید .

[night_secret]

سلام میشه کمی در باره ی کدش توضی بدی ممنون

[butterfly8528]

سلام میشه کمی در باره ی کدش توضی بدی ممنونسلام دوست عزیز .

اگه کمی توجه می کردید مشخص بود که نویسنده کد من نیستم و سورس کد از Planet-Source-code دانلود شده .



'================================================= =======================================
' Class: cMagneticWnd.cls
' Author: Carles P.V. - ©2004 (*)
' Dependencies:
' Last revision: 2004.11.30
' Version: 1.0.8
'----------------------------------------------------------------------------------------
'
' (*) 1. Code based on original post by Benjamin Wilger:
'
' Magnetic Forms
' http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=27489&lngWId=1
'
' 2. Self-Subclassing UserControl/Class template (IDE safe) by Paul Caton:
'
' Self-subclassing Controls/Forms - NO dependencies (v1.1.0010 2004.10.07)
' http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=54117&lngWId=1
'----------------------------------------------------------------------------------------
به هر حال در هر قسمت از کد های کلاس توضیحاتی به زبان انگلیسی نوشته شده که میتونید استفاده کنید .

موفق باشید .