تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
هل يمكن استعمال iniread لقراءه اسطر متعددة
#1
هل يمكن استعمال iniread لقراءه اسطر متعددة
مثلآ يوجد ملف Settings.txt مكتوب فيه 
إقتباس :Set=test1
Set=test2
Set=test3
somethingelse=0
somethingelse=2
هل يمكن اضافة الكلام الى بعد Set ال هما test1 test2 test3 فى listbox بدون تكرار الكود مثل هذا 

كود :
Dim test As iniFile = New iniFile(Application.StartupPath + "\Settings.ini")

       For Each I In test.IniReadValue("Settings", "Set")
           ListBox1.Items.Add(I.ToString())
       Next
ini class
كود :
Imports System.Text

Public Class iniFile

   Public path As String

   Private Declare Auto Function WritePrivateProfileString Lib "kernel32" (ByVal section As String, ByVal key As String, ByVal val As String, ByVal filePath As String) As Long

   Private Declare Auto Function GetPrivateProfileString Lib "kernel32" (ByVal section As String, ByVal key As String, ByVal def As String, ByVal retVal As StringBuilder, ByVal size As Integer, ByVal filePath As String) As Integer

   Public Sub New(ByVal INIPath As String)
       MyBase.New()
       Me.path = INIPath
   End Sub

   Public Sub IniWriteValue(ByVal Section As String, ByVal Key As String, ByVal Value As String)
       iniFile.WritePrivateProfileString(Section, Key, Value, Me.path)
   End Sub

   Public Function IniReadValue(ByVal Section As String, ByVal Key As String) As String
       Dim temp As StringBuilder = New StringBuilder(255)
       Dim i As Integer = iniFile.GetPrivateProfileString(Section, Key, "", temp, 255, Me.path)
       Return temp.ToString
   End Function
End Class
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Exclamation [سؤال] كيف يمكن الغاء السوال عند الكتابة على ملف موجود dell 0 48 19-03-24, 01:23 AM
آخر رد: dell
  [VB.NET] كيف يمكن إخفاء ظهور الشاشة السوداء فى الـــ console AmeenRashed 2 316 15-11-23, 03:51 PM
آخر رد: justforit
  ما أسرع استضافة يمكن رفع المشروع عليها ؟ hazim1 0 197 03-10-23, 08:55 AM
آخر رد: hazim1
  كيف يمكن تأخير الـSplash Screen حتى يتم تحميل الأدوات بالكامل؟ hazim1 0 270 28-09-23, 08:23 AM
آخر رد: hazim1
  هل يمكن نسخ احتياطي لأسماء الButtons ؟ hazim1 2 238 21-09-23, 07:32 PM
آخر رد: hazim1
  هل يمكن عد الصفوف التالية للصف المُحدد في Datagridview ؟ hazim1 1 460 17-07-23, 09:04 PM
آخر رد: mrfenix93
  [SQL] كيف يمكن تعديل update أو حذف delete صف معين من جدول بدلالة رقم الصف ROW_NUMBER mmaalmesry 4 759 06-02-23, 09:42 AM
آخر رد: mmaalmesry
  لوب على اسطر التكست بوك نيمو 2 361 14-01-23, 11:11 PM
آخر رد: نيمو
  [VB.NET] كيف يمكن تنفيذ امر داخل الباور شل zooz313 2 775 17-12-22, 02:25 PM
آخر رد: kebboud
  هل يمكن الاعتماد على 2 او اكثر من قاعدة البيانات لبرنامج واحد حماده ممدوح البحيرى 0 470 10-12-22, 08:56 PM
آخر رد: حماده ممدوح البحيرى

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


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