Hallo,
habe ein riesen Problem. Ich habe einen Public Type:' Type hat insgesamt 1024 Bytes
Public Type NewWeather
uCommand As Integer
uFlags As Integer
ulSignature As Long
chICAO(3) As Byte
uDynamics As Integer
uSpare As Integer
dLatitude As Double
dLongitude As Double
nElevation As Long
ulTimeStamp As Long
Press As NewPress
Vis As NewVis
nTempCtr As Long
temp(23) As NewTemp
nWindsCtr As Long
Wind(23) As NewWind
nCloudsCtr As Long
Cloud(23) As NewCloud
End Type
Diesen will ich in einen String laden und irgendwann später wieder von dem String eine variable füllen die als dieser Typ oben definiert ist. Also eigentlich nur über den Umweg eines strings in eine andere Variable kopieren.
Ich habe es schon so probiert:Public Declare Sub CopyMemory Lib "kernel32" _
Alias "RtlMoveMemory" (Dest As Any, Src As Any, _
ByVal length As Long)
Dim weather As NewWeather ' Sender 1024 Bytes
Dim ankunft As NewWeather ' Empfänger 1024 Bytes
Dim strWeather As String * 1050 ' String
' In String
CopyMemory ByVal StrPtr(strWeather), weather, ByVal 1050
' wieder zurück
CopyMemory ByVal ankunft, StrPtr(strWeather), ByVal 1050
Aber da kommt nur Müll an. Kann mir einer sagen wie ich das realisieren kann? Ich muss den Type unbedingt in einen String bekommen!
Viele Grüße
Andi
Zum Seitenanfang