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

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

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

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

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

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

وشكرا مقدماً


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

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


الملفات المرفقة
.rar   دمج خلايا.rar (الحجم : 3.36 ك ب / التحميلات : 82)
الرد
تم الشكر بواسطة:
#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 ك ب / التحميلات : 94)
الرد
تم الشكر بواسطة:
#4
آمل المساعدة فى كود توسيط خلايا MSHFlexGrid
الرد
تم الشكر بواسطة:
#5
مشروع دمج خلايا داخل msflexgrid

منقول ...


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  عرض التاريخ داخل MSHFLEXGRID دهشوش1 4 111 13-12-18, 05:05 AM
آخر رد: Ahmed_Mansoor
  السلام عليكم احبابى فى الله ارجو المساعدة بخصوص متفح الانتر نت mhareek 1 57 30-11-18, 09:52 PM
آخر رد: عبدالله الصافي
Question [سؤال] امل المساعدة في أداة Ribbon Example allayl 5 905 18-11-18, 04:43 AM
آخر رد: allo5_800
  عرض عدد الحقول المملوؤه في عمود MSHFLEXGRID داخل مربع نص دهشوش1 0 53 18-11-18, 01:05 AM
آخر رد: دهشوش1
  طريقة تغيير نوع بيانات الحقل داخل جملة الاستعلام عبدالله الصافي 3 130 05-11-18, 03:30 AM
آخر رد: حريف برمجة
  احبابى فى الله ارجو المساعدة برنامج طباعة الباركود mhareek 2 189 19-09-18, 07:37 PM
آخر رد: mhareek
  احبابى فى الله ارجو المساعدة تغير ربط قاعدة البينات من (.accdb) الى mbp mhareek 6 202 14-09-18, 11:18 PM
آخر رد: mhareek
  السلام عليكم ورحمة الله وبركاتة - ارجو المساعدة فى ترتيب البيانات داخل الفلكس جريد mhareek 4 268 14-07-18, 09:17 PM
آخر رد: mhareek
  MSFlexGrid تحديد اخر سطر بعد كل اضافة اوظهارة mustafa mohamed 2 167 29-06-18, 11:32 PM
آخر رد: mustafa mohamed
  [سؤال] برجاء المساعدة ضروري فى جملة select ahmed eldouskey 6 456 21-06-18, 02:50 AM
آخر رد: princeofislam

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


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