title image


Smiley Über ein Byte-Array.
Hallo roty,



ich behelf mir meist über ein Byte-Array und der API Copymemory.



Da ein String in VB 2 Bytes pro Zeichen belegt, von denen aber bei normalem Text

nur eins benutzt wird, ist immer eine Lücke drin.



Und hier der Code als Beispiel







      

Option Explicit

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (ByVal pDst As Any, ByVal pSrc As Any, ByVal ByteLen As Long)

Private Sub Form_Load()

Dim s As String

Dim b() As Byte

s = "ein String"

ReDim b((Len(s)) * 2 - 1)

CopyMemory VarPtr(b(0)), StrPtr(s), LenB(s)

End Sub 





Code eingefügt mit Syntaxhighlighter 3.0




Gruss Klapperstorch
----------------------------------------------------
Aus Felern lernt man oder...
Edjucashon isnt woerking

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: