ICMP_ECHO_REPLY Struktur in Pascal übersetzen

[jackie]

Hallo!
Da ich noch kein C - Experte bin, brauche ich eure Hilfe. Ich will folgende Struktur nach Pascal übersetzen:

Code:

typedef struct icmp_echo_reply {
  IPAddr Address;
  ULONG Status;
  ULONG RoundTripTime;
  USHORT DataSize;
  USHORT Reserved;
  PVOID Data;
  IP_OPTION_INFORMATION Options;
} ICMP_ECHO_REPLY, 
*PICMP_ECHO_REPLY;

Kann mir wer helfen?

[Waldteufel]

Hi.

Entsprechung in Delphi/Pascal:

Delphi-Quellcode:

type
  PICMP_ECHO_REPLY = ^TICMP_ECHO_REPLY;

  TICMP_ECHO_REPLY = packed record
    Address : IPAddr;
    Status, RoundTripTime : LongWord;
    DataSize, Reserved : Word;
    Data : Pointer;
    Options : TIP_OPTIONS_INFORMATION;
  end;

[jackie]

Danke!
Was ich noch wissen möchte: UINT ist doch Integer, oder?

[Waldteufel]

Hi.

Nein. Es ist ein Cardinal bzw. Longword.

[Robert Marquardt]

UINT ist unsigned also Cardinal.
Ich wuerde die vorgefertigten Typen von Windows.pas benutzen.
Da sind UINT und Konsorten schon drin.

[jackie]

Danke!