Ein struct aus C to Delphi...

[sniper_w]

Delphi-Quellcode:

(*
struct in_addr {
        union {
                struct { UCHAR s_b1,s_b2,s_b3,s_b4; } S_un_b;
                struct { USHORT s_w1,s_w2; } S_un_w;
                ULONG S_addr;
        } S_un;
};
*)
type in_addr = record
   case Integer of
   1 : (S_un_b : record s_b1,s_b2,s_b3,s_b4: Byte end; );
   2 : ( S_un_w : record s_w1,s_w2: Word  end; );
   3 : ( S_addr: Longword );
   end;

Habe ich das richtig gemacht ? Ich meine, es wird schon kompiliert, aber ist es richtig so?

[Chewie]

Schau mal in die Unit Winsock

[himitsu]

Falls nicht ... für mich sieht es jedenfalls OK aus.

[tommie-lie]

C-Records sind i.d.R. packed.

[himitsu]

ups, da haste wohl Recht, aber der Rest wird wohl stimmen

[sniper_w]

In zwischen habe ich es auch selbst herausgefunden. Danke.