20-05-20, 03:27 AM
السلام عليكم و رحمة الله و بركاته
الطريقة سلسة مع DX
اولاً ترقيم الاسطر :
ضع هذا الكود في بداية النموذج لتوسيع مساحة Header لنتمكن من رؤية الارقام
يوجد اكثر من طريقة , كما يمكنك التحكم بخصائص الخط من اللون و الحجم و غيرها , و يمكنك وضع صور , و اخفاء و اظهار المؤشر
ثانياً:اضافة اسطر
بالتوفيق ان شاء الله
الطريقة سلسة مع DX
اولاً ترقيم الاسطر :
ضع هذا الكود في بداية النموذج لتوسيع مساحة Header لنتمكن من رؤية الارقام
PHP كود :
GridView1.IndicatorWidth = 40
PHP كود :
'ترقيم الاسطر
Private Sub GridView1_CustomDrawRowIndicator(sender As Object, e As RowIndicatorCustomDrawEventArgs) Handles GridView1.CustomDrawRowIndicator
If e.RowHandle >= 0 Then
e.Info.DisplayText = e.RowHandle + 1
End If
'طريقة ثانية
Dim view As GridView = TryCast(sender, GridView)
If view.IsDataRow(e.RowHandle) Then
'تنسيقات للخط
e.Info.Appearance.Font = New Font("Arial", 10, FontStyle.Bold)
e.Info.Appearance.Options.UseFont = True
e.Info.Appearance.Options.UseFont = True
e.Info.Appearance.TextOptions.RightToLeft = True
e.Info.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Center
e.Info.Appearance.ForeColor = Color.Red
e.Info.DisplayText = (view.GetVisibleIndex(e.RowHandle) + 1).ToString()
e.Info.ImageIndex = -1
End If
End Sub
PHP كود :
'اضافة سطر جديد
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
GridView1.AddNewRow()
GridView1.SetRowCellValue(GridView1.FocusedRowHandle, GridView1.Columns(0), TextBox1.Text)
GridView1.SetRowCellValue(GridView1.FocusedRowHandle, GridView1.Columns(1), TextBox2.Text)
GridView1.SetRowCellValue(GridView1.FocusedRowHandle, GridView1.Columns(2), TextBox3.Text)
End Sub
بالتوفيق ان شاء الله
اللهم لك الحمد كما ينبغي لجلال وجهك و عظيم سلطانك
في حل و ترحال


