مساعدة في تكبير صورة في picture box بدون فقدان جودتها

تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة في تكبير صورة في picture box بدون فقدان جودتها
#1
السلام عليكم
انا الان اسوي صفحة Bookmarks
لمشروع المتصفح اللي اسويه
فكرة الموضوع
ان في setting اسمه Fav
هذا كل ما اضغط علي زر Bookmark
يضيف لينك الصفحة الموجودة بالويب براوزر
و في زر Bookmarks موجود
المفترض انه يسوي new tab بال tab control
و يحط ال favicon حقت الموقع في picturebox
 و تحته label به اللينك
للان ما في مشاكل لكن انا اشرح الوضع
انا مشكلتي ان ال favicon حجمها
 16x16 
او 32x32
و لهذا يجب ان اعدل ال size mode في ال picture box الي Stretch Image
و اكبر حجمه
و ذي ما فيها مشكلة
لكن لمن الصورة تكبر تكون مبكسلة جداً
بحيث انه تقريبا لا يظهر منها شئ
فهل يوجد طريقة لتكبيرها بدون فقدان الجودة
او علي الاقل تكون واضحة ؟
انا استخدم ذالكود
PHP كود :
       For Each mark As String In My.Settings.FAV
            Dim url 
As Uri = New Uri(mark)
 
           If url.HostNameType UriHostNameType.Dns Then
                Dim iconURL 
"http://" url.Host "/favicon.ico"
 
               Dim request As System.Net.WebRequest System.Net.HttpWebRequest.Create(iconURL)
 
               Dim response As System.Net.HttpWebResponse request.GetResponse()
 
               Dim stream As System.IO.Stream response.GetResponseStream()
 
               Dim favicon Image.FromStream(stream)
 
               pb.Image favicon
                link
.Text mark.ToString
                pb
.SizeMode PictureBoxSizeMode.StretchImage
                pb
.Size = New Size(128128)
 
               link.Location = New Point(pb.Location.Xpb.Height link.Height)
 
               Bookmark.Controls.Add(link)
 
               Bookmark.Controls.Add(pb)
 
           End If
 
       Next 
 
في شوية صور توضح اكثر في المرفقات
و اذا احتاجتم اي شئ قولوا لي
الرد
تم الشكر بواسطة:
#2
المفروض أن كود مثل التالي قد يفي بالغرض لكنه لن يكون دقيقا تماما


PHP كود :
       Dim source As Bitmap My.Resources.CloseButtonHot
        Dim factor 
As Integer 2
        Dim dest 
As Bitmap = New Bitmap(Image.FromHbitmap(source.GetHbitmapIntPtr.Zero), New Size(source.Width factorsource.Height factor))
 
    

للأسف الدوت نت لا يوجد بها كود او كلاس مباشر يمكنه تنفيذ ما تريده بكل دقة

عملية تكبيير الصورة بشكل دقيق و بدون أن تفقد Resolution تحتاج الأتي
قراءة اللون من الصورة لكل بكسل
تأخذ اللون و ترسمه في مستطيل أكبر بمقياس الرسم الجديد
ويجب تنفيذ هذا لكل لون في الصورة
و طبعا الموضوع محتاج سرعة شديدة لأن الصورة قد يكون بها عدد ضخم جدا من الألوان
الموضوع صداع شوية و أنا مش عايز أدخلك في متاهة قد لا تخرج منها
Retired
الرد
تم الشكر بواسطة: salahmax12 , salahmax12
#3
PHP كود :
pb.SizeMode PictureBoxSizeMode.Zoom 
الرد
تم الشكر بواسطة: salahmax12 , salahmax12
#4
(10-11-17, 03:01 PM)silverlight كتب : المفروض أن كود مثل التالي قد يفي بالغرض لكنه لن يكون دقيقا تماما


PHP كود :
       Dim source As Bitmap My.Resources.CloseButtonHot
        Dim factor 
As Integer 2
        Dim dest 
As Bitmap = New Bitmap(Image.FromHbitmap(source.GetHbitmapIntPtr.Zero), New Size(source.Width factorsource.Height factor))
 
    

للأسف الدوت نت لا يوجد بها كود او كلاس مباشر يمكنه تنفيذ ما تريده بكل دقة

عملية تكبيير الصورة بشكل دقيق و بدون أن تفقد Resolution تحتاج الأتي
قراءة اللون من الصورة لكل بكسل
تأخذ اللون و ترسمه في مستطيل أكبر بمقياس الرسم الجديد
ويجب تنفيذ هذا لكل لون في الصورة
و طبعا الموضوع محتاج سرعة شديدة لأن الصورة قد يكون بها عدد ضخم جدا من الألوان
الموضوع صداع شوية و أنا مش عايز أدخلك في متاهة قد لا تخرج منها

همممم .. انا لست بالمنزل حاليا ولهذا لا استطيع تجربتي الكود و لكن هل يمكنك شرحه قليلا .... فبكل اسف لم استطع إدراك ما يفعله
الرد
تم الشكر بواسطة:
#5
انا فقط وضحت لك ماذا يحدث عند تكبيير الصورة أو بمعني أدق ماذا سيحدث معك عند عمل Stretch للصورة
خاصة لو كانت الصورة صغيرة
الكود المكتوب يأخذ الصورة الأصلية و يضرب ابعادها في مقياس رسم factor جديد و يصنع منها صورة جديدة بأبعاد جديدة
ولأني مش عايز أدخلك في متاهة كبيره
استخدمت الكود في شكله البسيط هذا
Retired
الرد
تم الشكر بواسطة: salahmax12


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  جلب هذه الروابط بدون الويب براوزر ابو روضة 6 88 13-08-18, 08:26 PM
آخر رد: elgokr
  ممكن مساعدة في ارسال رسالة بي لغة العربية الزوي 22 311 12-08-18, 04:56 AM
آخر رد: الزوي
  مساعدة في تطبيق هذا الدرس لتحديث اداة WebBrowser ahmedhhh2 5 66 10-08-18, 05:20 PM
آخر رد: ahmedhhh2
  مساعدة في جملة إستعلام نور الهدى الهدى 20 386 09-08-18, 12:09 PM
آخر رد: نور الهدى الهدى
  [سؤال] كود البحث بالتاريخ عقدني هل من مساعدة بكود البحث بالتاريخ vb.net and sql essawq 3 86 04-08-18, 04:01 PM
آخر رد: aljzazy
  مساعدة في حل sqlite add datetime مشكلة annaba2015 9 95 04-08-18, 08:55 AM
آخر رد: elgokr
  ارجو المساعده اريد عمل البرنامج يتحدث تلقائيا بشرط بدون تحميل الاصدار الجديد ahmedngah36 4 114 30-07-18, 06:38 AM
آخر رد: GameOver
  نقل قاعدة البيانات الى جهاز آخر بدون تثبيت SQL Server Management أسامة السالمي 10 312 28-07-18, 03:39 AM
آخر رد: dametucorazon
  [VB.NET] ممكن مساعدة في كتابة كود يمنعني من كتابة تاريخ يكون اصغر من اخر تاريخ أدخلته في الدات annaba2015 3 81 28-07-18, 03:17 AM
آخر رد: elgokr
  طلب مساعدة واجهتني مشكلة في واجهة تسجيل الدخلو للبرنامج فراس الغزي 4 88 26-07-18, 10:02 PM
آخر رد: aljzazy

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


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