XProfan

Italia

Beschreibung:

RtlZeroMemory füllt eine Speicherbereich mit Nullbytes.

Deklaration:

DEF @ZeroMemory(2) ! Kernel32,RtlZeroMemory

Parameter:

1.Parameter: Mit Nullen zu füllende Speicheradresse oder Bereichsvariable.

2.Parameter: Anzahl der zu überschreibenden Bytes.

Rückgabewert:

Kein Rückgabewert.

Beispiele:

Kompilieren Markieren Separieren

DEF @ZeroMemory(2) ! "Kernel32","RtlZeroMemory"
Declare Bereich#
Dim Bereich#,4
long Bereich#,0=8672488
Print @Long(Bereich#,0)
@ZeroMemory(Bereich#,4)
Print @Long(Bereich#,0)
Waitinput

04.03.2005 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

funkheld

Ja, das ist ja eine flinke Routine, was es nicht alles so per Laien gibt.

Danke.

Gruss

XProfan 11

12.05.2012 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Jörg
Sellmeyer

Wenn man gezielt einzelne Speicherstellen löschen will, ist das sicher nützlich. Ansonsten ist Clear hier doppelt so schnell:

Kompilieren Markieren Separieren

DEF @ZeroMemory(2) ! "Kernel32","RtlZeroMemory"
Declare Bereich#,time&,e%
Dim Bereich#,4
Randomize

WhileLoop 15

    Time& = &gettickcount
    e% = time& Mod 2

    WhileLoop 10000

        long Bereich#,0=Rnd(8672488)

        If e%

            @ZeroMemory(Bereich#,4)

        Else

            clear Bereich#

        EndIf

    Wend

    Print &gettickcount - time&,If(e%,"ZeroMemory","Clear")

Wend

Waitinput