الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

هل بألأمكان طباعة dataGrid

بدأه turki_ في 23 أكتوبر 2005 · 10 رد · 3,469 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

هل بألامكان طباعة dataGrid دون الحاجه الى Crystal Report

لأني سمعت من مطور دوت نت انه لا يمكن طباعة dataGrid الا بأستخدام Crystal Report وفعلا حاولت لكنها لم تأتي معي الا بـCrysral Report افيدونا جزاكم الله خير الجزاء

#2

اعتقد فيه موضوع بهذا الخصوص

سوي بحث بكلمة datagrid راح يطلع لك

<span style='color:green'>سؤل ابن عباس عن علمه كيف جمعه فقال :( أوتيت لسانا سؤولا وقلبا عقولا)</span>

#3

للأسف اخوي بحــــــــــــثت لكن لم اجـــــــــــــــــــــــد

#4

شوف هذه الروابط من موقع codeproject

http://www.codeproject.com/vb/net/datagridex.asp

http://www.codeproject.com/vb/net/DataGrid...nting_Class.asp

VB.NET and C# Comparison

http://www.harding.edu/fmccown/vbnet_csharp_comparison.html

002.gif

=-=-=-=-=-=-=
ذو العلم يشقى فى النعيم بعلمه .:. واخو الجهالة فى الشقاوة ينعم
=-=-=-=-=-=-=
يا من بدنياه اشتغل . قد غره طول الأمل . فالموت يأتى بغتة . والقبر صندوق العمل
=-=-=-=-=-=-=
ان لم تستطع ان تجد ما تفعله فافعل ما لم تسطع ان تجده

screen_shot_2011-05-19_at_12.44.49_pm.pn

#5

جزاك الله خيـــــــــــــــر SOLO.NET على هذا التواصل

#6
Private PrintGrid As DataGridPrint
Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrint.Click
Dim fpr As New frmPrint()
With fpr
.Title = DataGrid1.CaptionText
.ShowDialog()
If .Result > 0 Then
PrintGrid = New DataGridPrint(PrintDocument1, DataGrid1, .bBlackWhite)
PrintGrid.PrintTitle = .bTitle
PrintGrid.Title = .Title
Select Case .Result
Case 1 ' Print
' The Print method prints the datagrid without using a print dialog.
' Use a PrintDialog when you want to offer the user the ability to choose print settings.
If PrintDialog1.ShowDialog() = DialogResult.OK Then PrintDocument1.Print()
Case 2 ' Page Setup
PageSetupDialog1.ShowDialog()
Case 3 ' Preview
PrintPreviewDialog1.Icon = fpr.Icon
PrintPreviewDialog1.ShowDialog()
End Select
End If
End With
End Sub

' Specify the output to print by handling the PrintPage event 
' and by using the Graphics included in the PrintPageEventArgs.
Private Sub printDocument1_PrintPage(ByVal sender As Object, ByVal e As PrintPageEventArgs) Handles PrintDocument1.PrintPage
' Print method of DataGridPrint class starts the custom datagrid's printing process.
e.HasMorePages = PrintGrid.Print(e.Graphics)
End Sub

I Hope This Helpfull

تم تعديل هذه المشاركة بواسطة Ulead في 12 مايو 2008 في 23:06

#7

نعم بالامكان وبكل سهولة

بالتفصيل الممل

مثلا تضيف زر وليكن اسمة PrintGrid

ولو كانت اسم الداتا جريد عندك DataGrid1

طبعا راح تضيف من صندوق الادوات الاداة PrintDocument وسيكون اسمها PrintDocument1

وايضا راح تضيف الاداة PrintDialog وسيكون اسمها PrintDialog1

والاداة PrintPreviewDialog عشان يفتح مربع الطباعة

بيكون داخل الزر


PrintDocument1.Print()EndSub
Private Sub PrintGrid_Click(ByVal sender As System.Object, ByVal e As _ System.EventArgs) Handles PrintGrid.Click

وبيكون في الاداة printdocument1 الكود التالي



Dim myPaintArgs As New PaintEventArgs(e.Graphics, New Rectangle(New Point(0, 0), Me.Size))
Me.InvokePaint(DataGrid1, myPaintArgs)EndSub
Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage

الكود مجرب ومضمون واي استفسار آخر (بعد التجربة ) نكون حاضرين

تم تعديل هذه المشاركة بواسطة دوت نت في 13 مايو 2008 في 15:23

#8

ونرجو الدعوات

تم تعديل هذه المشاركة بواسطة دوت نت في 13 مايو 2008 في 15:19

#9

(مشاركة فارغة)

#10

ارجو المساعده

يوجد خطاء فى اول سطر

Private PrintGrid As DataGridPrint

كيف يمكن الحصول على هذه ال class

وشكرا

#11

دوت نت .. مشـكور خيـو ..

استفدت من المـوضوع بشكل كبيـر .. الله يسعدك ويوفقك وين مـآكنت

مواضيع مشابهة