String umwandeln

[himitsu]

nein ist es nicht:

bei (P)Word steht zuerst das Low-Byte (halt BigEndian)

Delphi-Quellcode:

W := (Word(S[1])) shl 8) or Byte(S[2]);

// oder 

W := ByteSwap(PWord(@S[1]))

Delphi-Quellcode:

Function ByteSwap(i: Word): Word;
  ASM
    XCHG AH, AL;
  End;

// oder (Ersteres läuft auch auf alter CPUs)

Function ByteSwap(i: Word): Word;
  ASM
    BSWAP AX
  End;