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

طباعة الفورم

بدأه & الأمل & في 26 أبريل 2011 · 13 رد · 3,336 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اخوتى الكرام

1 –الكودالتالى يقوم بطباعة الفورم

Dim save As New SaveFileDialog

save.Filter = "jpg|*.jpg"

If save.ShowDialog = Windows.Forms.DialogResult.OK Then

Dim bmp As New Bitmap(Width, Height)

Dim rc As New Rectangle(0, 0, Width, Height)

Me.DrawToBitmap(bmp, rc)

bmp.Save(save.FileName, Imaging.ImageFormat.Jpeg)

End If

المطلوب

1 - كيف يمكن طباعة الفورم كاملا (اذا كان مفعل بسكرول) حيث الفورم اكبر من الشاشة

2 – حفظ الصورة في ملف الاكسل (في ورقة 2)

(للعلم انى استطبع التعامل في حفظ بيانات من الفورم في الاكسل)

#2

السلام عليكم ورحمه الله وبركاته

اختى بالنسبه لطباعه الفورم مع شريط تمرير .. توجد افكار لاخذ صوره من الفورم بس مابيطلع كله عالورقه ولكن يمكنك طباعته كاملا بدوال التعامل مع الصور ... ارجو البحث عن موضوع طباعه ال TreeView في هذا القسم لأنه تم حل سؤال مشابه اكيد بيفيدك ... وان سأقوم برضه بالبحث عن الرابط

.:: Wish to become better and better ::.

#3

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

بحثت عن الموضوع وهذا رابطه

/index.php?showtopic=210298

ولكن لم اتمكن من الحل الصحيح لطباعة الفورم كاملا

والكود هو

هذا يوضع في زر

Dim print As New Printing.PrintHelper

Print.PrintPreviewTree(TreeView1, "My Tree Sample")

هذا الكود في PrintDocument1

e.Graphics.DrawImage(Me.Print_Image, 0, 0)

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

#4

السلام عليكم ورحمه الله وبركاته

اختي .. ما علينا من الكود السابق لأنه يحتاج تعديل المكتبه ... جربي هذا

Me.PrintForm1.Print(Me, PowerPacks.Printing.PrintForm.PrintOption.Scrollable)

طبعا PrintForm1 هي اداه من ادوات VisualBasicPowerPacks

بالتوفيق

.:: Wish to become better and better ::.

#5

اخى الكريم

لم اجد اداة PowerPacks

من ضمن الادوات

ارجو التوضيح اخى الكريم جزاك الله خيرا

#6

السلام عليكم ورحمه الله وبركاته

اختى انا استخدم فيجوال ستوديو 2010 .. واعتقد انها موجوده في الاصدار الي قبله ..

يمكنك اضافتها في مربع الادوات عبر Microsoft.VisualBasic.PowerPacks

.:: Wish to become better and better ::.

#7

[السلام عليكم ورحمه الله وبركاته

اخى الكريم

ا لاداة ليست موجودة من ضمن الادوات علما انى استخدم فيجول 2005

هل هناك طريقة اخرى للحل

السلام عليكم

اخى الكريم الاداة ليست موجودة من ضمن الادوات علما انى استخدم فيجول بيسك 2005

هل هناك طريقة للحل

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

#8

السلام عليكم ورحمه الله وبركاته

اختي هذا الرابط يوضح الادوات http://www.getdotnetcode.com/nexDotNet/020030PowerPackLineAndShapeControlsVB2005/PowerPackLineAndShapeControlsVB2005.htm والرابط التالي مباشر

http://www.microsoft.com/downloads/en/details.aspx?FamilyID=92faa81e-e9c1-432c-8c29-813493a04ecd

.:: Wish to become better and better ::.

#9

السلام عليكم ورحمه الله وبركاته

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

انا استطيع طباعة الفورم لكن مااريده طباعة الفورم( يما يحويه من ادوات)

حيث اناا لفورم اذا كان مفعل بالسكرول يكون اطول من الشاشة

(مثال طباعة TreeView1 كامله لكن هنا التعامل مع الفورم )

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

#10

السلام عليكم ورحمه الله وبركاته

اختي جربته باستخدام ال PowerPacks وشغال تمام!! يمكنك تنزيلها ...

.:: Wish to become better and better ::.

#11

السلام عليكم ورحمه الله وبركاته

اخى الكريم

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

حملت الادوات وجربته باستخدام ال PowerPacks وشغال تمام

لكن لايتم طباعة الفورم كامليطبع الى نهاية الصفحة فقط

ما أريده تصوير الفورم كامل وحفظه كصورة

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

#12

السلام عليكم ورحمه الله وبركاته

اختي انا جربت البرنامج وطبع الفورم كاملا ومع انه يحتوى على شريط انزلاق .. ارفقت لك المثال واذا كنت محملة برنامج OneNote تبع الاوفيس ستشاهدي النتيجه

WindowsApplication1.zip

.:: Wish to become better and better ::.

#13

اخى الكريم

جزاك الله خيرا لقد أثقلت عليك

هذاتطبيقى

http://4share.ws/file/2iqh0owun/1.rar.html

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

#14

السلام عليكم ورحمه الله وبركاته

اختي لم يشتغل تطبيقك عندي؟!!

.:: Wish to become better and better ::.

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