تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
عروض أعمدة ال datagrid تلقائيآ حسب البيانات المكتوبة فيها
#1
لدى datagrid متصلة [SIZE=3][b]ب ADODC
وتعرض بيانات جدول معين فى أعمدتها
[/b][/SIZE][SIZE=3][b]فهل من كود أو خاصية من خواص ال[/b][/SIZE] datagrid [SIZE=3][b][SIZE=3][b][b]أو أى طريقة
[/b]
[/b][/SIZE]تغير من عروض هذه الأعمدة تلقائيآ حسب البيانات المكتوبة فيها
[/b][/SIZE][SIZE=3][b][b]كما نتحكم فى عرض ال Label مثلآ بجعل[/b][/b][/SIZE][SIZE=3][b] الخاصية Autosize تساوي True

ولكم ألف شكر [/b][/SIZE]
الرد }}
تم الشكر بواسطة:
#2
[SIZE=4]من افكارأستاذنا الكبير/ ناجي ابراهيم زاده الله من علمه وفضله
من اجاباته علينا فى موضوع (عرض الTEXT أو ال Label حسب طول الكلام المكتوب فيه
[/SIZE])
[SIZE=3][b]ثم فى موضوع (طباعة الفورم بأكملها على الورقة مهما كانت أبعادها) [/b][/SIZE]
[SIZE=3][b]
توصلت لحل
[/b][/SIZE][SIZE=3][b][SIZE=3][b][SIZE=3][b] والحمد لله[/b][/SIZE]
هذا كود [/b][/SIZE][/b][/SIZE][SIZE=3][b][SIZE=3][b][SIZE=3][b]يقوم بهذه العملية ([/b][/SIZE]وقد جربته ونفذ المطلوب والحمد لله)
[/b][/SIZE][/b][/SIZE]
[HTML]
Dim MAXWid(9)

Private Sub Form_Activate()
For J = 0 To 3
Rem0,1,2,3" الرقم3 باعتبار أن ال ataGrid1 أربعة أعمدة
Label1(J).AutoSize = True
Label1(J).Font.Size = DataGrid1.Font.Size
Label1(J).Font.Name = DataGrid1.Font.Name
Label1(J).Font.Italic = DataGrid1.Font.Italic
Label1(J).Font.Bold = DataGrid1.Font.Bold
Next J
Rem
Adodc1.Refresh
Nrec = Adodc1.Recordset.RecordCount
Adodc1.Recordset.MoveFirst
For I = 1 To Nrec - 1
For J = 0 To 3
TEXTT = DataGrid1.Columns(J).Value
Label1(J).Caption = TEXTT + " "
If MAXWid(J) < Label1(J).Width Then MAXWid(J) = Label1(J).Width
Next J
Adodc1.Recordset.MoveNext
Next I

For J = 0 To 3
TEXTT = DataGrid1.Columns(J).Value
Label1(J).Caption = TEXTT + " "
If MAXWid(J) < Label1(J).Width Then MAXWid(J) = Label1(J).Width
Next J

For J = 0 To 3
DataGrid1.Columns(J).Width = MAXWid(J) + 100
Next J

End Sub


[/HTML][SIZE=3][b][SIZE=3][b]
وأرجو من أستاذنا الكبيرأن يكتبه بأسلوب أسهل من ذلك
أو أن يذكر لنا خاصية من خواص ال[/b][/SIZE][/b][/SIZE] datagrid [SIZE=3][b][SIZE=3][b][SIZE=3][b]تقوم بهذه العملية [/b][/SIZE][/b][/SIZE][/b][/SIZE][SIZE=3][b]
[SIZE=4]ولكم ألف شكر

[/SIZE][/b][/SIZE]
الرد }}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية منع تكرار التاريخ فى قاعدة البيانات ؟ gedo 7 4,581 19-06-21, 09:31 PM
آخر رد: khaled201349
  طلب طريقة نقل البيانات من جدول الي جدول اخر في قاعدة بيانات اخر ahmed201 2 1,327 01-03-21, 12:14 AM
آخر رد: ahmed201
  [سؤال] البرنامج لا يقرأ من قاعدة البيانات بعد تنصيب البرنامج على ويندوز 10 aboezzat84 4 1,399 03-01-21, 02:58 AM
آخر رد: aboezzat84
  [ سؤال ] للخبراء كيفية عرض جميع اسماء قواعد البيانات في mysql server ابوبدر 3 2 1,983 30-08-20, 12:16 AM
آخر رد: [email protected]
  تلوين عمود او صف في DataGrid ENG.MPROG 7 6,549 09-03-19, 03:39 PM
آخر رد: qasemhassan
  طريقة التعامل مع قاعدة البيانات وربطها بالفيجوال بيسك 6 ENG.MPROG 10 19,234 12-12-18, 03:37 PM
آخر رد: aboezzat84
  [مشروع] المساعدة في اكمال قواعد البيانات amena 1 1,473 28-08-18, 11:42 PM
آخر رد: عبد العزيز البسكري
  [سؤال] مشكلة في جلب الصورة من قاعدة البيانات اكسس عزف الرياح 1 1,740 30-01-18, 11:15 PM
آخر رد: Amir_Alzubidy
  تنسيق الكتابة والتاريخ فى ال DataGrid اسلام الكبابى 8 3,045 09-10-17, 11:25 PM
آخر رد: اسلام الكبابى
  حفظ الصورة بعد عمل سحبها من السكانر(الماسح الضوئي) في قاعدة البيانات haniblack 11 7,235 18-09-17, 10:01 PM
آخر رد: scsi7000

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


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