تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
الكود لا يعمل
#1
ارجو من الاخوان التوضيح في هذا الكود بحيث اردت ان اعمل خلفية للفورم بهذا الكود لكن لم تنجح
كود :
e.Graphics.DrawImage(Image.FromFile("هنا الرابط"), New Rectangle(0, 0, Me.Width, Me.Height))
الرد }}}
تم الشكر بواسطة:
#2
هذا مثال بسيط لما تريده
عليك فقط ان تكتب اسم مكان الملف بشكل صحيح

PHP كود :
Public Class Form1

    Private Sub Form1_Paint
(sender As ObjectAs PaintEventArgsHandles MyBase.Paint
        Dim img 
As Image Image.FromFile("C:\Cairo\TestingImage.jpg")
 
       Dim rect As New Rectangle(00Me.WidthMe.Height)
 
       e.Graphics.DrawImage(imgrect)
 
   End Sub

    Private Sub Form1_SizeChanged
(sender As ObjectAs EventArgsHandles MyBase.SizeChanged
        Invalidate
()
 
   End Sub

    Private Sub Form1_LocationChanged
(sender As ObjectAs EventArgsHandles MyBase.LocationChanged
        Invalidate
()
 
   End Sub

    Private Sub Form1_Resize
(sender As ObjectAs EventArgsHandles MyBase.Resize
        Invalidate
()
 
   End Sub

    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        Me
.DoubleBuffered True
    End Sub

End 
Class 

وعموما انا لا أنصحك باستخدام هذا الأسلوب
لأنه و تحت أي ظروف قد يقوم المستخدم بحذف الصورة او تغيير مكانها وهنا سوف يحدث خطأ
و الأفضل لك ان تضع الصورة في Resources المشروع و تستخدم نفس الاسلوب
الرد }}}
تم الشكر بواسطة: LoveVb , soper
#3
(27-08-16, 06:11 PM)silverlight كتب : هذا مثال بسيط لما تريده
عليك فقط ان تكتب اسم مكان الملف بشكل صحيح


وعموما انا لا أنصحك باستخدام هذا الأسلوب
لأنه و تحت أي ظروف قد يقوم المستخدم بحذف الصورة او تغيير مكانها وهنا سوف يحدث خطأ
و الأفضل لك ان تضع الصورة في Resources المشروع و تستخدم نفس الاسلوب

شكرا لك اخي الكريم على الكود الجميل
الكود الذي وضعته في سؤالي وجدته بالمنتدى
وهذا هو الرابط
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سورس كود الارسال الى الواتس -يعمل يرجي التعاون للتطوير new_programer 5 301 03-03-24, 08:45 PM
آخر رد: new_programer
  ممكن حل المشكلة فى الكود التالي - من مشاركة استاذنا القدير / عبدالله الدوسري new_programer 4 176 02-03-24, 07:36 PM
آخر رد: new_programer
  ماهو حل هذا الخطأ في الكود melad2002 7 275 25-02-24, 12:25 AM
آخر رد: justforit
  كيفية انشاء سكريبت لقاعدة بيانات من خلال الكود heem1986 1 213 20-02-24, 12:00 AM
آخر رد: Kamil
  [VB.NET] أرغب فى استخدام هذا الكود بالتحديد على الإصدار 10 AmeenRashed 3 210 19-01-24, 12:42 PM
آخر رد: Taha Okla
  [VB.NET] ما الخطأ فى هذا الكود - كود البحث المتعدد Ashraf Elafify 7 476 27-12-23, 10:50 PM
آخر رد: Ashraf Elafify
  [VB.NET] اريد تعديل في الكود عند طباعة DGV abu_hisham7 1 441 03-12-23, 02:40 AM
آخر رد: abu_hisham7
Exclamation [VB.NET] من يقدر يعمل لي استعلام يحقق طلبي ؟ أبو خالد الشكري 5 422 09-11-23, 02:25 PM
آخر رد: أبو خالد الشكري
Smile تطبيقي يعمل تمام على ويندوز 10 قبل تحديث الوندوز وبعد التحديث لا يعمل رمضان محمد 2 394 31-10-23, 01:50 PM
آخر رد: رمضان محمد
  رجاء التعديل على الكود المرفق - كلاس لعرض كود المورد new_programer 4 361 13-10-23, 01:47 AM
آخر رد: new_programer

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


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