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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل يمكن كتابة كلاس داخل كلاس anes 2 62 09-12-17, 10:21 PM
آخر رد: anes
  هل يمكن تحويل ال Query في السيكوال الي جدول مثل الاكسس khaled12345 2 86 19-11-17, 02:02 PM
آخر رد: khaled12345
  كيف يمكن حذف السطور الصفرية من داتا جريد فيو السيد الجوهري 3 76 18-11-17, 07:07 PM
آخر رد: ﻣﺒﺘﺪﺉ
  [VB.NET] كيف يمكن حل مشكلة التعديل و التحديث و الحذف larbihamri 2 116 04-11-17, 08:45 PM
آخر رد: larbihamri
Exclamation [VB.NET] حدف اسطر في textbox mervandzz 3 82 12-10-17, 02:40 PM
آخر رد: mervandzz
  [VB.NET] هل يمكن عمل مشروعي نسخة محموله? Marwan9990 7 240 14-08-17, 01:12 PM
آخر رد: Marwan9990
  كيف يمكن انشاء صورة باركود عن طريق WEB SERVICE كفاح 0 113 11-08-17, 03:17 PM
آخر رد: كفاح
  [سؤال] هل الكود التالي يمكن ان يسجل صوت الكومبيوتر بعد تعديل بسيط سعود 4 184 09-08-17, 03:56 AM
آخر رد: سعود
  هل يمكن رسم chart بهذا الشكل khaled12345 4 282 09-08-17, 01:28 AM
آخر رد: khaled12345
  [VB.NET] هل يمكن ترجمة الكلام المكتوب على صورة؟ الماجيك مسعد 6 268 05-08-17, 08:48 PM
آخر رد: الماجيك مسعد

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


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