للمهتمين هدية للمهتمين اختيار صورة من (Shell32.Dll) وحفظها بمجلد وبجدول وعرضها .

[kkhalifa1960]

اختيار صورة من (Shell32.Dll) وحفظها بمجلد وبجدول وعرضها .

Chose and Save Icon From Shell32.Dll.rar

[ابوخليل]

احسنت استاذ خليفة واجدت .. موضوع يستحق التثبيت

استفسار لا ينقص من جهدك وعملك :

كما هو معلوم ان الايقونة في ملف النظام موجودة بأكثر من حجم .. صغير/ كبير

هل بالامكان المحاولة لاستخراج الايقونة حسب الحجم؟

 

[Foksh]

ما شاء الله ، عمل جميل أستاذنا الكبير @kkhalifa1960 ، لكن لسوء حظي  ، لم أتمكن من رؤية النتيجة ، وظهر الخطأ التالي :-

عند السطر :-

If OleCreatePictureIndirect(PicDesc, IID_IPicture, True, IPic) = 0 Then

مع العلم انني استخدم اصدار أوفيس 2019 - 64 بت

[Moosak]

شكرا لك أستاذ خليفة 🙂 

إجتهدت .. فوجدت .. فأجدت .. 💪🏻

 

ولكن على ما يبدو أن الكود يعمل بكفائة على البيئة 32 بت ، ولكن قد تختلف أسماء الملفات على البيئة 64 بت :

[kkhalifa1960]

أستاذنا @ابوخليل .

أما عن استخراج الايقونة حسب الحجم . لاحظ الأيكونات المستخرجة كلها حجمها (766bits) . 

أستاذ @Foksh وأستاذ @Moosak أنا أعمل على (windows 10 32-bit) و أوفيس (10) أيضاً . 

اخواني أشكركم جميعاً  . 

[kkhalifa1960]

8 ساعات مضت, ابوخليل said:

احسنت استاذ خليفة واجدت .. موضوع يستحق التثبيت

استفسار لا ينقص من جهدك وعملك :

كما هو معلوم ان الايقونة في ملف النظام موجودة بأكثر من حجم .. صغير/ كبير

هل بالامكان المحاولة لاستخراج الايقونة حسب الحجم؟

تفضل استاذنا @ابوخليل حسب مافهمت حفظ الصورة حسب الاختيار .

Chose and Save Icon From Shell32.Dll.rar

[kkhalifa1960]

وبطريقة أخرى . تفضلوا . المرفق به نموذجان النموذج الأول هي الطريقة السابقة والنموذج الثاني به الطريقة الجديدة . 

Chose(small-large) and Save Icon From Shell32.Dll.rar

[Eng.Qassim]

عمل جميل استاذنا @kkhalifa1960

رغم اني الجأ الى الايقونات من النت ...لكن فكرتك جميلة وسريعة 

[kkhalifa1960]

شكراً أستاذي @Eng.Qassim .