تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف تشكل الفورم طبقا لأى صورة تريدها بدون اى عناء اعتمادا على صورة لديك
#1
كاتب الموضوع : egyption-coder


كود :
[SIZE=2][COLOR=#0000ff]
Public[/COLOR][/SIZE][SIZE=2][color=#0000ff]Class[/color][/SIZE][SIZE=2] Form2
[/SIZE][SIZE=2][COLOR=#008000]' ?àه ?é*ي©، ?éêلéي ،
[/COLOR][/SIZE][SIZE=2][color=#0000ff]Dim[/color][/SIZE][SIZE=2] _skin [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]New[/color][/SIZE][SIZE=2] Bitmap([/SIZE][SIZE=2][color=#0000ff]My[/color][/SIZE][SIZE=2].Resources.Resource1.Alens___01)
[/SIZE][SIZE=2][COLOR=#008000]' ?«¢¦§ê ?é api é¢م§ïé ?éهي©ê
[/COLOR][/SIZE][SIZE=2][color=#0000ff]Private[/color][/SIZE][SIZE=2][color=#0000ff]Declare[/color][/SIZE][SIZE=2][color=#0000ff]Sub[/color][/SIZE][SIZE=2] ReleaseCapture [/SIZE][SIZE=2][color=#0000ff]Lib[/color][/SIZE][SIZE=2][color=#a31515]"user32"[/color][/SIZE][SIZE=2] ()
[/SIZE][SIZE=2][color=#0000ff]Private[/color][/SIZE][SIZE=2][color=#0000ff]Declare[/color][/SIZE][SIZE=2][color=#0000ff]Sub[/color][/SIZE][SIZE=2] SendMessage [/SIZE][SIZE=2][color=#0000ff]Lib[/color][/SIZE][SIZE=2][color=#a31515]"user32"[/color][/SIZE][SIZE=2][color=#0000ff]Alias[/color][/SIZE][SIZE=2][color=#a31515]"SendMessageA"[/color][/SIZE][SIZE=2] ([/SIZE][SIZE=2][color=#0000ff]ByVal[/color][/SIZE][SIZE=2] _
hWnd [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]Integer[/color][/SIZE][SIZE=2], [/SIZE][SIZE=2][color=#0000ff]ByVal[/color][/SIZE][SIZE=2] wMsg [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]Integer[/color][/SIZE][SIZE=2], [/SIZE][SIZE=2][color=#0000ff]ByVal[/color][/SIZE][SIZE=2] wParam [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]Integer[/color][/SIZE][SIZE=2], _
[/SIZE][SIZE=2][color=#0000ff]ByVal[/color][/SIZE][SIZE=2] lParam [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]Integer[/color][/SIZE][SIZE=2])
[/SIZE][SIZE=2][color=#0000ff]Private[/color][/SIZE][SIZE=2][color=#0000ff]Const[/color][/SIZE][SIZE=2] WM_NCLBUTTONDOWN [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]Integer[/color][/SIZE][SIZE=2] = &HA1
[/SIZE][SIZE=2][color=#0000ff]Private[/color][/SIZE][SIZE=2][color=#0000ff]Const[/color][/SIZE][SIZE=2] HTCAPTION [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]Integer[/color][/SIZE][SIZE=2] = 2

[/SIZE][SIZE=2][COLOR=#008000]' م©ه ImageAttributes object ي color key é?م§?§ ?éهي©ê
[/COLOR][/SIZE][SIZE=2][color=#0000ff]Dim[/color][/SIZE][SIZE=2] lowerColor [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2] Color = Color.Magenta
[/SIZE][SIZE=2][color=#0000ff]Dim[/color][/SIZE][SIZE=2] upperColor [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2] Color = Color.Magenta
[/SIZE][SIZE=2][color=#0000ff]Dim[/color][/SIZE][SIZE=2] attr [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]New[/color][/SIZE][SIZE=2] System.Drawing.Imaging.ImageAttributes
[/SIZE][SIZE=2][color=#0000ff]Protected[/color][/SIZE][SIZE=2][color=#0000ff]Overrides[/color][/SIZE][SIZE=2][color=#0000ff]Sub[/color][/SIZE][SIZE=2] OnPaint([/SIZE][SIZE=2][color=#0000ff]ByVal[/color][/SIZE][SIZE=2] e [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2] System.Windows.Forms.PaintEventArgs)
[/SIZE][SIZE=2][color=#0000ff]MyBase[/color][/SIZE][SIZE=2].OnPaint(e)
[/SIZE][SIZE=2][COLOR=#008000]' م©ه graphic object
[/COLOR][/SIZE][SIZE=2][color=#0000ff]Dim[/color][/SIZE][SIZE=2] bmp [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]New[/color][/SIZE][SIZE=2] Bitmap(_skin)
[/SIZE][SIZE=2][color=#0000ff]Dim[/color][/SIZE][SIZE=2] g [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2] Graphics = Graphics.FromImage(bmp)
[/SIZE][SIZE=2][COLOR=#008000]' çê ?م§?§ transparency color key مéî ?مéî è«é هî ?éï«?©
[/COLOR][/SIZE][SIZE=2][COLOR=#008000]' of the image (maneta color).
[/COLOR][/SIZE][SIZE=2]attr.SetColorKey(lowerColor, upperColor)

[/SIZE][SIZE=2][COLOR=#008000]' ?©«ê ?é*ي©، ë?? مéî ?é*ي©، ?éꥧ§،
[/COLOR][/SIZE][SIZE=2][color=#0000ff]Dim[/color][/SIZE][SIZE=2] dstRect [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]New[/color][/SIZE][SIZE=2] Rectangle(0, 0, bmp.Width, bmp.Height)
e.Graphics.DrawImage(bmp, dstRect, 0, 0, bmp.Width, bmp.Height, _
GraphicsUnit.Pixel, attr)
[/SIZE][SIZE=2][color=#0000ff]End[/color][/SIZE][SIZE=2][COLOR=#0000ff]Sub
[/COLOR][/SIZE][SIZE=2][color=#0000ff]Private[/color][/SIZE][SIZE=2][color=#0000ff]Sub[/color][/SIZE][SIZE=2] Form2_MouseDown([/SIZE][SIZE=2][color=#0000ff]ByVal[/color][/SIZE][SIZE=2] sender [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2][color=#0000ff]Object[/color][/SIZE][SIZE=2], [/SIZE][SIZE=2][color=#0000ff]ByVal[/color][/SIZE][SIZE=2] e [/SIZE][SIZE=2][color=#0000ff]As[/color][/SIZE][SIZE=2] System.Windows.Forms.MouseEventArgs) [/SIZE][SIZE=2][color=#0000ff]Handles[/color][/SIZE][SIZE=2][color=#0000ff]Me[/color][/SIZE][SIZE=2].MouseDown
[/SIZE][SIZE=2][COLOR=#008000]' ?©هم?éهي©ê
[/COLOR][/SIZE][SIZE=2][color=#0000ff]If[/color][/SIZE][SIZE=2] e.Button = MouseButtons.Left [/SIZE][SIZE=2][COLOR=#0000ff]Then
[/COLOR][/SIZE][SIZE=2]ReleaseCapture()
SendMessage([/SIZE][SIZE=2][color=#0000ff]Me[/color][/SIZE][SIZE=2].Handle.ToInt32, WM_NCLBUTTONDOWN, HTCAPTION, 0&)
[/SIZE][SIZE=2][color=#0000ff]End[/color][/SIZE][SIZE=2][COLOR=#0000ff]If
[/COLOR][/SIZE][SIZE=2][color=#0000ff]End[/color][/SIZE][SIZE=2][COLOR=#0000ff]Sub
[/COLOR][/SIZE]
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  البرنامج بعد وضعه في صورة exe لا يتعامل مع قاعدة البيانات محمد خلف زكي 0 95 04-08-16, 05:10 AM
آخر رد: محمد خلف زكي
  @@@ استخدام دوال مكتبة من ملف DLL بدون إضافته كمرجع Reference @@@ @@أبورائد@@ 6 1,796 27-07-15, 04:44 AM
آخر رد: ابو ابراهيم
  مثال تحريك الفورم من غير اطار RaggiTech 0 669 17-10-12, 10:00 PM
آخر رد: RaggiTech
  كيفية عمل صورة - مدورة - Rouded PictureBox ! RaggiTech 0 737 17-10-12, 09:55 PM
آخر رد: RaggiTech
  تدوير صورة حول مركزها باستخدام gdi+ RaggiTech 0 634 17-10-12, 09:30 PM
آخر رد: RaggiTech
  منع أغلاق الفورم عن طريق(×)وأغلاقه بطريقة جميلة RaggiTech 0 612 17-10-12, 09:02 PM
آخر رد: RaggiTech
  مثال للحفاظ على تنسيق الاداوت اثناء تكبير الفورم في الفيجول دوت نت 2008 RaggiTech 0 962 17-10-12, 08:40 PM
آخر رد: RaggiTech
  نسخ صورة النافذه المفتوحه Screen capture RaggiTech 0 362 17-10-12, 08:27 PM
آخر رد: RaggiTech
  اغلاق الفورم بطريقة جميلة RaggiTech 0 489 17-10-12, 08:22 PM
آخر رد: RaggiTech
  تعلم كيف تفتح صورة من رابط داخل ال Picture box RaggiTech 0 476 17-10-12, 08:21 PM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم