اذهب الي المحتوي
أوفيسنا

اخفاء شاشة اكسس تماما


الردود الموصى بها

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

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

رابط هذا التعليق
شارك

28 دقائق مضت, حمادة عثمان said:

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

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

انت بتهزر صح ؟
انت بجد يحثت فى المنتدى والا بتهزر 
هذا فقط غيث من فيض 

 

 

 

  • Like 1
رابط هذا التعليق
شارك

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

لا اريد تصغير شاشة الاكسس بل اريد اخفاءها

رابط هذا التعليق
شارك

4 دقائق مضت, حمادة عثمان said:

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

لا اريد تصغير شاشة الاكسس بل اريد اخفاءها

ههههههههههههههه
هجوم ايه بس يا استاذ @حمادة عثمان

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

  • Like 1
رابط هذا التعليق
شارك

7 دقائق مضت, حمادة عثمان said:

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

لا اريد تصغير شاشة الاكسس بل اريد اخفاءها

يا صاحب ابتسامة الجميلة

نحن لا نهاجم على اي شخص كلكم احباءنا في الله ونبحكم في الله

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

اتفضل 

الصق هذا الكود في وحدة نمطية


Option Compare Database
Public Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Public Sub HideAccess()
    Call ShowWindow(Access.hWndAccessApp, 0)
End Sub
Public Sub ShowAccess()
    Call ShowWindow(Access.hWndAccessApp, 5)
End Sub

وفي نموذج عند تحميل او عند فتح اكتب

HideAccess للاخفاء

و

ShowAccess للاظهار من جديد

وهذا هو رابط الموضوع

 

 

تم تعديل بواسطه Shivan Rekany
  • Like 2
رابط هذا التعليق
شارك

8 دقائق مضت, حمادة عثمان said:

اتفضل

استأذن من استاذنا @ابا جودى

فقط عملت ما قلت لك في نمشاركتي السابقة

 

22.rar

تم تعديل بواسطه Shivan Rekany
رابط هذا التعليق
شارك

  • 2 weeks later...
On 5/25/2017 at 7:07 PM, Shivan Rekany said:

يا صاحب ابتسامة الجميلة

نحن لا نهاجم على اي شخص كلكم احباءنا في الله ونبحكم في الله

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

اتفضل 

الصق هذا الكود في وحدة نمطية



Option Compare Database
Public Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Public Sub HideAccess()
    Call ShowWindow(Access.hWndAccessApp, 0)
End Sub
Public Sub ShowAccess()
    Call ShowWindow(Access.hWndAccessApp, 5)
End Sub

وفي نموذج عند تحميل او عند فتح اكتب

HideAccess للاخفاء

و

ShowAccess للاظهار من جديد

وهذا هو رابط الموضوع

 

 

استاذي شيفان تحياتي لك

هل تقصد ان اضع 

showAccess

 & HideAccess 

في النموذج اللي راح يشتغل في البدايه  فقط لو في كل النماذج 

 

تحياتي وتقديري لك 

رابط هذا التعليق
شارك

5 hours ago, Shivan Rekany said:

اذا تريد اخفاء الشاشة اكتب في نموذج البداية فقط

 

دمت فخرا 

شكرا لردك 

تمت التجربه 

جميل جداً

تم تعديل بواسطه Aliko
رابط هذا التعليق
شارك

  • 1 year later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information