unit ULVOType;

interface
uses
  UlanType, ULRecTyp;{ULREC.LST}

const
  ULVOID = ord('U') + 256*ord('L') + 256*256*ord('V') + 256*256*256*ord('O');

type
  TULVORec = packed record {<Caption="View options" Enabled=1 Visible=1
    Create1="ShowData := true; ShowAxis := true;">}
    Head: TULRecHead;
    Info: TULRecInfo;
    ShowData: boolean;{<Caption="Show data" Enabled=1>}
    ShowPeaks: boolean;{<Caption="Show peaks" Enabled=1>}
    ShowAxis: boolean;{<Caption="Show axis" Enabled=1>}
    ShowBaseline: boolean;{<Caption="Show baseline" Enabled=1>}
    ShowHeader: boolean;{<Caption="Show header" Enabled=1>}
    ShowReport: boolean;{<Caption="Show report" Enabled=1>}
    ShowXY: boolean;{<Caption="Show mouse coordinates" Enabled=1>}
    PointCircleRadius: integer;{<Enabled=1
      Hint="Radius of circle draw around experimental point (0 = none)">}
    AutoShowReport: boolean;{<Enabled=1 Hint="Show report panel upon every recalculation?">}
  end;
  PULVORec = ^TULVORec;

implementation

end.
