+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] ستايل داتا جرد فيو (/showthread.php?tid=47810)
الصفحات:
1
2
ستايل داتا جرد فيو - h2551996 - 15-01-24
السلام عليكم
لدي اكثر من داتا جرد فيو
ليست متشابهة في الاعمدة
اريد نسخ تصميم الداتا جرد فيو من لون ومقاس وحجم الخط
دفعة واحده ولصقه الي داتا جرد فيو أخري
ماهي الطريقة
RE: ستايل داتا جرد فيو - تركي الحلواني - 15-01-24
(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)
RE: ستايل داتا جرد فيو - h2551996 - 15-01-24
مشكور اخي على الاجابة
لكن لم تفلح الطريقة
RE: ستايل داتا جرد فيو - تركي الحلواني - 15-01-24
(15-01-24, 01:23 PM)h2551996 كتب : مشكور اخي على الاجابة
لكن لم تفلح الطريقة
اخي الطريقة مجربة
اما اذا كنت تقصد نسخ تنسيق الحقول للداتا جريد فهذا موضوع اخر.
RE: ستايل داتا جرد فيو - h2551996 - 15-01-24
(15-01-24, 02:08 PM)تركي الحلواني كتب :(15-01-24, 01:23 PM)h2551996 كتب : مشكور اخي على الاجابة
لكن لم تفلح الطريقة
اخي الطريقة مجربة
اما اذا كنت تقصد نسخ تنسيق الحقول للداتا جريد فهذا موضوع اخر.
تنسيق الحقل ( اللون - حجم الخط - لون تحديد الصفوف والاعمدة )
RE: ستايل داتا جرد فيو - تركي الحلواني - 15-01-24
(15-01-24, 02:22 PM)h2551996 كتب :(15-01-24, 02:08 PM)تركي الحلواني كتب :(15-01-24, 01:23 PM)h2551996 كتب : مشكور اخي على الاجابة
لكن لم تفلح الطريقة
اخي الطريقة مجربة
اما اذا كنت تقصد نسخ تنسيق الحقول للداتا جريد فهذا موضوع اخر.
تنسيق الحقل ( اللون - حجم الخط - لون تحديد الصفوف والاعمدة )
هذا يتطلب ان تكون الداتا جريد متشابها تماماً
حيث انه اذا اختلف عدد الاعمدة لن يتم تنفيذها
RE: ستايل داتا جرد فيو - Taha Okla - 15-01-24
الحل هو ما طرحه الأستاذين :
- تركي الحلواني.
- عاصم.
ولكن أدخل على خصائص الـ DataGridView التي تريد نسخ خصائصها..
شوف الخصائص التي قمت بتغييرها وقم بإضاافتها على الأكواد التي طرحوها في مشاركتيهما.
بالاضافة أنك ستجعل التطبيق في كود تحميل النافذة وليس في زر منفصل (أقصد بذلك التطبيق قبل تعبئة البيانات وستحصل على النتيجة المرجوة منها).
ملاحظة : الـ DataGridView التي عرضت صورتها فيها شيء غير جيد(وأظن بل وأكاد أجزم أنه غير مقصود).
ولكن علينا الانتباه لذلك وعدم الاستهانة بهذا الأمر ..
هل : البسملة وآيات الفاتحة هي منتجات ؟؟؟ هل تراها كذلك؟؟
القرآن أعظم من أن نجعله تجربة لبرامج الحسابات..
قد تجعلها افتتاحية لبرامج الكتابة والنسخ تبركاً فيها ... ولكن ليس للحسابات والمبيعات .
حتى في المصطلحات علينا أن نعظم كتابه جل في علاه.
وإن فاتنا شيء نستدركه بالتصحيح ...
بالتوفيق ..
RE: ستايل داتا جرد فيو - h2551996 - 16-01-24
(15-01-24, 10:08 PM)3sem كتب : Dim DGV1 = DataGridView1
Dim DGV2 = DataGridView2
DGV2.AlternatingRowsDefaultCellStyle = DGV1.AlternatingRowsDefaultCellStyle
DGV2.ColumnHeadersDefaultCellStyle = DGV1.ColumnHeadersDefaultCellStyle
DGV2.RowHeadersDefaultCellStyle = DGV1.RowHeadersDefaultCellStyle
DGV2.RowsDefaultCellStyle = DGV1.RowsDefaultCellStyle
DGV2.RowTemplate.DefaultHeaderCellType = DGV1.RowTemplate.DefaultHeaderCellType
DGV2.RowTemplate.DefaultCellStyle = DGV1.RowTemplate.DefaultCellStyle
DGV2.DefaultCellStyle = DGV1.DefaultCellStyle
مشكور بجربها وارد علي حضرتك مره ثانيه
لكن هل ينفع احزن الإجراء هذا في مكان معين
بحيث اقدر اعدل كامل الخصائص منه
(15-01-24, 10:54 PM)Taha Okla كتب : الحل هو ما طرحه الأستاذين :
- تركي الحلواني.
- عاصم.
ولكن أدخل على خصائص الـ DataGridView التي تريد نسخ خصائصها..
شوف الخصائص التي قمت بتغييرها وقم بإضاافتها على الأكواد التي طرحوها في مشاركتيهما.
بالاضافة أنك ستجعل التطبيق في كود تحميل النافذة وليس في زر منفصل (أقصد بذلك التطبيق قبل تعبئة البيانات وستحصل على النتيجة المرجوة منها).
ملاحظة : الـ DataGridView التي عرضت صورتها فيها شيء غير جيد(وأظن بل وأكاد أجزم أنه غير مقصود).
ولكن علينا الانتباه لذلك وعدم الاستهانة بهذا الأمر ..
هل : البسملة وآيات الفاتحة هي منتجات ؟؟؟ هل تراها كذلك؟؟
القرآن أعظم من أن نجعله تجربة لبرامج الحسابات..
قد تجعلها افتتاحية لبرامج الكتابة والنسخ تبركاً فيها ... ولكن ليس للحسابات والمبيعات .
حتى في المصطلحات علينا أن نعظم كتابه جل في علاه.
وإن فاتنا شيء نستدركه بالتصحيح ...
بالتوفيق ..
مشكور استاذ طه علي الرد
ولكن لم اقصد مثل ما ذكرت اني استهين بها والعياذ بالله
لكن هذي كتابة يدوية وليست منتج مضاف
كتبته بهذا الشكل افضل من كتابة اي شيء آخر ً
مشكور للتوضيح واعوذ بالله من أن استهين بكلام رب العالمين
RE: ستايل داتا جرد فيو - Kamil - 16-01-24
وعليكم السلام و رحمة الله و بركاته
جرب الكود التالي تمت كتابته على عجل و الصراحة لم اقم بتجربته
PHP كود :
Private Sub CopyDataGridViewDesign(sourceDataGridView As DataGridView, targetDataGridView As DataGridView)
' نسخ تصميم الأعمدة
For i As Integer = 0 To sourceDataGridView.Columns.Count - 1
targetDataGridView.Columns(i).DefaultCellStyle = New DataGridViewCellStyle(sourceDataGridView.Columns(i).DefaultCellStyle)
Next
' نسخ تصميم الخلفية ولون الخط للصفوف
For i As Integer = 0 To sourceDataGridView.Rows.Count - 1
targetDataGridView.Rows(i).DefaultCellStyle = New DataGridViewCellStyle(sourceDataGridView.Rows(i).DefaultCellStyle)
Next
' نسخ تصميم لون العنوان
targetDataGridView.ColumnHeadersDefaultCellStyle = New DataGridViewCellStyle(sourceDataGridView.ColumnHeadersDefaultCellStyle)
targetDataGridView.DefaultCellStyle = New DataGridViewCellStyle(sourceDataGridView.DefaultCellStyle)
End Sub
' الاستخدام:
CopyDataGridViewDesign(GVOriginal, GVTarget)
RE: ستايل داتا جرد فيو - h2551996 - 17-01-24
(16-01-24, 02:02 AM)Kamil كتب : وعليكم السلام و رحمة الله و بركاتهمشكور اخي علي تعبك
جرب الكود التالي تمت كتابته على عجل و الصراحة لم اقم بتجربته
PHP كود :
Private Sub CopyDataGridViewDesign(sourceDataGridView As DataGridView, targetDataGridView As DataGridView)
' نسخ تصميم الأعمدة
For i As Integer = 0 To sourceDataGridView.Columns.Count - 1
targetDataGridView.Columns(i).DefaultCellStyle = New DataGridViewCellStyle(sourceDataGridView.Columns(i).DefaultCellStyle)
Next
' نسخ تصميم الخلفية ولون الخط للصفوف
For i As Integer = 0 To sourceDataGridView.Rows.Count - 1
targetDataGridView.Rows(i).DefaultCellStyle = New DataGridViewCellStyle(sourceDataGridView.Rows(i).DefaultCellStyle)
Next
' نسخ تصميم لون العنوان
targetDataGridView.ColumnHeadersDefaultCellStyle = New DataGridViewCellStyle(sourceDataGridView.ColumnHeadersDefaultCellStyle)
targetDataGridView.DefaultCellStyle = New DataGridViewCellStyle(sourceDataGridView.DefaultCellStyle)
End Sub
' الاستخدام:
CopyDataGridViewDesign(GVOriginal, GVTarget)
لكن لم تفلح ايضا
اظن أنه يمكن أن تكون المشكله عندي
لكن علي كل حال قمهكت بالترتيب بشكل يدوي
جربت طريقة نسخ الكود من الديزاينر الخاص بالفورم
نجحت ولكن كما ذكر اخوتي انها
يجب أن تكون متطابقة
شكرا لكل من قام بالرد
نفع الله بكم