تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كيف يمكنني عند حدث اضافة تاب جديد نسخ جميع ما فى التاب بالاوامر
#1
Video 
السلام عليكم ورحمة الله وبركاتة 

سؤالى هو
كيف يمكنني نسخ جميع ما يحتوية التاب بكافة الاوامر فى تاب جديد علما بأنى اعمل على متصفح انترنت
وقمت بأستخدام طرق كثيرة ولكن دون جدوى وهذا كود قمت بوضعة فى حدث النافذة الجديدة فى اداة 
المتصفح ؟  Huh
هذا المثال للتحميل نظيف فقط مضاف الادوات المستخدمة

.zip   g33up.zip (الحجم : 4.25 م ب / التحميلات : 28)


PHP كود :
Dim newTab As TabItem TabControl1.CreateTab("New Tab")
 
       Dim panel As TabControlPanel DirectCast(newTab.AttachedControlTabControlPanel)
 
       Dim ComboBox As New ComboBoxEx()
 
       Dim wb As New WebBrowser
        Dim myElement 
As HtmlElement WebBrowser1.Document.ActiveElement
        Dim target 
As String myElement.GetAttribute("href")
 
    هنا قمت بوضع جميع الازرار فى بانل منفصل 
 Dim panlex 
As New DevComponents.DotNetBar.PanelEx ' panel creat
مجموعة الازرار    
    Dim butnfr As New DevComponents.DotNetBar.ButtonX ' 
btn back
        Dim butnbk 
As New DevComponents.DotNetBar.ButtonX ' btn back
        Dim butnser As New DevComponents.DotNetBar.ButtonX ' 
btn forwrd
        Dim butnsett 
As New DevComponents.DotNetBar.ButtonX ' btn setting
        Dim butnhom As New DevComponents.DotNetBar.ButtonX ' 
btn home
        Dim butnref 
As New DevComponents.DotNetBar.ButtonX ' btn refresh
        Dim addtab As New DevComponents.DotNetBar.ButtonX ' 
btn add tab page

        With wb
            
.Navigate(target)
 
           .Dock DockStyle.Fill
            With newTab
                
.CloseButtonVisible True
                
.Text "Blank"
 
           End With
            ComboBox
.Parent panel
            ComboBox
.Location = New Point(1010)
 
           panel.Controls.Add(ComboBox)
 
           With ComboBox
                
.Dock DockStyle.Top
                
.WatermarkText "Hello"
 
           End With
ودي مرحلة الاضافة           
 panel
.Controls.Add(wb)
 
           panel.Controls.Add(panlex)
 
           panel.Controls.Add(butnfr)
 
           panel.Controls.Add(butnser)
 
           panel.Controls.Add(butnsett)
 
           panel.Controls.Add(butnhom)
 
           panel.Controls.Add(butnref)
 
           panel.Controls.Add(addtab)
 
           panel.Controls.Add(butnbk)
 
           End With
            e
.Cancel True
            WebBrowser1
.ScriptErrorsSuppressed True 
الاكواد ليست كاملة للمتصفح فقط حدث النافذة الجديدة فى اداة التصفح 
كل ما اريدة ان التاب الجديد يحمل جميع الازرار والملحقات الموجودة فى التاب الاساسي 
مع الاوامر الخاصة بالازرار ليتم تطبيقها فى التاب الجديد
لا اعرف الكثير عن المديول حتى اضيف مديول جديد 
مع العلم انى استخدم Dotnetbar 
جزاكم الله كل الخير

الرد
تم الشكر بواسطة:
#2
up.............
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في كود اضافة الى sql 2012 moh developer 12 191 منذ 3 ساعة مضت
آخر رد: ابراهيم ايبو
  هل يمكن اضافة اشعار صوتى mostafa nada 5 79 , 03:48 PM
آخر رد: enjoy
Exclamation [VB.NET] أفضل و أحسن كود يمكنني إستخدامه في الحسابات الفواتير sniperjawadino 10 262 21-09-20, 05:35 PM
آخر رد: Anas Mahmoud
  مشكلة فى اضافة البيانات ممكن المساعدة talatm 7 332 04-09-20, 04:10 PM
آخر رد: عبد العزيز البسكري
  هل يجب اضافة ملف الريبورت فيور مع مشروع الفيجوال ستوديو adnan gharbi 2 163 02-09-20, 09:27 PM
آخر رد: adnan gharbi
Question [سؤال] اضافة ميعاد التسليم للبرنامج maaadooo2001 1 137 01-09-20, 04:37 PM
آخر رد: اسامه الهرماوي
  [سؤال] [تم الحل]استعراض بيانات في Datagridview واضافة جميع البيانات لجدول محدد محمد العامر 6 576 22-08-20, 08:15 AM
آخر رد: محمد العامر
  [VB.NET] اضافة بشرط مرور 7 ايام محمد بوقزاحة 3 200 19-08-20, 10:43 PM
آخر رد: ابراهيم ايبو
  [VB.NET] اضافة ازرار حسب عدد متغير في قاعدة البيانات Ad Heart 1 288 10-08-20, 06:17 AM
آخر رد: حريف برمجة
  هل يمكن اضافة اكثر من tag فى ال button mostafa nada 11 732 06-08-20, 12:38 AM
آخر رد: mostafa nada

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم