UNION in C++ -> Delphi?

[Alter Mann]

Hallo

habe hier ein Deklarationsproblem. Wie bekommen diese C-Union nach Delphi?

Code:

typedef union {
  [case(VSS_OBJECT_SNAPSHOT)]
    VSS_SNAPSHOT_PROP Snap;
  [case(VSS_OBJECT_PROVIDER)]
    VSS_PROVIDER_PROP Prov;
} VSS_OBJECT_UNION;

Diese Umsetzung erzeugt nur Fehlermeldungen:

Delphi-Quellcode:

  VSS_OBJECT_UNION = packed record
    case Integer of
      3 : (Snap : VSS_OBJECT_SNAPSHOT);    //VSS_OBJECT_SNAPSHOT
      4 : (Prov : VSS_PROVIDER_PROP);      //VSS_OBJECT_PROVIDER
    end;
  end;

Warum?

Vielen Dank für Tipps unf Hinweise

Alter Mann