تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اضافة labe1 على picturbox
#1
السلام عليكم
لدي استفسار حول كيفية  دمج نص label على picturebox   لكي استطيع بعدها حفظ الصورة  و النص معا على شكل صورة  
جربت طريقة تصوير الشاشة لكي لاحظت ان الصورة تفقد جودتها 
شكرا لكم
الرد }}}
تم الشكر بواسطة:
#2
جرب هذ الكود

PHP كود :
Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click
    Dim bmp 
As New Bitmap(Me.PictureBox1.Image)
    
Dim g As Graphics Graphics.FromImage(bmp)

    
g.DrawString(Me.Label1.TextMe.Label1.Font, New SolidBrush(Me.Label1.ForeColor), New Point(3030))

    
Me.PictureBox2.Image bmp
End Sub 

ويمكنك حفظ الصورة بدل عرضها في السطر الأخير بحيث يكون
bmp.Save
الرد }}}
تم الشكر بواسطة: LoveVb , LoveVb , soper
#3
(15-08-16, 01:05 AM)الوادي كتب : جرب هذ الكود

PHP كود :
Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click
    Dim bmp 
As New Bitmap(Me.PictureBox1.Image)
 
   Dim g As Graphics Graphics.FromImage(bmp)

 
   g.DrawString(Me.Label1.TextMe.Label1.Font, New SolidBrush(Me.Label1.ForeColor), New Point(3030))

 
   Me.PictureBox2.Image bmp
End Sub 

ويمكنك حفظ الصورة بدل عرضها في السطر الأخير بحيث يكون
bmp.Save

لقد جربت الكود  ة بارك الله فيك لكن وقعت في مشكلة اخى بخصوص label1 كيف يمكنني التحكم في حجم خطها و مكان ظهورها على  picturbox فهل  لهذا حل ؟ ؟؟
او طريقة تمكنني من جعل اللابل تأخد  المكان التي وضعته فيه على الفورم في المرة الاولى
اشكرك  اخي
الرد }}}
تم الشكر بواسطة: الوادي
#4
في الكود اعتمدت على نوع خط الأداة Label1
Me.Label1.Font

وحددت المكان بالاحداثيات
New Point(30, 30)

ولأن طلبك عام، أكيد الجواب ما راح يجي على تريد بالضبط.
الرد }}}
تم الشكر بواسطة: LoveVb , soper
#5
بارك الله فيك اخي شكرا جزيلا لك
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اضافة ادوات لفيجوال بيسك خالد20 10 1,977 18-12-23, 07:51 PM
آخر رد: ابراهيم عبدالباقى
  اريد اضافة متغيراخر داخل Listbox1 احتاج تعديل بسيط moh61 0 350 05-08-23, 02:29 PM
آخر رد: moh61
  [سؤال] كيفية اضافة في اكثر من جدول ahmed_king2023 0 364 29-07-23, 12:03 PM
آخر رد: ahmed_king2023
  اقتناص حدث تحديث او حذف او اضافة ملف ابو محمد محمد محمد 6 560 21-04-23, 05:49 PM
آخر رد: ابو محمد محمد محمد
  [سؤال] كيفية اضافة اكثر من ثلاث معاملات الى عامل التشغيل بواسطة If asmarsou 7 1,167 26-02-23, 11:34 PM
آخر رد: asmarsou
  مشكلة فى اضافة عناصر فى الداتا جريد فيو خالد كامل1 14 1,616 16-02-23, 03:10 AM
آخر رد: خالد كامل1
  [VB.NET] اضافة كرستال ريبورت MOHAMMED ALZWI 2 373 20-12-22, 11:19 AM
آخر رد: MOHAMMED ALZWI
  [VB.NET] خطأ عند اضافة فاتورة مشتريات MOHAMMED ALZWI 2 441 10-12-22, 12:25 PM
آخر رد: MOHAMMED ALZWI
  [VB.NET] خطأ عند اضافة فاتورة مشتريات 0 152 10-12-22, 02:30 AM
آخر رد: MOHAMMED ALZWI
  مساعدة في اضافة زر داخل خلية في الداتا جريد فيو MustafaShaker 4 2,189 22-10-22, 09:13 PM
آخر رد: MORA

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


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