[ VB.NET ] [درس] عمل برنامج لتحويل الصور لإيقونات

تم تحميل الصفحة في 0,6751860 ثانية
[درس] عمل برنامج لتحويل الصور لإيقونات

X-CoOoDER

X-ᏨᏫᎠᎬᎡ
rankrankrankrankrank
إنضم
22 سبتمبر 2013
المشاركات
2,626
الإعجابات
2,501
النقاط
113
الإقامة
أ‡أ،أŒأ¤أ¦أˆ أ‡أ،أڑأ‘أˆأ


الصلاة و السلام على أشرف المرسليـن ...~
الحمد لله وحده نحمده و نشكره و نستعينه و نستغفره و نعود بالله من شرور أنفسنا و من سيئات أعمالنا ...~
من يهده الله فلا مظل له و من يظلل فلن تجد له ولياً مرشدا ...~
و أشهد ألا إلاه إلا الله وحده لا شريك له و أن محمداً عبده و رسوله صلى الله عليه و سلم ...~
أما بعد ...~
فإن أصدق الحديث كتاب الله تعالى و خير الهدي هديُ سيدنا محمد صلى الله عليه و سلم ...~
و شر الأمور محدثاتها و كل محدثة بدعة و كل بدعة ضلالة و كل ضلالة في النار ...~

فاللهم أجرنا و قنا عذابها برحمتك يا أرحم الراحمين ...~



درس اليوم هو عن إنشاء برنامج يقوم بتحويل أي صورة لأيقونة



نقوم بعمل مشروع جديد

ونضيف الية

2 أزرار

OpenFileDialog1

وقم بالتعديل على خاصية filter

لتحديد الأمتدادات المسموحة

كود Visual Basic
allImages|*.Bmp;*. Emf;* gif;* . icon;* .jpeg;* .png;* . tiff;* . Emf;* . wmf


SaveFileDialog1

PictureBox1

وتستطيع إضافة اي شي أخر حسب رغبتك وذوقك في تزيين المشروع

الأن نعدل على خصائص ال PictureBox1 ونقوم بتحويل الخاصيةvisible الى false



لإخفاء معاينة الصورة اما لو تريد اضهار المعاينة خلي الخاصية visible true



الأن نقوم ببرمجة زر الفتح ووضع هذا الكود به

كود Visual Basic
    OpenFileDialog1.ShowDialog()
        Try
            PictureBox1.BackgroundImage = Image.FromFile(OpenFileDialog1.FileName)
        Catch ex As Exception
            MsgBox("حدث خطأ أثناء تحميل الصورة")
        End Try




الأن نقوم ببرمجة زر التحويل ووضع هذا الكود بة

كود Visual Basic
  SaveFileDialog1.Filter = "ico|*.ico"
        SaveFileDialog1.ShowDialog()
        PictureBox1.BackgroundImage.Save(SaveFileDialog1.FileName, Drawing.Imaging.ImageFormat.Bmp)




ليصير هكذا





هنا السورس كود مشروح بالتفصيل




الأن نقوم بتجربة البرنامج

أترككم مع الشرح الفيديو


http://www.youtube.com/watch?v=v-Dza3oIB6A&feature=youtu.be

لتحميل السورس كود مشروح بالتفصيل باللغة العربية



حملة تنشيط قسم لغة VB.NET


في أمان الله
 

CorrM

Just a Programmer
rankrankrankrankrankrank
إنضم
27 ديسمبر 2013
المشاركات
3,704
الإعجابات
7,053
النقاط
113
العمر
22
الإقامة
Egypt
رد: [درس] عمل برنامج لتحويل الصور لإيقونات

عمل رااااااائع و يحتاجه الكثير من الناس

مميز - منسق - رائع - مبدع = ƁƛƬ MƛƝ

يوشم بالخماسى - تقيم
 

X-CoOoDER

X-ᏨᏫᎠᎬᎡ
rankrankrankrankrank
إنضم
22 سبتمبر 2013
المشاركات
2,626
الإعجابات
2,501
النقاط
113
الإقامة
أ‡أ،أŒأ¤أ¦أˆ أ‡أ،أڑأ‘أˆأ
رد: [درس] عمل برنامج لتحويل الصور لإيقونات

عمل رااااااائع و يحتاجه الكثير من الناس

مميز - منسق - رائع - مبدع = ƁƛƬ MƛƝ

يوشم بالخماسى - تقيم
شكرا لمرورك العطر :218: سلمت أناملك أخي الغالي :218: :218: :218:
 
إنضم
30 يونيو 2014
المشاركات
2,340
الإعجابات
5,313
النقاط
113
الإقامة
فلسطين العزة
رد: [درس] عمل برنامج لتحويل الصور لإيقونات

السلام عليكم ورحمة الله وبركاته

رائع جداً أخي الكريم :42: .. جزاك الله كل خير .. لكن المشكلة في هذه الطريقة أن الـ Visual Studio لا يقبل الأيقونات الناتجة.


 

X-CoOoDER

X-ᏨᏫᎠᎬᎡ
rankrankrankrankrank
إنضم
22 سبتمبر 2013
المشاركات
2,626
الإعجابات
2,501
النقاط
113
الإقامة
أ‡أ،أŒأ¤أ¦أˆ أ‡أ،أڑأ‘أˆأ
رد: [درس] عمل برنامج لتحويل الصور لإيقونات

السلام عليكم ورحمة الله وبركاته

رائع جداً أخي الكريم :42: .. جزاك الله كل خير .. لكن المشكلة في هذه الطريقة أن الـ Visual Studio لا يقبل الأيقونات الناتجة.



صحيح كلامك لو تركو على هذا الكود الموجود في زر التحويل

كود C#
  SaveFileDialog1.Filter = "ico|*.ico"

        SaveFileDialog1.ShowDialog()

        PictureBox1.BackgroundImage.Save(SaveFileDialog1.FileName, Drawing.Imaging.ImageFormat.Bmp


ستلاحظ ان imageformat

bmp

حتى لو خليناها icon لا يقبلها الفيجول ستوديو ايضا + لا تظهر اصلا

بس الايقونة الحالية قمت بتجريبها ببرامج اخرى واشتغلت :10:
 

DR-WoWo

مُراقب عام تطوير المواقع
طاقم الإدارة
إنضم
4 أغسطس 2011
المشاركات
11,489
الإعجابات
16,232
النقاط
113
الإقامة
مكة المكرمة
رد: [درس] عمل برنامج لتحويل الصور لإيقونات

ماشاء الله عليك ياغالي :637477:

درس رائع فعلا وومميز
 

? ? ? ? ? ?

.:: مُشرف أقسام الإنمي ::.
rankrankrankrank
إنضم
3 نوفمبر 2013
المشاركات
1,754
الإعجابات
1,992
النقاط
113
الإقامة
Palestine Free
رد: [درس] عمل برنامج لتحويل الصور لإيقونات

درس اكثر من رائع
كالاعادة ابداع X ابداع
 

hatemabed99

لحن الحياة الموت
rankrank
إنضم
13 أبريل 2013
المشاركات
298
الإعجابات
184
النقاط
43
رد: [درس] عمل برنامج لتحويل الصور لإيقونات

:yaho: بطل. شكرا. موضوع جميل ≥﹏≤
 

J A C K

Beginner Developer
rankrankrank
إنضم
2 فبراير 2014
المشاركات
687
الإعجابات
569
النقاط
0
رد: [درس] عمل برنامج لتحويل الصور لإيقونات

شرح رائع :10:
درس جميل ومفيد :2 (64):
يستفاد منه جميع الاعضاء :130:
عاشت ايدك جاري التجربة وتقيمك :yaho:
 

الأعضاء النشطين حاليآ الذين يشاهدون هذا الموضوع (1 عضو و 0 ضيف)

خيارات الاستايل

نوع الخط
مودك
اخفاء السايدر بار OFF
توسيط المنتدى OFF
فصل الأقسام OFF
الأقسام الفرعية OFF
عرض المشاركات
حجم الخط
معلومات العضو OFF
إخفاء التوقيع OFF

إرجاع خيارات الإستايل