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

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

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

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

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

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

وشكرا مقدماً


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

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


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

منقول ...


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  السلام عليكم ورحمة الله وبركاتة - ارجو المساعدة فى ترتيب البيانات داخل الفلكس جريد mhareek 4 107 14-07-18, 09:17 PM
آخر رد: mhareek
  MSFlexGrid تحديد اخر سطر بعد كل اضافة اوظهارة mustafa mohamed 2 68 29-06-18, 11:32 PM
آخر رد: mustafa mohamed
  [سؤال] برجاء المساعدة ضروري فى جملة select ahmed eldouskey 6 258 21-06-18, 02:50 AM
آخر رد: princeofislam
  تعبئة صفحة ويب عن طريق MSFlexGrid بالفيجوال بيسك 6 ربوح بوبكر 1 80 19-06-18, 02:47 AM
آخر رد: عبدالله الصافي
  ارجو المساعدة فى التنقل بين السجلات ..... جزاكم الله خير mhareek 15 433 07-06-18, 10:54 PM
آخر رد: mhareek
  احبابى فى الله برجاء المساعدة فى البحث بالكود مرفق مثال mhareek 6 229 03-05-18, 02:09 PM
آخر رد: mhareek
  ارجو المساعدة فى هذا الكود mhareek 1 71 02-05-18, 07:18 PM
آخر رد: Amir_Alzubidy
  [vb6.0] ممكن المساعدة في اضافة الايام بين تاريخين في الفيلكس قريد mustafa mohamed 0 80 12-04-18, 04:30 PM
آخر رد: mustafa mohamed
  اخوانى الاحباب ارجو المساعدة فى اضافة زر جديد ونقل الاومر من زر الى زر mhareek 9 276 08-04-18, 12:44 PM
آخر رد: mhareek
Photo [vb6.0] المساعدة في تصدير بيانات الى جدول وورد hassan0379 0 111 07-04-18, 11:36 PM
آخر رد: hassan0379

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


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