[ابو روضة]

(07-02-20, 09:29 PM)alsalamoni كتب :

(07-02-20, 09:21 PM)ابو روضة كتب :

إقتباس :قد يبدو بالكتابة ان كودك مختصر، ويبدو ان الاختصار على ما تعود عليه المبرمج،
الكود الذي يستخدم Linq أسرع، وهو الذي استخدمته انا.

عموما هذا كود الاضافة في الليست فيو

كود :

كود :

ListView1.Items.Add(New ListViewItem({System.IO.Path.GetFileNameWithoutExtension(fil)}))

فعلا أخى صدقت وهذا ما أقصده بالفعل ولا أقصد بالطبع القول بغير هذا نظراً لآنى تعودت عليه فقط...

الكود هذا فعلا نجح تبع الليست فيو لكن كيف سأجعله يقرأ الملفات داخل الويب براوزر ؟

فالييست بوكس يقوم بقرائتها هكذا

كود :

WebBrowser1.Navigate(lst(sender.selectedindex))

كود :

Private Sub ListView1_SelectedIndexChanged( As Object, e As EventArgs) Handles ListView1.SelectedIndexChanged
   If ListView1.SelectedItems.Count > 0 Then
       WebBrowser1.Navigate(lst(ListView1.SelectedItems(0).Index))
   End If
End Sub

أخى الكريم جزاك الله خيرى الدارين ولا تزعل منى من ردى فى الأعلى فأنا لا أقصد....

سؤال أخير لو تكرمت كيف أضيف أيقونة بجانب كل موضوع داخل الليست فيو هكذا ؟

لآنى بجرب بهذا وأكيد لم يفلح لانى لم أتعود على هذه الأداة ولم اتعامل معها كثير للأمانة

وجربت هذا بعد اضافة أداة  ImageList ولم يفلح

PHP كود :

Dim sss As String = dir
        For Each fil In System.IO.Directory.GetFiles(sss)
            Dim lvi As New ListViewItem(sss, 0)
            Dim rege2 As String
            lvi.SubItems.Add(rege2)
            ListView1.Items.Add(New ListViewItem({System.IO.Path.GetFileNameWithoutExtension(fil)}))
            lst.Add(fil)
        Next