Dateiarbeit in Dll mit Klassen HILFE

MathiasRichter

Grünschnabel
Hallo

ich habe ein paar klassen in meiner dll

dcIDKey
= Key As String

dcPic
=ID_Key As dcKey
=CaptionX As String

ich habe dann diese methode in der dcPic geschrieben

Code:
Public Sub Save()
    Dim dummy As New dcPic
    Set Dummy.Id_Key = New dcIDKey
    Dummy.CaptionX="This is a Test"
    Dummy.ID_Key.Key="Should work"
    Open "C:\Test.txt" For OutPut As #1 
    Write #1 , Dummy.CaptionX, Dummy.ID_Key.Key
    Close #1
End Sub

sie funktioniert anstandslos

dann schrieb ich das gegenstück (laden)

Code:
Public Sub Load()
    Dim dummy As New dcPic
    Set Dummy.Id_Key = New dcIDKey
    Dummy.CaptionX="empty"
    Dummy.ID_Key.Key="empty too"
    Open "C:\Test.txt" For InPut As #1
    Input #1 , Dummy.CaptionX, Dummy.ID_Key.Key
    Close #1
End Sub

aber das funktioniert nicht, weil VB meint:

"variable erforderlich - zuweisung an diesen ausdruck nicht möglich" und es markiert .key bei dummy.id_key

Wer kann mir da helfen?

wenn ich es umständlich und kaum mehr leserlich schreibe(bei vielen datensätzen) dann sieht das so aus, und es funktioniert.

Code:
Public Sub Load()
    Dim dummy As New dcPic
    Set Dummy.Id_Key = New dcIDKey
    Dim s1,s2 as string
    Dummy.CaptionX="empty"
    Dummy.ID_Key.Key="empty too"
    Open "C:\Test.txt" For InPut As #1
    Input #1 , s1,s2
    Dummy.CaptionX=s1
    Dummy.ID_Key.Key=s2
    Close #1
End Sub


bitte brauche dringed hilfe!



matze
 
Dacht ich mir schon. Versuch doch erstmal, die Input-Anweisung in eine lokale Variable schreiben zu lassen und nachher den Inhalt der Variable in die Eigenschaft zu übertragen.
Wenn ich mich richtig erinnere, hat Input da immer ein paar Schwierigkeiten in der Richtung gehabt. VB halt.... :rolleyes:

PS: Du musst mir nicht immer eine PM mit mehr Infos schreiben, als in Deinem Beitrag stehen. Es ist immer besser, die Fragen öffentlich zu posten, denn dann können mehrere Leute helfen. ;)
 
Zurück