الصورة توضح المطلوب فمن لديه فكرة عن تلك المشكلة لأنه عند الخروج من مربع النص يختفي الشريط دورت في الخصائص ولم أجد خاصية تبقيه ظاهراً بعد فقدان مربع النص للتركيز
كيف أبقي على شريط التمرير الخاص بمربع النص عند الخروج
مغلق
للرفع
إذن أفهم من هذا أن الخاصية غير موجودة أليس كذلك ؟
أخوي أبو سارة .. اسعد الله أوقاتك بكل خير
يعلم الله أني منذ رأيت الموضوع وأنا أبحث لك عن حل
بعد طول عنا وبحث .. وجدت كود .. وكم كنت فرحا به .. ولكن عند تطبيقه على الأكسس :(
يافرحه ماتمت .. لم يعمل .. ربما الأكسس لايدعم كل دوال الــ API
بينما عمل على الفيجوال بيسك 6 يعمل .. شوف الكود وجربه .. وأنبش في خصائصه
لعل الله يجعل الفتح على يديك .. استلامك الكود
Private Declare Function ShowScrollBar Lib "user32" (ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long Private Const SB_HORZ = 0 Private Const SB_VERT = 1 Private Const SB_BOTH = 3 Private Sub Form_Load() 'preset the textbox to multiline 'and since the ScrollBars property is 'read-only during runtime, you can use this 'API function to set the Scrollbars 'This examples shows how to show both horizontal and 'vertical scrollbars on a textbox during runtime ShowScrollBar Text1.hwnd, SB_BOTH, True End Sub
هذا الكود يخفي اشرطة التمرير حسب لرغبة ومتى ما أردت وبالنوع الذي ترغب ( أفقي وراسي , HORZ & VERT )
والمراء لايلام بعد الإجتهاد
لك مني وافر التحية
أخوك
EKSEER
تم تعديل هذه المشاركة بواسطة ekseer في 4 يوليو 2007 في 04:05
هذا الموضوع مغلق.