RtlMoveMemory: Unterschied zwischen den Versionen

Aus API-Wiki
Wechseln zu: Navigation, Suche
Zeile 36: Zeile 36:
 
lWert1 = 123456
 
lWert1 = 123456
 
'kopieren der 4 Bytes von Wert1 nach Wert2
 
'kopieren der 4 Bytes von Wert1 nach Wert2
RtlMoveMemory lWert2, lWert1, LenB(lWert1)
+
RtlMoveMemory lWert2, lWert1, LenB(lWert2)
 
MsgBox lWert2
 
MsgBox lWert2
  
sString1 = "Test"
+
sString1 = "Test"               ' Ein String mit 4 Zeichen belegt im Speicher 8 Byte
sString2 = Space(Len(sString1))
+
sString2 = Space(Len(sString1)) ' hier muss Len() und nicht LenB() verwendet werden,
'kopieren des Strings, um die automatische VB Unicode konvertierung zu umgehen
+
                                ' damit sString2 die gleiche Länge wie sString1 erhält.
 +
 
 +
'kopieren des Strings. Um die automatische Unicode-Konvertierung zu umgehen
 
'muss hier Quelle und Ziel mit ByVal StrPtr() übergeben werden:
 
'muss hier Quelle und Ziel mit ByVal StrPtr() übergeben werden:
RtlMoveMemory ByVal StrPtr(sString2), ByVal StrPtr(sString1), LenB(sString1)
+
RtlMoveMemory ByVal StrPtr(sString2), ByVal StrPtr(sString1), LenB(sString2)
 
MsgBox sString2
 
MsgBox sString2
 
</code>
 
</code>

Version vom 15. August 2008, 09:15 Uhr

Die Funktion RtlMoveMemory kopiert einen Speicherbereich. Ziel- und Quellbereich dürfen sich überlappen.

Declare Sub RtlMoveMemory Lib "kernel32" ( _

                ByRef Dest As Any, _
                ByRef Source As Any, _
                ByVal cbCopy As Long)

Sehr häufig wird die Alias-Deklaration CopyMemory eingesetzt:

Declare Sub CopyMemory Lib "kernel32.dll" _

           Alias "RtlMoveMemory" ( _
           ByRef Dest As Any, _
           ByRef Source As Any, _
           ByVal cbCopy As Long)

Parameter

Dest

Zeiger auf den Zielspeicher.

Source

Zeiger auf den Quellspeicher.

cbCopy

Anzahl der zu kopierenden Bytes.

Beispiel

Dim lWert1 As Long, lWert2 As Long Dim sString1 As String, sString2 As String

lWert1 = 123456 'kopieren der 4 Bytes von Wert1 nach Wert2 RtlMoveMemory lWert2, lWert1, LenB(lWert2) MsgBox lWert2

sString1 = "Test" ' Ein String mit 4 Zeichen belegt im Speicher 8 Byte sString2 = Space(Len(sString1)) ' hier muss Len() und nicht LenB() verwendet werden,

                               ' damit sString2 die gleiche Länge wie sString1 erhält.

'kopieren des Strings. Um die automatische Unicode-Konvertierung zu umgehen 'muss hier Quelle und Ziel mit ByVal StrPtr() übergeben werden: RtlMoveMemory ByVal StrPtr(sString2), ByVal StrPtr(sString1), LenB(sString2) MsgBox sString2

Hinweise

Zugriffe auf einen nicht allozierten Speicherbereich, z.B. durch falsche Übergabe der Zieladresse, führen zu einem Zugriffsfehler und Absturz des Programms bzw. der IDE!
In der hier abgebildeten Deklaration wird ByRef As Any für die Übergabe von Quelle und Ziel verwendet. Davon abweichend werden bisweilen auch andere Deklarationen eingesetzt. Hinweis: Für die häufig verwendete Alias-Deklaration CopyMemory wird meist die Funktion RtlMoveMemory eingesetzt. Die etwas schnellere Api-Funktion RtlCopyMemory, bei der Quell- und Zielbereich nicht überlappen dürfen, wird nur selten angewandt.

Betriebssystem

  • Windows 95 / 98 / Me
  • Windows NT 4.0 / 2000 / XP
  • Windows Vista