Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi [C++ -> Delphi]Der ">>" Operator

**Win32.API**

Hallo,

gibt es eine elegante Moeglichkeit folgendes in Delphi zu schreiben?

Code:

			int8  tmp1;

int   tmp2;

int64 tmp3;

Source >> tmp1 >> tmp2 >> tmp3;

In Delphi wuerde ich es so uebersetzen:

markieren

Delphi-Quellcode:

			tmp1 := pInt8(Source)^;

tmp2 := pInt(Source + SizeOf(int8))^;

tmp3 := pInt64(Source + SizeOf(int8) + SizeOf(int))^;

Ich persönlich finde das recht unschoen, folgendes gefaellt mir da schon besser:

zusammenfalten · markieren

Delphi-Quellcode:

			type

 TSource = record

  tmp1: Int8;

  tmp2: Int;

  tmp3: Int64;

 end;

 PSource = ^TSource;

[...]

tmp1 := PSource(Source)^.tmp1;

tmp2 := PSource(Source)^.tmp2;

tmp3 := PSource(Source)^.tmp3;

Ist aber doch relativ unflexibel, gibt es noch eine andere Moeglichkeit?

Gruß,

Win32.API