German Konvertierungsproblem

[hogiebaer]

Hallo Gemeinde,

hätte da mal eine Frage.
Habe folgende Definition

Type xs (summe1 as double,summe2 as double,summe3 as double)
Dim Summen as xs
Dim Senden as String

Soweit, sogut. Da ich die Daten per tcp mit anderen (Header etc.) als String sende, war ich erstaunt,
dass ich einfach sagen konnte :
Senden = Summen (sind ja 2 verschiedene Typen)

Es kam auch ein ca. 30byte grosser String am Ende der Leitung an.

Dort habe ich Ebenfalls gesagt
Dim Summen as xs
Dim Empfang as String

Aber bei der Zeile
Summen = Empfang
fällt er beim Compile auf die Nase, schade. Gibts da eine Lösung ? Wäre absolute Spitze !

Danke
Holger

 

[KMatle]

Ist aber eher zufällig, dass das klappt (wg. der verschiedenen Typen). Ich habe auch schon versehentlich eine View in einen String gepackt und wunderte mich über die "komisch" Anzeige.

Ich kenne den Rest des Programmes nicht, aber Du könntest Die Daten mit JSON aufbereiten oder ein Array/eine Liste schicken.

 

[Deleted member 103]

Ich würde es so machen:

    'In String konvertieren
    Senden = Summen.summe1 & ";" & Summen.summe2 & ";" & Summen.summe3 '(SinD ja 2 verschiedene Typen)
   
    'Dort habe ich Ebenfalls gesagt
    Dim Summen As xs
    Dim Empfang() As String = Regex.Split(";", "deine Daten")

    'Aber bei der Zeile
    Summen.Initialize
    Summen.summe1 = Empfang(0)
    Summen.summe2 = Empfang(1)
    Summen.summe3 = Empfang(2)

 

[hogiebaer]

Super Filippo, das ist der Trick ThX