Property File Support

[Homicidal Monkey]

SE1.0 uses property files instead of ini files. This should bridge the gap by adding property file support to vb6.

```
Public Sub WriteProperty(ByVal file As String, ByVal sectionArray, ByVal value As String)
    Dim i As Long
    Dim Section As String
    If value = vbNullString Then value = none
    For i = 0 To UBound(sectionArray)
        If i > 0 Then
            Section = Section + "." + sectionArray(i)
        Else
            Section = sectionArray(i)
        End If
    Next i
    Call WriteINI("default", Section, value, file)
End Sub

``````
Public Function ReadProperty(ByVal file As String, ByRef sectionArray) As String
    Dim i  As Long
    Dim Section As String

    For i = 0 To UBound(sectionArray)
        If i > 0 Then
            Section = Section + "." + sectionArray(i)
        Else
            Section = sectionArray(i)
        End If
    Next i
    ReadProperty = ReadINI("default", Section, file, "")
End Function

``````
Dim sectionArray(0 to 2) as String
sectionArray(0) = "property"
sectionArray(1) = "subproperty"
sectionArray(2) = "subsubproperty"
call writeproperty(app.path & "\properties.prp", sectionArray, "this is the value")

```

[dao]

um hm lol like no one will know what to do.. i dont know what to do =p mind explaining a lil?

[Homicidal Monkey]

@Zultarâ„¢:

> um hm lol like no one will know what to do.. i dont know what to do =p mind explaining a lil?

it allows you to read/write SE1.0 property files within TE/EE. To install, just paste the two methods in any module in the source.

[dao]

ahh ok cool hm xD

[Homicidal Monkey]

basically, its Object Oriented INI files.