تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
المساعدة فى دمج خلايا داخل msflexgrid
#1
السلام عليكم ورحمة الله وبركاته

اخوانى الاعزاء

ارجوا المساعدة فى دمج خلايا داخل msflexgrid

مرفق صورة للجدول المراد دمج خلايا له

الرجاء تزويدنا بكود دمج خليتين الفترة والمادة والتاريخ كما هو موضح بالصورة المرفقة ، وكيفية ربط قاعدة البيانات داخل msflexgrid

باى طريقة ربط ....

وشكرا مقدماً


الملفات المرفقة صورة/صور
   
الرد }}}}
تم الشكر بواسطة:
#2
Exclamation 
مرفق مشروع للعمل عليه

جزاكم الله كل الخير


الملفات المرفقة
.rar   دمج خلايا.rar (الحجم : 3.36 ك ب / التحميلات : 44)
الرد }}}}
تم الشكر بواسطة:
#3
Big Grin 
الحمد لله تم الوصول الى بداية الخيط ولكن مع MSHFlexGrid
PHP كود :
Private Sub Command1_Click()
End
End Sub



Private Sub Form_Load()
 
With Grid
       
' Set some basic settings.
     
       .AllowUserResizing = flexResizeColumns
       .Cols = 11
       .Rows = 9
       .FixedCols = 1
       .FixedRows = 3
        
      
       ' 
Allow cells to merge if it is similiarwhether is by row or col.
       .
MergeCells flexMergeFree
       
       
' Sample 1: Merge fixed rows.
       
        .TextMatrix(0, 0) = "ÇáæÞÊ"
       .TextMatrix(1, 0) = "Çáíæã"
       .TextMatrix(2, 0) = "Çáíæã"
       .MergeCol(0) = True     ' 
Enable col 0 to merge if next row has same data.
       
        
' Sample 2: Merge fixed rows.
       
        .TextMatrix(3, 0) = "ÇáÓÈÊ"
       .TextMatrix(4, 0) = "ÇáÃÍÏ"
       .TextMatrix(5, 0) = "ÇáÇËäíä"
       .TextMatrix(6, 0) = "ÇáËáÇËÇÁ"
       .TextMatrix(7, 0) = "ÇáÇÑÈÚÇÁ"
       .TextMatrix(8, 0) = "ÇáÎãíÓ"
       .MergeCol(0) = True     ' 
Enable col 0 to merge if next row has same data.
       
       
       
' Sample 3: Merge fixed cols.
       .TextMatrix(0, 1) = "ÇáÝÊÑÉ ÇáÇæáí"
        .TextMatrix(0, 2) = "ÇáÝÊÑÉ ÇáÇæáí"
        .TextMatrix(0, 3) = "ÇáÝÊÑÉ ÇáÇæáí"
       .MergeRow(0) = True     ' 
Enable row 0 to merge if next col has same data.
       
           
       
' Sample 4: Merge fixed cols.
       .TextMatrix(0, 4) = "ÇáÝÊÑÉ ÇáËÇäíÉ"
        .TextMatrix(0, 5) = "ÇáÝÊÑÉ ÇáËÇäíÉ"
       .TextMatrix(0, 6) = "ÇáÝÊÑÉ ÇáËÇäíÉ"
       .MergeRow(0) = True     ' 
Enable row 0 to merge if next col has same data.
       
             
       
' Sample 5: Merge fixed cols.
       .TextMatrix(0, 7) = "ÇáÝÊÑÉ ÇáËÇáËÉ"
       .TextMatrix(0, 8) = "ÇáÝÊÑÉ ÇáËÇáËÉ"
       .TextMatrix(0, 9) = "ÇáÝÊÑÉ ÇáËÇáËÉ"
       .MergeRow(0) = True     ' 
Enable row 0 to merge if next col has same data.
       
              
       
' Sample 6: Merge fixed cols.
       .TextMatrix(0, 10) = "ãáÇÍÙÇÊ"
        .TextMatrix(1, 10) = "ãáÇÍÙÇÊ"
       .TextMatrix(2, 10) = "ãáÇÍÙÇÊ"
       .MergeCol(10) = True     ' 
Enable Col 10 to merge if next col has same data.
       
       
       
     
' Sample 7: Merge fixed rows.
       
       .TextMatrix(1, 1) = "ÇáãÇÏÉ"
       .TextMatrix(2, 1) = "ÇáãÇÏÉ"
       .MergeCol(1) = True     ' 
Enable col 1 to merge if next row has same data.
       
        
       
' Sample 8: Merge fixed rows.
       .TextMatrix(1, 2) = "ÇáæÞÊ"
       .TextMatrix(1, 3) = "ÇáæÞÊ"
       .MergeRow(1) = True     ' 
Enable Row 1 to merge if next row has same data.
       
       
' Sample 9: Merge fixed rows.
       
       .TextMatrix(2, 2) = "ãä"
        
         ' 
Sample 9Merge fixed rows.
        .
TextMatrix(23) = "Çáì"
       
       
     ' Sample 10: Merge fixed rows.
       
       .TextMatrix(1, 4) = "ÇáãÇÏÉ"
       .TextMatrix(2, 4) = "ÇáãÇÏÉ"
       .MergeCol(4) = True     ' 
Enable col 4 to merge if next row has same data.
       
        
       
' Sample 11: Merge fixed rows.
       .TextMatrix(1, 5) = "ÇáæÞÊ"
       .TextMatrix(1, 6) = "ÇáæÞÊ"
       .MergeCol(6) = True     ' 
Enable col 6 to merge if next row has same data.
       
       
' Sample 12: Merge fixed rows.
       
       .TextMatrix(2, 5) = "ãä"
        
               
       ' 
Sample 13Merge fixed rows.
        .
TextMatrix(26) = "Çáì"
              
       
        ' Sample 14: Merge fixed rows.
       .TextMatrix(1, 7) = "ÇáãÇÏÉ"
       .TextMatrix(2, 7) = "ÇáãÇÏÉ"
       .MergeCol(5) = True     ' 
Enable col 5 to merge if next row has same data.
       
        
       
' Sample 15: Merge fixed rows.
       .TextMatrix(1, 8) = "ÇáæÞÊ"
       .TextMatrix(1, 9) = "ÇáæÞÊ"
       .MergeCol(5) = True     ' 
Enable col 5 to merge if next row has same data.
       
       
' Sample 16: Merge fixed rows.
       
       .TextMatrix(2, 8) = "ãä"
                      
       ' 
Sample 17Merge fixed rows.
        .
TextMatrix(29) = " Çáì"
       
.MergeCol(7) = True     ' Enable col 7 to merge if next row has same data.
        
      
   End With
End Sub


 
Private Sub Grid_Click()

End Sub 


الملفات المرفقة
.rar   KING1.rar (الحجم : 6.12 ك ب / التحميلات : 57)
الرد }}}}
تم الشكر بواسطة:
#4
آمل المساعدة فى كود توسيط خلايا MSHFlexGrid
الرد }}}}
تم الشكر بواسطة:
#5
مشروع دمج خلايا داخل msflexgrid

منقول ...


الملفات المرفقة
.zip   EditGrid.zip (الحجم : 3.02 ك ب / التحميلات : 43)
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ضغط ملفات داخل فولدر عبدالله الصافي 5 101 20-02-17, 01:42 AM
آخر رد: عبدالله الصافي
Question [vb6.0] نامل المساعدة العاجلة عندي في تاريخ الحاسب اليوم 3 هجري والبرنامج يقول لي اليوم 4؟؟ Microformt 4 120 11-02-17, 12:27 AM
آخر رد: Ahmed_Mansoor
  [ تمّ الحل] : رجاء المساعدة بتصحيح كود الحفظ عبد العزيز البسكري 8 173 09-02-17, 02:01 AM
آخر رد: Amir_alzubidy
  اساتذتى الكرام ارجو المساعدة بخصوص كاليندر كنترول mhareek 9 119 08-02-17, 12:58 PM
آخر رد: mhareek
  [سؤال] عدم تكرار البيانات داخل الكمبو عمور2016 2 125 28-01-17, 02:20 PM
آخر رد: عمور2016
Lightbulb [سؤال] ما الفرق بين DAO وال ADO وما الفرق ايضاً بين MSFlexGrid ول MSHFlexGrid ياسر عبد الكريم 2 89 26-01-17, 11:07 PM
آخر رد: ياسر عبد الكريم
  أرجو المساعدة، أريد ماكرو لإدراج جدول بمواصفات معينة SYman 0 74 21-12-16, 12:14 PM
آخر رد: SYman
  [ تمّ الحل ] : مجموع الصف داخل الفليكس جريد عبد العزيز البسكري 4 188 13-12-16, 04:53 AM
آخر رد: عبد العزيز البسكري
  [ تمّ الحل ] : أرجو المساعدة بإضافة STATUSBAR RECORD عبد العزيز البسكري 6 232 10-12-16, 01:09 AM
آخر رد: Ahmed_Mansoor
  جلب اسماء المجلدات الموجودة داخل مجلد معين عبدالله الصافي 7 313 26-11-16, 11:05 PM
آخر رد: عبدالله الصافي

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


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