German Konvertierungsproblem

hogiebaer

Active Member
Licensed User
Longtime User
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

Expert
Licensed User
Longtime User
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.
 
D

Deleted member 103

Guest
Ich würde es so machen:
B4X:
    '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)
 
Cookies are required to use this site. You must accept them to continue using the site. Learn more…