عايز اكبر الصور باليست فيو والبرنامج شغال
استخدمت الكود دة بس منفعش
PHP كود :
ImageList1.ImageSize = New System.Drawing.Size(110, 120)
السلام عليكم ورحمة الله
عند استخدامك للكود السابق فإنك تلغي جميع الصور الموجودة فيها وينتظر منك إضافة الصور من جديد
طيب انا عايز الطريقة الي اكبر بيها الصور بدون الغاء او الانتظار لاعادة التحميل من جديد زي ماحضرتك وضحت
السلام عليكم ورحمة الله
مش حينفع أخي الكريم لأن الصور الموجودة سابقا قد تم تصغيرها للمقاس المحدد من البداية، ولو كبرتها مش حتعجبك
وعشان تعرف المشكلة جرب التالي وسترى شكل الصور أصبح شكلها ازاي
PHP كود :
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
Dim imgListDictionary As New Dictionary(Of String, Image)
For i = 0 To Me.ImageList1.Images.Count - 1
imgListDictionary.Add(Me.ImageList1.Images.Keys(i), Me.ImageList1.Images(i))
Next
Me.ImageList1.ImageSize = New Size(110, 120)
For Each d In imgListDictionary
Me.ImageList1.Images.Add(d.Key, d.Value)
Next
End Sub
احترمك كثيرا واحترم ردك بس البرمجة مفيهاش كلمة مش هينفع
السلام عليكم ورحمة الله
ههه، عجبني ردك إن "البرمجة مفيهاش كلمة مش هينفع" وهاد يدل أنك لا تستسلم لليأس
طيب يالغالي
يمكن إضافة عدة ImageList وكل واحدة بمقاس معين
لو تلاحظ أن أداة ListView فيها خاصيتين واحدة SmallImageList والثانية LargeImageList
يعني حدد لكل واحدة منهم ImageList مخصصة للمقاس المطلوب
إذا كنت تريد غير ذلك فهناك طريقة متعبة قليلاً
وهي وضع الصور الأصل في الريسورس بمقاسها الطبيعي وتقوم بتعبئة أداة ImageList منها حسب المقاس الذي ترغب
انا اضعها في فولدر وليس الريسورس عشان ذاكرة البرنامج متبقاش كبيرة
السلام عليكم ورحمة الله
تمام ولو إنه لو كانت الصور في الريسورس يكون أفضل عشان مشكلة فقدان إحدى الصور نتيجة الحذف الخطأ مثلا
مادام الصور في مجلد تقدر تعبيها بالطريقة التالية ( إذا كنت لا تحدد الصورة بالاسم ممكن تحذفه وفيه سطر مثال لذلك)
PHP كود :
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
Me.ImageList1.ImageSize = New Size(110, 120)
Me.ImageList1.ColorDepth = ColorDepth.Depth32Bit
Me.ImageList1.Images.Add("اسم1", Image.FromFile("image1.jpg")) ' إسم الصور لازم ما يتكرر '
Me.ImageList1.Images.Add("اسم2", Image.FromFile("image2.jpg"))
Me.ImageList1.Images.Add("اسم3", Image.FromFile("image3.jpg"))
Me.ImageList1.Images.Add(Image.FromFile("image4.jpg")) ' مثال صورة بدون اسم '
End Sub
كدة معملناش حاجة انا عايز مقاسات من الصور مختلفة انت كدة رجعت لنقطة الصفر
يعني لو انا حملت الصور بالمقاسات العادية 50و 60عايز اغيرها في وقت تشغيل البرنامج بحيث الصور كلها تبقي واضحة وهية صغيرة ولما اختار صورة واحددها اكبرها بعد كدة زي منا عايز مثلا 90و80
زي خاصية لايضاح رؤية الصورة
السلام عليكم ورحمة الله
واضح إنك ما جربتش الكود الأخير، ---أنا جربت الكود وشغال تمام---
انت لمن تعمل Me.ImageList1.ImageSize إنت كده بتحذف الصور الموجودة في الأداة أصلاً
وبعدها نعبيها من الصور التي في المجلد والي المفروض أصلاً هي كبيرة ولكن سيتم إعادة تحجيمها بناء على آخر مقاس أنت حددته
لكن لو كانت الصور الأصلية أصلا صغيرة وعاوز تكبرها أكيد ما تطلع واضحة
إن شاء الله تكون وضحت الفكرة، وجرب وبعدين قلي...
نسيت أقلك ما تنس تضع الدقة Me.ImageList1.ColorDepth = ColorDepth.Depth32Bit قبل ما تعبي الصور
(أضفتها في الكود الأخير)
ما فهمت ايه قصدك (خاصية لايضاح رؤية الصورة)