فرم با شکل دلخواه

[lord_viper]

این مقاله به معرفی یک ActiveX می پردازد که به ما اجازه می دهد فرمهایی با اشکال گوناگون و بر خلاف شکل مستطیل شکل معمول بسازیم. گر چه ما می توانیم این کار و بسیاری از تکنیکهای پیچیده برنامه نویسی ویژوال که به طور معمول در ساختار دستور زبانهای برنامه نویسی ویژوال مانند Visual Basic یا Delphi نمی گنجد را با توابع Windows API انجام دهیم لیکن در مواردی به دلیل پیچیدگی نحوه استفاده و همپنین مفهوم کاربردی این توابع , می توان کامپوننتهای ActiveX ای یافت که کار مورد نظر ما را به شکل ساده تری انجام دهد .

کامپوننت مورد بحث در این مقاله IrregForm نام دارد که به فایل IrregForm.ocx اشاره می کند و ما را قادر می سازد فرمهایی با اشکال غیر معمول بسازیم .
نحوه استفاده :
ابتدا باید شکل فرم دلخواه خود را بصورت عکس با فرمت bmp طراحی کنیم و آنرا به خاصیت Picture فرم ویژوال بیسیک انتساب دهیم.

خصوصیت BorderStyle فرم را صفر کنیم.
فرم را هم سایز عکس کنیم.
خاصیت TransparentColor کامپوننت IrregForm را معادل رنگی از عکس که میخواهید Transparent شود قرار دهید.
برنامه را اجرا کنید.
اگر خاصیت AllowFormDrag کامپوننت IrregForm را True کنیم می توانیم فرم را به طور اتوماتیک Drag کنیم.
اگر بخواهیم با کلیک بر روی یک کنترل از فرم مثلآ یک Label فرم Drag شود باید در رویداد MouseDown آن کنترل متد DragNow کامپوننت IrregForm را فراخوانی کنیم.
من یک برنامه نمونه را با VB تهیه کرده ام که در صورت تمایل می توانید آنرا Download کنید. ضمنآ در این برنامه چند الگوریتم زمانبندی سیستم عامل شبیه سازی شده است که ارتباطی با مورد بحث این مقاله ندارد.
برای استفاده از این برنامه نمونه باید ابتدا کامپوننت های IrregForm.ocx و HotButton.ocx را در ویژوال بیسیک Load کنید
دانلود