تقييم الموضوع :
  • 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.............
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] إستعلام يمكنني في البحث في سطور الخلية sniperjawadino 5 208 , 04:54 PM
آخر رد: sniperjawadino
  [VB.NET] اضافة ازرار حسب عدد متغير في قاعدة البيانات Ad Heart 5 692 16-11-20, 12:10 AM
آخر رد: sherf
  كيفية اضافة مشغل mpv بداخل الفورم ميدو الفنان 18 437 08-11-20, 09:48 PM
آخر رد: ميدو الفنان
  [VB.NET] مساعدة في اضافة drm ل browser trakktour 0 75 08-11-20, 12:48 AM
آخر رد: trakktour
  كيف يمكنني رفع برنامج فيجول بيسيك على موقع اسضافة mohamedgadain61 2 224 28-10-20, 08:19 PM
آخر رد: Anas Mahmoud
  [VB.NET] كيفية اضافة drm لمتصفح geckofx لسبسيب 2 165 27-10-20, 02:51 PM
آخر رد: لسبسيب
  اضافة button في مكان محدد علي قورم atefkhalf2004 9 597 05-10-20, 10:08 AM
آخر رد: atefkhalf2004
Exclamation [VB.NET] أفضل و أحسن كود يمكنني إستخدامه في الحسابات الفواتير sniperjawadino 15 1,081 27-09-20, 05:33 PM
آخر رد: sniperjawadino
  [VB.NET] اضافة اللغة واستردادها من ملف بصيغة ini ميدو الفنان 11 1,245 25-09-20, 04:08 PM
آخر رد: عمور2016
  اضافة ملف pdf الى قاعدة بيانات sql server 2012 moh developer 5 289 25-09-20, 03:01 PM
آخر رد: moh developer

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


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