Visual Basic Online Course - Round and Transparent Form Part 3
بعد أن انتهينا من أكواد شاشة frmTranspForm أكواد شاشة frmShapedForm تعريف متغير mChildFormRegion نوعه Long - أكواد الحدث Form_Load : تعريف المتغير i تحديد خصية WindowState للفورم كى تكون vbNormal قيمة الـ TextBox . جملة شرط ..... mShape هو متغير عرفناه فى الموديول سابقا Integer و تحدد قيمته فى الفورم الاولى frmTranspForm فى الـ Command4 حيث يعبر عن قيمة شكل الفورم ... و هنا جملة الشرط : - اذا كان mShape = صفر .... اى اذا كان الزر المضغوط عليه هو Index = 0 للـ Command4 باسم Shape1 - نفذ على التوالى الاتى ... (x,y) هما الجزء العلوى على اليسار و هما الجزء السفلى على اليمين و حذف الطول و العرض !! - المتغير mChildFormRegion الذى تم تعريفه فى General Declaration لهذه الفورم و نوعه Long يساوى قيمة الداله CreateRoundRectRgn و هى داله تم شرحها فى الموديول و وظيفتها عمل منطقة مستطيله دائرية الاطراف و معاملاتها هى نفس معاملات الداله CreateRectRgn التى تم شرحها فى الفورم الأولى ... حيث : - الركن ال...