C++中的一段代码在delphi中怎么写?

Question

DWORD sendadr=0x005697A0;
  BYTE   temp[]={0x0E,0x00 ,0x00 ,0x02 ,0x00};
DWORD sendbuffer;
sendbuffer=(DWORD)temp;
  _asm
  {
pushad
MOV EDX,DWORD PTR DS:[0x8C2F44]
MOV ECX,DWORD PTR DS:[EDX+0x20]
push 5
push sendbuffer
call sendadr
popad  }
谢谢了

Answer 1

const temp: array[0..4]of BYTE = ($0E, $00 ,$00 ,$02 ,$00);var
 sendadr: DWORD;
 sendbuffer: DWORD;begin
 sendadr := $005697A0;
 sendbuffer := DWORD(@temp);asm
pushad
MOV EDX,DWORD PTR DS:[$8C2F44]
MOV ECX,DWORD PTR DS:[EDX+$20]
push 5
push sendbuffer
call sendadr
popad
end; // end of asmend;

Answer 2

谢谢 bomdy(昏昏欲睡的虫子)