تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيفية اضافة صورة لزر في الداتا قريد فيو
#1
السلام عليكم
اريد طريقة اضافة صورة لزر في الداتا قريد فيو 
وشكرا
الرد
تم الشكر بواسطة:
#2
استخدم DataGridViewImageColumn بدلا من DataGridViewButtonColumn لتستطيع إضافة الصورة بدون كود

هذا الكود لإضافة صورة في العمود الثالت (e.ColumnIndex = 2) عن طريق الحدث CellPainting
PHP كود :
Private Sub DataGridView1_CellPainting(ByVal sender As ObjectByVal e As DataGridViewCellPaintingEventArgsHandles DataGridView1.CellPainting
    e
.Paint(e.CellBoundsDataGridViewPaintParts.All)

 
   If e.RowIndex >= And e.ColumnIndex 2 Then
        Dim wid 
As Integer e.CellBounds.Width
        Dim hig 
As Integer e.CellBounds.Height
        Dim img 
As Image My.Resources.icon
        Dim siz 
As Size img.Size
        Dim lft 
As Integer e.CellBounds.Left CInt((wid siz.Width) / 2)
 
       Dim rgt As Integer e.CellBounds.Top CInt((hig siz.Height) / 2)
 
       Dim pnt As New Point(lftrgt)
 
       e.Graphics.DrawImage(img, New Rectangle(pntsiz))
 
   End If

 
   e.Handled True
End Sub 
الرد
تم الشكر بواسطة:
#3
(06-02-18, 01:40 PM)طالب برمجة كتب : استخدم DataGridViewImageColumn بدلا من DataGridViewButtonColumn لتستطيع إضافة الصورة بدون كود

هذا الكود لإضافة صورة في العمود الثالت (e.ColumnIndex = 2) عن طريق الحدث CellPainting
PHP كود :
Private Sub DataGridView1_CellPainting(ByVal sender As ObjectByVal e As DataGridViewCellPaintingEventArgsHandles DataGridView1.CellPainting
    e
.Paint(e.CellBoundsDataGridViewPaintParts.All)

 
   If e.RowIndex >= And e.ColumnIndex 2 Then
        Dim wid 
As Integer e.CellBounds.Width
        Dim hig 
As Integer e.CellBounds.Height
        Dim img 
As Image My.Resources.icon
        Dim siz 
As Size img.Size
        Dim lft 
As Integer e.CellBounds.Left CInt((wid siz.Width) / 2)
 
       Dim rgt As Integer e.CellBounds.Top CInt((hig siz.Height) / 2)
 
       Dim pnt As New Point(lftrgt)
 
       e.Graphics.DrawImage(img, New Rectangle(pntsiz))
 
   End If

 
   e.Handled True
End Sub 

شكرا أخي العزيز
ولكن عند تنفيذ الكود تظهر الصورة أكبر من الزر 
هل يوجد حل
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف أفتح كل صورة من رابط داخل البيكتر بوكس bidaya 8 164 18-11-19, 09:21 PM
آخر رد: 3booody
  سؤال في الداتا جريد فيو Emam emam 9 118 18-11-19, 05:43 AM
آخر رد: asemshahen5
  [VB.NET] سؤال في الداتا جريد فيو كود شرط moha8080 2 77 17-11-19, 04:53 PM
آخر رد: moha8080
  [VB.NET] تغير اسم الاعمدة في الداتا كريت سلام م 3 74 14-11-19, 07:08 PM
آخر رد: asemshahen5
  [VB.NET] اضافة تسلسل تلقائي EMADSSS 7 157 09-11-19, 02:50 AM
آخر رد: EMADSSS
  مشكلة اضافة قيمة للريجسترى ابو روضة 6 182 06-11-19, 12:50 AM
آخر رد: ابو روضة
  ما هو كود جعل السطر المكرر هو نفسه السطر المحدد في الداتا جريد فيو sofiane-phy 8 206 30-10-19, 09:31 PM
آخر رد: sofiane-phy
Exclamation [VB.NET] ثلاثة ايام من المحاولة , >الفاشلة< : كود تصوير 60 صورة في الثانية SnTnt 8 229 29-10-19, 12:04 AM
آخر رد: SnTnt
  منع تشابه القيم عموديا في الداتا جريد muad 5 178 28-10-19, 10:33 PM
آخر رد: muad
  [سؤال] البحت عن اسم من excel في جميع الشيتات واضافته الداتا قريد فيو devxs 10 923 26-10-19, 04:04 PM
آخر رد: khairallah

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


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