SizeOf(CREATE_VIRTUAL_DISK_PARAMETERS) = 44 and I think it should be 48 since the Union is not anonymous, try:
Delphi-Quellcode:
CREATE_VIRTUAL_DISK_PARAMETERS = record
case Version1: Integer of
0: (
UniqueId: TGUID;
MaximumSize: ULONGLONG;
BlockSizeInBytes: ULONG;
ParentPath: PWideChar;
SourcePath: PWideChar);
end;