تقييم الموضوع :
  • 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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] سؤال في vb.net و mysql في شبكة محلية بدون انترنت اللورد محمود 3 47 منذ 10 ساعة مضت
آخر رد: حريف برمجة
  [VB.NET] مطلوب مساعدة في برنامج يحدث اخطاء ay.alhaj 23 436 اليوم, 02:12 AM
آخر رد: عبد العزيز البسكري
  مساعدة هامة : احتاج طريقة مرنه لعرض منتجات من الداتا بيز في شكل صور او حتى button mohamedgadain61 2 62 أمس, 04:55 PM
آخر رد: mohamedgadain61
  كيف يتم ادراج صورة متحركة احمد خطاب 1 39 13-10-18, 12:09 AM
آخر رد: عبد العزيز البسكري
  مساعدة في datatGridviwe DOX.1 5 126 10-10-18, 12:23 AM
آخر رد: حريف برمجة
  [سؤال] اظهار صورة وسط picturebox Simo1991 4 68 09-10-18, 08:32 PM
آخر رد: Simo1991
  تكبير العرض في اداة الويندوز ميديا بلاير معاذ_ابراهيم 2 32 07-10-18, 02:30 PM
آخر رد: معاذ_ابراهيم
  [VB.NET] مساعدة بخصوص كود الحفظ ay.alhaj 19 276 04-10-18, 10:22 PM
آخر رد: ay.alhaj
  [سؤال] مساعدة في كود تحديث برنامج ScreamVoice 9 143 03-10-18, 02:48 PM
آخر رد: ScreamVoice
  [VB.NET] اضافة صورة فارغة لقاعدة البيانات محمد اسماعيل 5 102 03-10-18, 01:08 PM
آخر رد: محمد اسماعيل

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


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