إضافة ايقونه جديدة إلى لوحة التحكم

هل من مجيب ...

طيب عبرونا.

لن افقد الأمل في ردكم ...

http://www.planet-source-code.com/URLSEO/v...3;7/anyname.htm

جرب هذه و اسف على التأخير

شكرا اخي/ راكان ...

هذا يمكنني من إضافة برنامج ضمن اضافة وازالة البرامج انا اريد ان اضيف ايقونه لبرنامجي مثل ايقونة اضافة وازالة البرامج أو غيرها ...

ارجو ان يكون ذلك واضحاً ....تحياتي

السلام عليكم

جرب هذا

http://djernaes.dk/martin/delphi.html#cpl

هذا وجدته خلال اقل من دقيقتين اثناء البحث في google . يمكنك ان تجد غيره .

Just google it

تحياتي

CIONO1

احييك اخي على مهارتك الفائقه في البحث ...

انا اعرف ان هناك مواقع للبحث كثيره جداً ولكن نحن هنا في منتدى نقاش برمجي لغرض الوصول الى تبادل الافكار فيما بيننا والإستفادة فلو اجبنا على كل سؤال يطرح بهذه الطريقه (اي ان نقول له ابحث في قوقل او غيره) لما كان هناك داعي للمنتديات مع احترامي لأن معظم المواضيع والأسئلة التي تطرح يمكن البحث عنها.

مع العلم بإني قبل أن أطرح سؤالي بحثت في المنتدى إذا كان الموضوع موجود مسبقاً فلم اجده.

اعيد واكرر ان غرضي من السؤال هو طلب الإستفسار من مبرمج بحث وتوسع في مجال سؤالي ولديه افكار او اطروحات جديده تتعلق بالموضوع لغرض إثارة الموضوع وإستفادة الجميع وتوفير الجهد والوقت فعالم البرمجه واسع جداً كما تعلمون ولو عملنا بالتوازي وبدأنا من حيث انتهى الأخرون لحققنا شي عظيم.

أشكرك واشكر كل من شارك في الموضوع ... واسف على التطويل.

وإليكم الوصلة التالية حول هذا الموضوع.

اضافة ايقونة جديدة الى لوحة التحكم

عفوا الرابط مرة اخرى

اضافة ايقونه للوحة التحكم

السلام عليكم

وضعت لك وصلة فيها الاجابة المباشرة لسؤالك وذلك لان الموضوع ليس فيه أي شئ جديد - ليس فيه أي ابداع - .

يعني بدلا ان اضع الكود هنا لأوهم غيري انني من كتب الكود فقد وضعت لك الوصلة مباشرة.

في حالة انك وجدت ان الكود فيه اشياء غامضة او تريد اضافة اشياء فيه فأهلا وسهلا كلنا تحت الخدمة و ممكن نتناقش .

اصبحت هذه طريقتي في الاجابة لأني كنت من قبل اضع شرح او اضع رد منتظر اي نوع من النقاش لكن لم يكن يحدث هذا أبدا. فأغلب من يسئل في المنتديات العربية يريد السمكة جاهزة ولايريد أن يتعلم كيف يصطادها

لو كنت تريد ان تتعلم كيف تصطاد السمكة فأهلا وسهلا ... شخصياً أنا من ذلك النوع ..

البحث في google ليس عيبا العيب هو أن نواجه مشكله ونريد الحل السريع دون أدنى جهد . حتى أن يصل الاستهتار من بعض الأعضاء - الحمد لله انك لست منهم- بوضع سؤال عن برنامج متكامل !!!

اعيد واكرر ان غرضي من السؤال هو طلب الإستفسار من مبرمج بحث وتوسع في مجال سؤالي ولديه افكار او اطروحات جديده تتعلق بالموضوع لغرض إثارة الموضوع وإستفادة الجميع وتوفير الجهد والوقت

شخصيا ليس لدي الوقت لاعطاء شرح متكامل عن شئ توفرت عنه المعلومات من قبل. ان كان هناك نقاط غامضة ربما أشارك بما أستطيع عليه ..

عذرا , ربما لا تعجب طريقتي في الرد البعض . ان كان كذلك فاسهل طريقة هي اخبار المشرف :)

تحياتي

CIONO1

ما الفرق بين لصق نص كامل حول الموضوع و إعطاء وصلة ؟!

:)

الذي يقوم بإعطائك وصلة للموضوع، اعذره ، فقد لا يكون لديه الوقت الكافي لقراءة الموضوع ، وصياغته بأسلوبه الخاص ، ومن ثم كتابته لك ، ولا يريد تحمل مسؤولية كلام كتبه ، أو على الأصح عمل له copy-paste ، وهو غير متأكد من نصه.

ويا أخي على الأقل اشكر له جهده الذي بذله في البحث في أعماق جوجل ، أو في أعماق MSDN أو في أعماق مواقع الجامعات ومراكز الأبحاث العالمية وغيرها ليعطيك رابط موضوعك الذي طلبته بالضبط. فلو كان عنده الوقت الكافي لشرح لك الموضوع شرحا وافيا.

السلام عليكم...

1- بالنسبة لي الموضوع يعتبر جديد وكذلك في المنتدى لم يطرح من قبل.

2- اشكرك على الوصلة ولكني وجدت ان الرد فيه نوع من السخرية إذا صح التعبير

3- الكود لم استطع تنفيذه عملياً وغير مفهوم بالنسبة لي وبالتحديد:-

Create a new DLL project

ModuleHandle := GetModuleHandle('YourFile.ext');

Result := LongInt(ModuleHandle <> INVALID_HANDLE_VALUE);

Exports

CPLApplet Index 1;

على العموم اشكرك واشكر تجاوبك مع الأعضاء الذين يبحثون عن الإستفادة وعلى فكره انا احب صيد السمك أكثر من ان اجدها جاهزة واسف إن صدر مني أي خطأ وهذا مجرد تعبير عن رأي شخصي.

هذا وجدته خلال اقل من دقيقتين اثناء البحث في google .

عليكم السلام

لم تكن تلك العبارة الغرض منها السخرية بتاتاً , ربما كان سوء في استخدام التعبير ليس إلا ..

القصد أنه كان بامكانك الحصول على الحل عن طريق البحث . فبمجرد انني بحثت عن المشكله في google كانت هناك نتائج من ضمنها تلك الوصلة .

بالنسبة للنقاط الغامضة في الوصلة أوعدك اليوم ان شاء الله اكتب عن الموضوع -ان وجدت وقت فراغ - فما زلت الان في العمل (باقي اقل من ثلاث ساعات تقريبا )...

تحياتي

CIONO1

اشكرك اخي ...

سوء فهم مني واعتذر واشكرك على سعة صدرك اخي العزيز...

مع اسمى تحياتي...

السلام عليكم

اعتذر لعدم الرد لانشغالي بالعمل في الفترة السابقة .

هناك وصلة فيها شرح مفصل و مبسط . اقرأ الموضوع وجرب المثال ان كان هناك اي تساؤلات يمكن تضعها هنا ..

http://rxlib.ru/faqs/faqd_en/16043.html

بالنسبة لعمل DLL project كالآتي :

File\New\others

then choose dll wizard

--

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

const NUM_APPLETS = 1;

والسطر هو :

{$E cpl}

ومعناه أن الملف الناتج بعد عمل build سيكون بالامتداد cpl

بعد ان تكمل كل شئ ضع الملف المتكون في مجلد النظام system32 (يعتمد إسم المجلد على الويندوز ..) .

بالنسبة للسطرين

ModuleHandle := GetModuleHandle('YourFile.ext');
Result := LongInt(ModuleHandle <> INVALID_HANDLE_VALUE);

فستقرأ أن CPL_INIT تعيد قيمة True للاستمرار في عملية تحميل البرنامج للذاكرة ..

يمكن الاستغناء عنهما بكتابة

result:=1

اقرأ الموضوع بتمعن فهناك عدة أشياء لازم تعملها ..

منتظرين أسئلتك :) ..

تحياتي

CIONO1

شكرا جزيلاً اخي...

سأقرا الموضوع واطبقه عملياً واعود إليك ان استعصى شي..

وفقك الله .