TViewerSetMode

TViewerSetMode = packed record
   ParamType : Integer;

   Param : record case Integer of
      0 : (iParam : Integer);
      1 : (cParam : PChar);
   end;

   Flags : DWORD;
   Reserved : DWORD;
end;

PViewerSetMode = ^TViewerSetMode;