TWMPrint = packed record
  Msg: Cardinal;
  DC: HDC;
  Flags: Cardinal;
  Result: Integer;
end;

struct TWMPrint {
  unsigned Msg;
  HDC DC;
  unsigned Flags;
  int Result;
};