المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : قنبله منتدى البرمجه "شرح" طريقة تصميم برنامج لتغيير ايقونة اي ملف exe بالصور


صقر البصره
09-20-2006, 11:02 PM
السلام عليكم
انبدأ بالشرح :

أفتح برنامج
Microsoft Visual Basic 6.0

وكالعادة أختر Standard EXE

بعد ظهور الفورم اضف المكونات كما بالصورة التاليــة
http://king18.jeeran.com/vb_icon-changer/1.gif

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


http://king18.jeeran.com/vb_icon-changer/2.gif

الان اذهب الى الصندوق واضف الاداة Common Dialog


http://king18.jeeran.com/vb_icon-changer/3.gif

http://king18.jeeran.com/vb_icon-changer/4.gif


الان اضغط على الاداة وادرجها في الفورم تبعك

http://king18.jeeran.com/vb_icon-changer/5.gif

http://king18.jeeran.com/vb_icon-changer/6.gif

بعد ذلك نحتاج الى إضافة Module

اضفه كما واضح ادناهـ ..



http://king18.jeeran.com/vb_icon-changer/7.gif


http://king18.jeeran.com/vb_icon-changer/8.gif


الان باقي الاكواد ...


كود تحديد الملف او السيرفر


رمز:


CommonDialog1.ShowOpenText1.Text = CommonDialog1.FileNameCommonDialog1.FileName = ""


كود تحديد الايقونة


رمز:


CommonDialog1.ShowOpenText2.Text = CommonDialog1.FileNameCommonDialog1.FileName = ""


كود بدا تغيير الايقونة


رمز:


Call changeicon(Text1.Text, Text2.Text)



وهذا كود المودل Module


رمز:


Declare Function changeicon Lib "bsicon.dll" (ByVal filepath As String, ByVal iconpath As String) As Long


الان كون برنامجك


http://king18.jeeran.com/vb_icon-changer/9.gif

انتهينا

ارجو ان يكون الشرح مفيد للجميع تقبلو خالص تحياتي
كلكامش
09-20-2006, 11:13 PM
مشكووووور حبيبي على الشرح المميز والجهد الرائع عاشت ايدك

بس انا عندي طريقة تسوي بيهة ايكونات بدون اي برامج

بس تفتح البينت و ترسم صورة بلابعاد 16*16

وتخزنهة بالامتداد ico يعني مثلا تكتب n.ico

وصارت عندك ايكونة خليهة لاي ملف او برنامج
AltaibSkt
09-21-2006, 12:06 AM
مشكور اخويه على الموضوع الجميل
المبرمج العراقي
09-21-2006, 01:01 AM
مشكور اخي على الشرح الوافي
ذيب بغداد
09-21-2006, 04:42 AM
عاشت ايدك حبي .... موضوعك مفيد انشالله صح اكو طرق هوايه لصنع الايكونات بس الطريقه اللي قدمتهه بالفعل مفيده وعاشت ايدك
صقر البصره
09-21-2006, 12:08 PM
تسلمون على المرور الكريم
وتدللون اخوان
مُتمسكةٌ بجُنوني
09-23-2006, 08:26 PM
شكرا صقوري عاشت ايدك
و يسلم مجهودك
FluidMan
09-23-2006, 09:14 PM
رائع يا صقر البصرة عاشت أيدك
صقر البصره
09-23-2006, 09:14 PM
تسلمين اختي العزيزه على المرور الكريم وتدللين
FluidMan
09-23-2006, 09:23 PM
اكولك بس لو توضحلنه بالضبط وين نخلي الاكواد كلها بالمودل لو وين؟
اشو خليتها كلها بالمودل يطلعلي خطأ
صقر البصره
09-23-2006, 09:30 PM
شكرا اخي على مرورك الكريم

الكود راح يكون خاص بالمودل الي انته صنعته
IRAQESKY
10-05-2006, 06:55 AM
حياك اله ابن البصرة والله فرحت من لكيتك هنا.........::37::::51::::51::::51::
FluidMan
10-05-2006, 03:12 PM
اكولك عزيزي مادبرتها بصراحة
ممكن تخلينه ملف مفتوح بلا أمرا عليك
® Sparks Man
10-05-2006, 09:18 PM
مشكوور اخيوه طريقه حلوة ومفيده
صقر البصره
10-05-2006, 11:46 PM
تسلم على مرورك الكريم اخي

اخ مان تره موضوع ما يحتاج تبسيط اكثر يصير مو حلو هههههههههههه
يعني ابسط من هاي ماكو بعد الا اذا تريد تشوف طريقه الاخ كلكامش
FluidMan
10-06-2006, 05:20 PM
تسلم على مرورك الكريم اخي

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

والله مادبرتها ::27:: لأن هاي مال مودل ومدري شنو جديدة عليه ::56::
صقر البصره
10-06-2006, 07:08 PM
حبي اذا هيجي جرب بطريقه البينت والله كريم
saeb123
07-25-2008, 10:37 PM
مشكووووووووووووووووووووووووووووووووووووووووووووووو وووووووووووووووووووووووووو
وووووووووووووووووووووووووووووووووووووووووووووووووو ووووووووووووووووو
وووووووووووووووووووووووووووووووووووووووووووووووووو ووووووور
يا غالــــــــــــــــــ يــا ابن الغاليـ ـــــــــــــــــــــــــــــــــي
صقر البصره
07-26-2008, 10:51 PM
تدلل حبي ويشرفني مرورك الكريم
ابن سوق الشيوخ
10-17-2009, 11:36 AM
راح احاول على العموم يسلمووووووو