كيف نصغر قاعدة البيانات بجانب الساعة؟

[عبدالعزيز محمد]

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

لدي قاعدة بيانات خاصة بعملي وأقوم بالعمل عليها باستمرار وأحياناً احتاج للعمل على برامج أخرى وعند الخروج من قاعدة البيانات للعمل على البرامج الأخرى اقوم بالخروج من النموذج ثم أقوم بتصغير قاعدة البيانات وهذا ممل

أود تصغير قاعدة البياناتبجانب الساعة بنقرة واحدة على زر يوضع في النموذج Formcontrolpanel-Formsudents وعند العودة أنقر على الرمز فتعود قاعدة البيانات نشطة.

مع العلم بأنني اعمل على أكسس 2010 .

حاولت رفع الملف ولكن المنتدى يرفض رفع ملفي ولا اعلم سبب المنع حبذا لو يدلني أحد على طريقة رفع الملفات في منتدانا الغالي

وهذا رابط قاعدة البيانات

 

http://www.gulfup.com/?TH3BRz

[عبدالرحمن هاشم]

ممكن ترفق طلبك بتنسيق 2003

[خالد عبد المنعم]

اخى الكريم عن طريق Shell_NotifyIcon

لا تنسى اضافة صوره على السى مباشرة بأمتداد ico و يمكنك تغيير اسمها بدل من khaled.ico الى اى اسم اخر

Private Sub Command3_Click()
Me.Show
       Me.Refresh
       With nid
        .cbSize = Len(nid)
        .hwnd = Me.hwnd
        .uID = vbNull
        .uFlags = NIF_ICON Or NIF_TIP Or NIF_MESSAGE
        .uCallbackMessage = WM_MOUSEMOVE
        .hIcon = LoadPicture("c:\khaled.ico")
        .szTip = "admiral" & vbNullChar
       End With
       Shell_NotifyIcon NIM_ADD, nid
End Sub

'لأخفائها'

Private Sub Command4_Click()

       Shell_NotifyIcon NIM_DELETE, nid
End Sub

[عبدالعزيز محمد]

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

لم ينجح الكود معي فقد حاولت مرارا .

ما تقصد بـ Shell_NotifyIcon ؟

حبذا لو تم تطبيقه على الملف المرفق وهو باصدار أكسس 2010.

 

تم تعديل ديسمبر 6, 2014 بواسطه عزيز 60

[خالد عبد المنعم]

اخى الكريم الـ Shell_NotifyIcon عباره عن موديول 

و يوجد له عدة انواع حسب اسخدامك له

 

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

 

api.zip

 

[عبدالعزيز محمد]

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

لم ينجح المثال المرفق معي

نأمل من أخينا admiral تطبيق الكود على الملف المرفق في أعلى المشاركة

والسلام مع العلم بأنني استخدم أكسس 2010

تم تعديل ديسمبر 6, 2014 بواسطه عزيز 60

[ابو جودي]

الكود شغال ممتاز على اكسس 2013 يبدو ان الخلل عندك انت استاذ  عزيز 60

[خالد عبد المنعم]

اخى الكريم عزيز 60

 

اولا الموديول مصمم على 2013 و جربته على 2010 و 2007 و 2003 و 2000 قبل نشره على الموقع

 

احتمال كبير تكون المشكله عندك فى ال Security Warning حاول تعمله enable content

 

ثانيا انا لم اطبق على ملف مشاركتك و ذلك لانى اريدك ان تطبق الشىء بنفسك 

 

اما اذا اردت تطبيقه على ملفك فاعمل import للموديولز و الفورم 

 

و بالتوفيق

[عبدالعزيز محمد]

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

جزاكم الله خيراً ومشكورين على الجهد في سبيل إثراء منتدانا الغالي.

لقد وجدت أكثر من موديل في الملف المرفق من طرفكم وأود أن استورده كما قلت سابقاً فأيه موديل بالتحديد

وحبذا لو قمت بالتعليق على مهمة الموديلات كما أود تفسير لـSecurity Warning , ما القصد منها وكيف اصل إليها لتعديلها لأن لغتي الانجليزية ضعيفة كما أود تعليق على مهمة الازرار التي في الفورم.

اعذرني على كثرة سؤالاتي

[خالد عبد المنعم]

اخى الكريم عزيز

 

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

 

مهمة كل موديول هى الاتى

 

موديول modapi 

 

هو المسئول عن اضافة و مسح الايكون من جانب الساعه ( system tray ) فقط

 

موديول modmenu

 

هو المسئول عن اضافة القائمه التى بها ثلاث خيارات و يمكن تزويد الخيارات منها

 

موديول modApiMenu

 

هو المسئول عن اظهار القائمه السابقه عند النقر على الايكون بجانب الساعه بزر الماوس الايمن لتظهر لك القائمه السابقه

 

موديول modAPIWindows

 

هو المسؤل عن اجراء عملية النقر على اى من الخيارات التى فى القائمه لينفذ الامر

 

موديول modPixel2Twips

 

هو لتحويل (twip ) الى inch لتعرض على شاشة الكمبيوتر بنفس الحجم بدون تغيير فى حجم الشاشه او الفونت

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

 

و اخيرا بالنسبه للـ security warning 

اختار من 

file > options > trust center > trust center setting > macro sttinges 

 

اختار enable all macros

اذا لم يعمل معك اعتقد بكده انك بتستخدم نسخه 64 بت

 

 

و فى المرفق نسخه من ملفك بعد اضافة الموديولز و الفورم و تعمل بدون اى مشكلهAziz.zip

 

تحياتى لك

[عبدالعزيز محمد]

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

بارك الله فيك وجزاك الله خيراً أخي admiral الملف المرفق يعمل بشكل سليم

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

علما بأنني استخدم الأكسس 2010 معرب -win 8.1 64bit

وجزاكم الله خيرا كما أود الاعتذار عن كثرة الاسئلة .

تم تعديل ديسمبر 8, 2014 بواسطه عزيز 60

[خالد عبد المنعم]

اخى الكريم عزيز 60

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

 

فبأمكانك وضع ازرار فى النموذج form المدرج حديثا ليفتح النماذج التى تريدها

 

او انتظر مساعدة الاخوه مع العلم ان قاعدة البيانات محميه بزراعة ملف

 

و مساره C:\Program Files\acctxt\123.txt

[عبدالعزيز محمد]

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

بارك الله فيك يا أخي admiral ونأمل من الأخوة المحاولة والمساعدة

 مع العلم ان قاعدة البيانات محميه بزراعة ملف

 

و مساره C:\Program Files\acctxt\123.txt

[خالد عبد المنعم]

اخى الكريم عزيز 60

 

لقد اعطيت لبرنامجك جزء من وقتى لكى ادرج لك الزر المخصص للاخفاء فى النموذجين 

 

Formcontrolpanel و-Formsudents

 

 

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

و عند النقر بزر الماوس الايمن على الايكون بجوار الساعه ستظهر قائمه التاليه

أظهار النموذج

أظهار صفحة الاكسيس

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

فضلا لا امرا قم بتحميل النسخه الجديده بعد التعديل

 

Aziz.zip

[عبدالعزيز محمد]

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

جزاكم الله خيراً وخصوصا أخينا admiral .

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

مع العلم بأنني استخدم أوفس 2010 32بت مع وندوز 8.1 64بت.

اعذرني على طول الوقت لأنني كنت مشغولاً .

[عبدالعزيز محمد]

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

بارك الله فيكم وجزاكم الله خير الجزاء

أود شكر الجميع بدون استثناء ...

أود من مبرمجي أكسس جعل قاعدة بياناتي المرفقة سابقا وفي نموذجي Formcontrolpanel و-Formsudents بالتحديد عن طريق زر-خاص- يقوم بتصغير قاعدة بياناتي وعند العودة إليها أقوم بالنقر على الزر الصغير الذي بجانب الساعة في الزاوية السفلية .نأمل من الجميع المساعدة

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

هل الأمر صعب أم لا يمكن عمل ذلك ؟

مع العلم بأنني استخدم ألكسس 2010 -32بت مع وندوز 8.1 -64بت

[خالد عبد المنعم]

اخى الكريم

 

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

و قم بأغلاق الانتى فيرس 

قم بالتجربه و اعطينى النتيجه

اما بخصوص عمل ريستارت للجهاز بدلا من ذلك  يمكنك الضغط على Ctrl + Alt + Delete

و اختار Task Manager ثم اضغط على processes و اختار MSACCESS ثم End Process

 

توضيح ملفك يعمل معى بدون اى مشكله فى التصغير او استعادته مره اخرى

[عبدالعزيز محمد]

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

سأحاول التجربة على وندوز النسخة 32 بت .

[عبدالعزيز محمد]

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

بارك الله في الجميع لما يقومون به من خدمة المنتدى الغالي ,اشكر الجميع بدون استثناء .

أود من جهابذة الأكسس أن يحلوا معضلة التصغير-على وندوز8.1 64 بت- في ملفي المرفق السابق ولكم جزيل الشكر والعرفان

[عبدالعزيز محمد]

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

هل الأمر صعب ؟

[عبدالعزيز محمد]

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

هل من المستحيل عمل ذلك ؟؟؟؟؟؟؟؟؟؟؟؟

[عبدالعزيز محمد]

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

شباب الأمر في غاية الأهمية عندي لو أحد يستطيع مساعدتي أدعو له بالخير.

[ابو جودي]

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

[عبدالعزيز محمد]

أين أنتم ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

[سلمان الشهراني]

    hIcon = getIcon(Nz(Me!txtAppIconPath.Value, ""))
    
    If hIcon <> 0 Then
    
        Call SendMessage(Me.hWnd, WM_SETICON, 0, ByVal hIcon)
        
        Call goSystray

        If Me!chkHideAccess.Value Then
            Call ShowWindow(Application.hWndAccessApp, SW_HIDE)
        End If
    Else
        MsgBox "The Icon-Path is not valid! You need a valid icon to start"
    End If

اسعد الله اوقاتكم بكل خير

عمل اكثر من رائع ولكن عند تطبيقه ظهر لي خطاء في الكود السابق عند الضغط على زر start علماً إنني استوردت الخمس وحدات النمطيه المطلوبه ونسخت مربع النص على الشاشه الرئيسيه لدي ووضعت جميع الاكواد المطلوبه ولكن لايزل يعطي خطاء في هذا الكود وبالتحديد في getIcon

 

شاكر للجميع