تغيير ناويگيتور

[arman2000]

سلام
چطور مي شه اندازه آيتم هاي ناويگيتور را تغيير داد و بجاي دكمه Next و Prev و New، كلمه گذاشت (فارسي)؟
ممكن هست ناويگيتور طراحي بشه با خصوصيات دلخواه؟
چون وقتي مثلا يه منو مثل ناويگيتور درست مي كنم مجبور مي شم پايين فرم قرار بدم كه اگه فرم طولاني باشه دسترسي به اون مشكل مي شه (هميشه مثل ناويگيتور ديده نمي شه).

[bita_ziba77]

با سلام
شما به راحتي مي توانيد در بالاي فرم خود به تعداد دلخواه كليد در نظر گرفته و خصوصويات دلخواه خود را به آن تخصيص دهيد.

با تشكر

[arman2000]

ممنون مي شم اگه يه نمونه از اين نوع (ناويگيتورها) رو بذاريد.

[arman2000]

ممنون مي شم راهنمايي بفرمائيد

[Profesorjd]

با سلام
1- در ديزاين فرم يك دكمه بكشيد . حالت ويزارد فعال مي‌شود
2- در قسمت categories آيتم Record navigation را كليك كنيد .
3- در سمت راست بخش Action عمل‌هاي نويگيتور را مي‌بينيد . هر كدام را كه ميخواهيد انتخاب كنيد .
4- بعد از زدن دكمه Next آبشن Text تيك بخورد . متن مورد نظر خود را وارد كنيد
5- اسم مناسبي براي اين باتن بگذاريد و تمام . خودتان نمونه را بسازيد !!

[arman2000]

ممنونم دوست من

1- منظورم باکس وسطی ناویگیتور هست که شماره رکورد توی اون دیده می شه. اون چطور می تونه بزرگتر دیده بشه؟

2- امکان داره ناویگیتوری که با دکمه ای که توضیح دادید بسازیم با اسکرول، حرکت کنه؟ (نه توی فرم ثابت، بالا یا پایین باشه)

[mahdi_107]

يك تكس ايجاد كنيد و كنترول سورس آنرا =[CurrentRecord] قرار دهيد (نمايش ركورد جاري)

[arman2000]

سلام دوست من
ممنونم از پيشنهادتون
دوست من چطور مي شه اين باكس رو هميشه ديد؟ مثل خود ناويگيتور كه روي خود فرم هست و با اسكرول فرم، ناپديد نمي شه.

[mahdi_107]

شما ميتونين ناويگيتور طراحي شده خود را در قسمت فرم فوتر يا فرم هدر قراردهيد

[arman2000]

دوست من بسيار ممنونم از راهنمايي شما


چطور مي شه این باکس رو قابل ويرايش کرد؟ مثل خود ناويگيتور که مي شه شماره رکورد رو در اون وارد کرد و بعد از اينتر کردن رکورد مورد نظر رو نمايش مي ده

[arman2000]

ممنون مي شم راهنمايي بفرمائيد

[mahdi_107]

خوب مثلا اگر نام تكست باكس شما t باشه به شكل زير عمل كنيد

Private Sub t_LostFocus()
On Error GoTo Err_t
If t <> "" Then
Else
t = CurrentRecord
End If

DoCmd.GoToRecord , , acGoTo, t
t = CurrentRecord

Exit_t:
Exit Sub

Err_t:
t = CurrentRecord
Resume Exit_t
End Sub

[arman2000]

سلام دوست من
کدی رو که پیشنهاد دادید گذاشتم ولی باکس، خالی می مونه و با وارد کردن شماره رکورد در اون عملی انجام نمی شه.

[mahdi_107]

اخوي كدهايي كه قبلا گفتم هم بايد باشه توي فرم كارنت
حالا من يك نمونه گذاشتم كه انشاا... كارتون راه بيوفته
64806

[arman2000]

دوست من عالی بود تشکر :تشویق::تشویق::تشویق:
احسنت