الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اين اجد خاصية Auto Redraw في .NET

بدأه هشام2011 في 9 يونيو 2011 · 2 رد · 563 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

ارجو مساعدتي في ايجاد

خاصية Auto Redraw

في .NET

انتظر مساعدتكم

#2

لم تعد موجودة

الرسم يتم من خلال الحدث Paint ويمكنك استخدام الخاصية DoubleBuffered لتجنب الاهتزازات أثناء عملية الرسم

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

feed.1.gif

#3

السلام عليكم ورحمه الله وبركاته

اخي استخدم الكود التالي لعمل خاصية ال AutoRedraw



Dim b As Bitmap
Dim _autoredraw As Boolean

Public Sub New()
InitializeComponent()
b = New Bitmap(Me.ClientSize.Width, Me.ClientSize.Height)
End Sub

Private Property AutoRedraw As Boolean
Get
Return _autoredraw
End Get
Set(ByVal value As Boolean)
_autoredraw = value
End Set
End Property

Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
If _autoredraw Then
Dim g As Graphics = MyBase.CreateGraphics()
g.DrawImage(b, 0, 0)
End If
End Sub

Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
If Me.ClientSize.Width > b.Width And Me.ClientSize.Height > b.Height Then
Dim c As New Bitmap(Me.ClientSize.Width, Me.ClientSize.Height)
Dim g As Graphics = Graphics.FromImage(c)
g.DrawImage(b, 0, 0)
b = c
g.Dispose()
End If
End Sub

Public Shadows Function CreateGraphics() As Graphics
If _autoredraw Then
Return Graphics.FromImage(b)
End If
Return MyBase.CreateGraphics()
End Function
End Class
Public Class Form1

.:: Wish to become better and better ::.

مواضيع مشابهة