UNION in C++ -> Delphi?

[implementation]

Ich denke nach wie vor, dass es so heißen müsse:

Delphi-Quellcode:

const
  VSS_OBJECT_SNAPSHOT = 3;
  VSS_OBJECT_PROVIDER = 4;
type 
  VSS_SNAPSHOT_PROP = XYZ; 
  VSS_PROVIDER_PROP = UVW; 
  VSS_OBJECT_UNION = packed record 
    case Integer of 
      VSS_OBJECT_SNAPSHOT:
        (Snap : VSS_SNAPSHOT_PROP); // <- VSS_SNAPSHOT_PROP
      VSS_OBJECT_PROVIDER:
        (Prov : VSS_PROVIDER_PROP);
    end;