PDA

View Full Version : مثل Tab های فایرفوکس


ali621
چهارشنبه 25 بهمن 1385, 20:02 عصر
چگونه میشه که وقتی هر فرم را در پنجره باز کردیم مثل فایرفوکس یک Tab به آن اختصاص بدهد؟:افسرده:
yavari
پنج شنبه 26 بهمن 1385, 14:12 عصر
سلام


وقتی کنترل
Microsoft Windows Common Control 6
رو اکتیو کنی Tab Strip داری ، کد نویسیشم خیلی راحته !

مشکلی داشتی در خدمتم !
ali621
پنج شنبه 26 بهمن 1385, 15:42 عصر
همشهری عزیز از راهنماییتون ممنون
ولی من می خوام که از اون در فرم MDI استفاده کنم که tab strip در فرم MDI قرار نمی گیرد. همچنین می خوام یه راست کلیک برای بستن پنجره جاری یا بقیه پنجره ها داشته باشد مثل tab های فایر فوکس.:لبخندساده:
S_VB.max
پنج شنبه 26 بهمن 1385, 20:02 عصر
سلام
یک Picture Box روی فرم بگذارید و tab strip را در آن قرار دهید اینجوری این کنترل را در فرم MDI دارید
شما باید بتونید در Run time ، تب و اشیا داخل اونا ایجاد کنید برای ایجاد یک تب باید از دستور زیر استفاده کنید :


TabStrip1.Tabs.Add , , "Tab" & i
i = i + 1
برای حذف یک تب هم از این دستور استفاده کن

TabStrip1.Tabs.Remove (TabStrip1.SelectedItem.Index)
برای حذف تمامی تب ها از حلقه For استفاده کنید .
برای بستن هر تب به کمک راست کلیک اول یک منو درست کنید اسم اونا Mymenu بذارید بعد از اینکه زیر منوها را درست کردید دستور حذف را هم برای اونا اضافه کنید با این کد هم منو شما باز می شود :


Private Sub TabStrip1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
If Button = vbRightButton Then PopupMenu myMenu
End Sub
ali621
جمعه 27 بهمن 1385, 15:20 عصر
از کمکتون ممنون