الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

[ تمت الإجابة ]اريد مساعدة صغيرة بوضع برنامجى بجوار الساعة

مغلق
بدأه egyptforegypt في 1 أكتوبر 2008 · 10 رد · 3,285 مشاهدة · في أرشيف قسم Windows APIs
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

كل عام وانتم بخير

انا فى الحقيقة اريد مساعدة صغيرة جدا جدا جدا منكم

وانا والله كان نفسى اتعلمها لكنى لرسف الشديد لم اعرفها

واتمنى من سيدتكم ان تساعدونى فيها

اولا انا اريد ان اضع برنامج بجوار الساعة اسفل البار كما هى الموضحة بالصورة

75183036es0.gif

وايضا اريد ان اضع برنامج عند قائمة REFresh

كما هى بالصورة الاتية

38210496xk9.gif

انا اسف يا اخواننا نسيت اقول لكم ان طلبى يشمل باستخدام لغة الفيجوال بيسك 6

وجزاكم الله كل خير

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

اخواكم فى الله محم الفايد

تم تعديل هذه المشاركة بواسطة egyptforegypt في 1 أكتوبر 2008 في 09:23

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

موقعنا يقدم لكم خدمة البحث عن المفقودين

يمكنك ان تعلن عن اطفال مفقودين فى موقعنا مجانا

www.egyptloveme.com

#2

بالنسبة للطلب الأول، هذا مثال بـ ++C:

 

[color= #993333;]void Shell_NotifyIconExample[color= #009900;]([color= #009900;])

[color= #009900;]{

    [color= #666666; font-style: italic;]// Add a Shell_NotifyIcon notificaion

    NOTIFYICONDATA nid [color= #339933;]= [color= #009900;]{[color= #cc66cc;]0[color= #009900;]};

    nid.[color= #202020;]cbSize         [color= #339933;]= [color= #993333;]sizeof[color= #009900;](nid[color= #009900;]);

    nid.[color= #202020;]uID            [color= #339933;]= [color= #cc66cc;]100;      [color= #666666; font-style: italic;]// Per Windows Embedded CE docs, values from 0 to 12 are res
erved and should not be used.

    nid.[color= #202020;]uFlags         [color= #339933;]= NIF_ICON;

    nid.[color= #202020;]hIcon          [color= #339933;]= LoadIcon[color= #009900;](g_hInstance, MAKEINTRESOURCE[color= #009900;](IDI_SAMPLEICON[color= #009900;])[color= #009900;]);

    [color= #666666; font-style: italic;]// Add the notification to the tray.

    Shell_NotifyIcon[color= #009900;](NIM_ADD, [color= #339933;]&nid[color= #009900;]);

    [color= #666666; font-style: italic;]// Update the notification icon.

    nid.[color= #202020;]uFlags         [color= #339933;]= NIF_ICON;

    nid.[color= #202020;]hIcon          [color= #339933;]= LoadIcon[color= #009900;](g_hInstance, MAKEINTRESOURCE[color= #009900;](IDI_SAMPLEICON2[color= #009900;])[color= #009900;]);

    Shell_NotifyIcon[color= #009900;](NIM_MODIFY, [color= #339933;]&nid[color= #009900;]);

    [color= #666666; font-style: italic;]// Remove the notification from the tray.

    Shell_NotifyIcon[color= #009900;](NIM_DELETE, [color= #339933;]&nid[color= #009900;]);

    [color= #b1b100;]return;

[color= #009900;]}

الدالة التي تقوم بوضع هذه الأيقونة في الـ systray هي Shell_NotifyIcon والايقونة إما أن تقوم بتحميلها باستخدام LoadIcon أو يتم استخدام الافتراضية الخاصة بالويندوز

هناك أمر آخر هو أن هذه الدالة تستخدم الكتلة NOTIFYICONDATA والتي يجب ملؤها ببعض المعلومات والتي تظهر واضحة في الكود أعلاه.

لاحظ المتحول باسم nid الذي يمثل هذه الكتلة وكيف يتم وضع بعض القيم في بعض الخصائص فيها.

 
typedef struct _NOTIFYICONDATAA{
	DWORD cbSize;
	HWND hWnd;
	UINT uID;
	UINT uFlags;
	UINT uCallbackMessage;
	HICON hIcon;
#if (NTDDI_VERSION < NTDDI_WIN2K)
	TCHAR szTip[64];
#endif
#if (NTDDI_VERSION >= NTDDI_WIN2K)
	TCHAR szTip[128];
	DWORD dwState;
	DWORD dwStateMask;
	TCHAR szInfo[256];
	union{
		UINT  uTimeout;
		UINT  uVersion;  // Used with Shell_NotifyIcon flag NIM_SETVERSION.
	} DUMMYUNIONNAME;
	TCHAR szInfoTitle[64];
	DWORD dwInfoFlags;
#endif
#if (NTDDI_VERSION >= NTDDI_WINXP)
	GUID guidItem;
#endif
#if (NTDDI_VERSION >= NTDDI_VISTA)
	HICON hBalloonIcon;
#endif

هذه هي الكتلة كاملة.

Are you up to it هل تستطيع تغيير الكود وكتابة واحد مناسب بالفيجوال بيسك قبل أن يأتيك أحد بحل جاهز لا تتعلم به شئ جديد؟ :)

Do as I say, not as I do

We are Anonymous. We are Legion. We don't forgive. We don't forget

#3

السلام عليكم

اولا كل عام وانت بخير

انا فى الحقيقة مش عارف اقولك ايه

انت فعلا ساعتنى

بس انا مش بستخدم

C++

انا بستخدم الان الفيجوال بيسك 6

واتمنى ان اجد الطلب بتاعى

وكمان انا لدى سؤال

انا نفسى وانا بعمل البرنامج بتاعى المستخدم يدوس على زرار يعمل له

shortcut

على الديسك توب

وانا والله العظيم اذا كان هذا الطبي مش فى منتهى الاهمية بالنسبة لى

كزمانى ما عاملتش الموضوع ده فى العيد

فلعل وعسى اجد احد يساعدنى

الموضوع والله ما هو الا اكل عيش فقط

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

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

موقعنا يقدم لكم خدمة البحث عن المفقودين

يمكنك ان تعلن عن اطفال مفقودين فى موقعنا مجانا

www.egyptloveme.com

#4

لي عتاب لك أخي egyptforegypt وهو لماذا تكثر الحلف بالله العظيم ؟؟

هذه بعض المواضيع في الفوجول بيسك وأسئلتك كلها موجودة في هذا المنتدى فقط عليك البحث :

/index.php?showtopic=110557

/index.ph...st&p=335210

/index.php?showtopic=64376

/index.php?showtopic=40445

بالتوفيق . .

تم تحرير المشاركة بناءً على معطيات المشاركة التالية للأخ الفاضل Xacker

تم تعديل هذه المشاركة بواسطة عبد العزيز اليوسفي في 3 أكتوبر 2008 في 15:04

#5

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

Do as I say, not as I do

We are Anonymous. We are Legion. We don't forgive. We don't forget

#6
عبد العزيز اليوسفي كتب:
لي عتاب لك أخي egyptforegypt وهو لماذا تكثر الحلف بالله العظيم ؟؟

هذه بعض المواضيع في الفوجول بيسك وأسئلتك كلها موجودة في هذا المنتدى فقط عليك البحث :

/index.php?showtopic=110557

/index.ph...st&p=335210

/index.php?showtopic=64376

/index.php?showtopic=40445

بالتوفيق . .

تم تحرير المشاركة بناءً على معطيات المشاركة التالية للأخ الفاضل Xacker

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

اولا يا اخى انا اشكرك جدا على مساعدتك لى

ثانيا

انا والله العظيم لما بقف فى مشكلة وبعمل موضوع عشان اطلب فى لمساعدة

احيانا الناس بتفتكرنى انى بهزر(بمزح ) وجاى اضيع وقتهم

طيب بالله عليك

فى ليلة العيد اللى كل الناس بتعيدعلى اقاربهم وبتخرج وبتتفسح

وانا مطحون اما م الكمبيوتر حتى فى ليلة العيد كمان

والله يا اخى فانا اقسم بالله ان الامر مسئلة خطيرة جدا وبالذات فى لقمة عيشى

اتمنى ان تكون مسدقنى وفاهم قصدى

شيىء اخر

انا الان بدرس الاتى

visual basic 6

sql sever 2005

c# programming

oracle database

aps.net by c#

على الانترنت بواسطة مساعدة الاخرين ايضا ومنكم

انا فى الحقيقة بفهم فيهم بقدر الامكان بس مستوايا فيهم ما يأكلنيش عيش فى اى شركة

لاننى اذا تقدمت فى شركة سيطلبون منى شهادة خبرة

وكيف احصل عليها وانا اصلا حديث التخرج وعمرى ما اشتغلت فى اى شركة ؟

فانا بقدر الامكان بدرسهم كلهم حتى اتفوق فيهم كلهم

ولما ابحث عن عمل اجد رزقى فيها

فارجوكم لا تحرمونى من مساعدتكم حتى احترف فى اللغات كلها

لعل وعسى اجد واحدة منهم فقط واشتغل فيها فى اى شركة تريد توظيف

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

انا فى الحقيقة يا اخى .. وعايش تحت المساعدة من اقاربى

انا مش بطلب فلوس

لالا

انا بطلب علم انتفع به فى عملى حتى استطيع ان احصل على دخل حلال من رضا ربى

واتزوج باذن الله

وجزاكم الله خيرا

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

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

موقعنا يقدم لكم خدمة البحث عن المفقودين

يمكنك ان تعلن عن اطفال مفقودين فى موقعنا مجانا

www.egyptloveme.com

#7

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

mov eax, dword ptr ds:[0xffdf0308]

jmp dword ptr [eax+0xfc]

#8

طيب يا اخى على كل حال انا اشكرك جدا وجزاك الله خيرا

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

موقعنا يقدم لكم خدمة البحث عن المفقودين

يمكنك ان تعلن عن اطفال مفقودين فى موقعنا مجانا

www.egyptloveme.com

#9

أخي egyptforegypt

ونحن نصدقك ولا حاجة للحلف بالله

أسم الله نزهه عن لسانك في مثل حديث كهذا

اقتباس
انا والله العظيم لما بقف فى مشكلة وبعمل موضوع عشان اطلب فى لمساعدة

احيانا الناس بتفتكرنى انى بهزر(بمزح ) وجاى اضيع وقتهم

ولا حاجة لهذه الظنون ،خلاص أنت قلت أنت مستعجل وصدقنا

وهل تم حل مشكلتك

أعانك الله ووفقك لما تريد وأعطاك مما يحب

#10

مشكور يا اخى

انا هاقولك على متلباتى

فى الفيجوال بيسك 6 ناقصلى

فى

msgbox

انا دلوقتى عامل

اقتباس
Dim x As String

x = MsgBox("ddd", vbAbortRetryIgnore)

If x = vbAbort Then MsgBox "vbAbort"

If x = vbAbort Then MsgBox "Abort"

If x = vbRetry Then MsgBox "Retry"

If x = vbIgnore Then MsgBox "Ignore"

وبتظهر لى هذه الصورة

333wt9.gif

فانا فى الحقيقة مش عايز الرسالة مكتوب بها بالزاير الافتراضية الى هى

Abort × Retry × Ignre

انا عاوز ان يكون مكتوب باالزراير والبديل لها مثلا

حاول مرة اخرى × اخرج من البرنامج × موافقووون

بس كده ودى اخر شيىء

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

موقعنا يقدم لكم خدمة البحث عن المفقودين

يمكنك ان تعلن عن اطفال مفقودين فى موقعنا مجانا

www.egyptloveme.com

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…