الذي بكى شوقاً لرؤيتنا
وعلى آله الكرامِ الطيبين
الذين حمو الدين ليصلنا
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
يسُرني أن أُقدم لحضراتكم اليوم
درساً تطبيقياً مصوّرا
يشرح كيفية عمل [ عَارِض صور ] ,
أو كما يُسمى : [ Picture Viewer ]
يمكِن لهذا البرنامج عَرض الصور بالامتدادات التالِية :
[ BMP ] + [ JPEG ] + [ JPG ]
باختصار :
[ Windows Bitmaps ]
لنَ أثطِيل عَليكُم وكفاني ثَرثرة ,
لنبدأ باسمِ الله ,
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نذهب إلى خصائص الفورم :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
الآن نضع زرين , ليصبح شكل البرنامج هكذا :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
الآن نضيف أداة [ Picture Box ] :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نضيف أداة [ Open File Dialog ] :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
ليصبح في الفورم مثل هذا الشكل :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نذهب إلى خاصية [ File Name ] ونجعلها خالية :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نذهب إلى خاصية [ Filter ] ونكتب فيها ما يلي :
كود:
Windows Bitmaps |*.BMP|JPEG|*.JPG
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
الآن خاصية [ Title ] :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نضغط على زر [ Browse ] ضغطتين متتاليتين لكتابة الكود البرمجي :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نكتب الكود الآتي :
كود:
If
كود:
OpenFileDialog1.ShowDialog = WindowsForms.DialogResult.OK Then
PictureBox1.Image = ImageFromFile (OpenFileDialog1.FileName)
Me.Text = "Picture Viewer" & "(" & OpenFileDialog1.FileName & ")"
end if
OpenFileDialog1.ShowDialog = WindowsForms.DialogResult.OK Then
PictureBox1.Image = ImageFromFile (OpenFileDialog1.FileName)
Me.Text = "Picture Viewer" & "(" & OpenFileDialog1.FileName & ")"
end if
مع مراعاة ما لُوّن بالأحمر [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
ليصبح بهذا الشكل :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
كود:
Me.Close
Me.Close
الآن نجرب البرنامج ,,
بالضغط على الزر :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
هَاقد عَمِل البرنامج ,
يمكنك الاستمتاع الآن بعارض الصور الخاصّ بكِ
ابدأ بتطويره ولا تعجز أبدا
وتذكر أن الفشل بداية النجاح , -- فيلسوف [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
لمن لم تظهر معه الصور يرجى النقر على الصورة أدناه :
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
في الختام لا يسعني إلا أن أقول
الحمد لله الذي قدرني على طرح هذا الموضوع
اللهم إنا نسألك علماً نافعاً
وقلباً خاشِعاً
ولساناً ذاكِراً
والسلام عليكم ورحمة الله وبركاته
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
احمد السويسي03/10/14, 01:34 pm