تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
أريد كود يقوم بعرض صورة عند وضع مؤشر الماوس علي تكست بوكس بمقاسات معينة ؟
#1
السلام عليكم اخوتي الاعزاء
أريد كود يقوم بعرض صورة عند وضع مؤشر الماوس علي تكست بوكس مع امكانية تحديد مقاس الصورة التي ستظهر 
أريد كود زر يقوم بحفظ الصورة التي اريد عرضها ... اختار الصورة ليس من داخل البرمجة ولكن اثناء تشغيل البرنامج 

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

أتمني ان اكون قد استطعت توضيح طلبي 
 
الرد
تم الشكر بواسطة:
#2
(09-01-21, 03:00 PM)PeterGhattas082460 كتب : السلام عليكم اخوتي الاعزاء
أريد كود يقوم بعرض صورة عند وضع مؤشر الماوس علي تكست بوكس مع امكانية تحديد مقاس الصورة التي ستظهر 
أريد كود زر يقوم بحفظ الصورة التي اريد عرضها ... اختار الصورة ليس من داخل البرمجة ولكن اثناء تشغيل البرنامج 

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

أتمني ان اكون قد استطعت توضيح طلبي 
 

دة كود اختيار الصورة من الجهاز وتقدر تضعة باي مكان او حدث 

كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim ofd As New OpenFileDialog
       ofd.Filter = ("Image File (*.ico;*.jpg;*.bmp;*.gif;*.png)|*.jpg;*.bmp;*.gif;*.png;*.ico") 'If you like file type filters you can add them here

       If ofd.ShowDialog = Windows.Forms.DialogResult.Cancel Then Exit Sub
       Try
           Dim bmp As New Bitmap(ofd.FileName)
         
           PictureBox1.BackgroundImage = Nothing
           PictureBox1.Image = bmp

       Catch ex As Exception
           MsgBox(ex.Message)
           Exit Sub

       End Try
   End Sub
الرد
تم الشكر بواسطة: ابراهيم ايبو
#3
(09-01-21, 08:52 PM)محمد اسماعيل كتب :
(09-01-21, 03:00 PM)PeterGhattas082460 كتب : السلام عليكم اخوتي الاعزاء
أريد كود يقوم بعرض صورة عند وضع مؤشر الماوس علي تكست بوكس مع امكانية تحديد مقاس الصورة التي ستظهر 
أريد كود زر يقوم بحفظ الصورة التي اريد عرضها ... اختار الصورة ليس من داخل البرمجة ولكن اثناء تشغيل البرنامج 

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

أتمني ان اكون قد استطعت توضيح طلبي 
 

دة كود اختيار الصورة من الجهاز وتقدر تضعة باي مكان او حدث 

كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim ofd As New OpenFileDialog
       ofd.Filter = ("Image File (*.ico;*.jpg;*.bmp;*.gif;*.png)|*.jpg;*.bmp;*.gif;*.png;*.ico") 'If you like file type filters you can add them here

       If ofd.ShowDialog = Windows.Forms.DialogResult.Cancel Then Exit Sub
       Try
           Dim bmp As New Bitmap(ofd.FileName)
         
           PictureBox1.BackgroundImage = Nothing
           PictureBox1.Image = bmp

       Catch ex As Exception
           MsgBox(ex.Message)
           Exit Sub

       End Try
   End Sub


الملفات المرفقة
.rar   show picture in mouse enter event.rar (الحجم : 374.79 ك ب / التحميلات : 10)
الرد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  أريد كود يمنع بعض الازرار الموجودة في الكيبورد من العمل ؟ GDRBN 1 77 17-01-21, 02:08 PM
آخر رد: moosa_alabri
  [سؤال] عايز كود يجمع اسماء الألوان ودراجتها في ليست بوكس حسن الجلب 1 112 16-01-21, 08:37 AM
آخر رد: moosa_alabri
  احتاج كود يقوم بتكملة رقم الجول تلقائيا بنفس الحقل عندما اقوم بكتابة جوال العميل mohamedgadain61 5 219 12-01-21, 07:52 PM
آخر رد: محمد بن عطية
  إثنين كومبو بوكس..أرجو المساعدة في طريقة التعامل معهم Alziny 4 254 05-01-21, 03:10 AM
آخر رد: Alziny
  [سؤال] سؤال في الماوس حسن الجلب 2 160 02-01-21, 12:15 AM
آخر رد: سعود
  مساعده في التكست بوكس اليوم السابع 5 278 26-12-20, 06:57 PM
آخر رد: اليوم السابع
  مساعدة في نقر الماوس على PictureBox YazanOtoum 5 2,311 24-12-20, 04:57 PM
آخر رد: fdhrg
  [VB.NET] القروب بوكس أم عمر 3 227 20-12-20, 09:47 PM
آخر رد: ميدو الفنان
Sad [VB.NET] كيفية تحديد صفوف معينة لي الطباعة Aziz170020 2 304 07-12-20, 09:53 PM
آخر رد: muaamar
  [VB.NET] كيف أجعل البرنامج يقوم بالتحديث Necro PC 2 267 06-12-20, 05:36 PM
آخر رد: Necro PC

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


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