TWMShowWindow = packed record
  Msg: Cardinal;
  Show: BOOL;
  Status: Longint;
  Result: Longint;
end;

struct TWMShowWindow {
  unsigned Msg;
  BOOL Show;
  Longint Status;
  Longint Result;
};