15-01-24, 10:35 AM
(15-01-24, 01:39 AM)h2551996 كتب : السلام عليكم
لدي اكثر من داتا جرد فيو
ليست متشابهة في الاعمدة
اريد نسخ تصميم الداتا جرد فيو من لون ومقاس وحجم الخط
دفعة واحده ولصقه الي داتا جرد فيو أخري
ماهي الطريقة
جرب هذه الدالة
PHP كود :
Private Sub CopyDataGridViewDesign(sourceDataGridView As DataGridView, destinationDataGridView As DataGridView)
' نسخ الألوان والتنسيقات الأخرى
destinationDataGridView.DefaultCellStyle.BackColor = sourceDataGridView.DefaultCellStyle.BackColor
destinationDataGridView.DefaultCellStyle.ForeColor = sourceDataGridView.DefaultCellStyle.ForeColor
destinationDataGridView.DefaultCellStyle.SelectionBackColor = sourceDataGridView.DefaultCellStyle.SelectionBackColor
destinationDataGridView.DefaultCellStyle.SelectionForeColor = sourceDataGridView.DefaultCellStyle.SelectionForeColor
destinationDataGridView.DefaultCellStyle.Font = sourceDataGridView.DefaultCellStyle.Font
destinationDataGridView.ColumnHeadersDefaultCellStyle.BackColor = sourceDataGridView.ColumnHeadersDefaultCellStyle.BackColor
destinationDataGridView.ColumnHeadersDefaultCellStyle.ForeColor = sourceDataGridView.ColumnHeadersDefaultCellStyle.ForeColor
destinationDataGridView.ColumnHeadersDefaultCellStyle.Font = sourceDataGridView.ColumnHeadersDefaultCellStyle.Font
destinationDataGridView.AlternatingRowsDefaultCellStyle.BackColor = sourceDataGridView.AlternatingRowsDefaultCellStyle.BackColor
destinationDataGridView.AlternatingRowsDefaultCellStyle.ForeColor = sourceDataGridView.AlternatingRowsDefaultCellStyle.ForeColor
destinationDataGridView.AdvancedCellBorderStyle.All = sourceDataGridView.AdvancedCellBorderStyle.All
End Sub
في الزر
PHP كود :
Dim sourceDGV As DataGridView = DataGridView1
Dim destinationDGV As DataGridView = DataGridView2
CopyDataGridViewDesign(sourceDGV, destinationDGV)

