object frmVitals: TfrmVitals
  Left = 224
  Top = 211
  Width = 522
  Height = 402
  BorderIcons = [biSystemMenu]
  Caption = 'Vitals'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = True
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyUp = FormKeyUp
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object pnlTop: TPanel
    Left = 0
    Top = 0
    Width = 514
    Height = 214
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object lblNoResults: TStaticText
      Left = 196
      Top = 58
      Width = 217
      Height = 17
      Caption = 'No measurement to graph for this date range.'
      TabOrder = 2
    end
    object chtChart: TChart
      Left = 95
      Top = 0
      Width = 419
      Height = 214
      AllowPanning = pmNone
      AllowZoom = False
      BackWall.Brush.Color = clWhite
      BackWall.Brush.Style = bsClear
      Title.Text.Strings = (
        'test name')
      Title.Visible = False
      OnClickLegend = chtChartClickLegend
      OnClickSeries = chtChartClickSeries
      OnUndoZoom = chtChartUndoZoom
      LeftAxis.Title.Caption = 'units'
      Legend.Alignment = laTop
      Legend.Inverted = True
      Legend.ShadowSize = 2
      View3D = False
      Align = alClient
      BevelOuter = bvNone
      PopupMenu = popChart
      TabOrder = 1
      OnMouseDown = chtChartMouseDown
      object serTestY: TLineSeries
        Marks.ArrowLength = 8
        Marks.Visible = False
        SeriesColor = clBlue
        Title = 'Mean'
        Pointer.Brush.Color = clBlue
        Pointer.Draw3D = False
        Pointer.InflateMargins = True
        Pointer.Style = psDiamond
        Pointer.Visible = True
        XValues.DateTime = True
        XValues.Name = 'X'
        XValues.Multiplier = 1.000000000000000000
        XValues.Order = loAscending
        YValues.DateTime = False
        YValues.Name = 'Y'
        YValues.Multiplier = 1.000000000000000000
        YValues.Order = loNone
      end
      object serTestX: TLineSeries
        Marks.ArrowLength = 8
        Marks.Visible = False
        SeriesColor = clBlue
        Title = 'Dialstolic'
        Pointer.Brush.Color = clBlue
        Pointer.Draw3D = False
        Pointer.HorizSize = 3
        Pointer.InflateMargins = True
        Pointer.Style = psRectangle
        Pointer.VertSize = 3
        Pointer.Visible = True
        XValues.DateTime = True
        XValues.Name = 'X'
        XValues.Multiplier = 1.000000000000000000
        XValues.Order = loAscending
        YValues.DateTime = False
        YValues.Name = 'Y'
        YValues.Multiplier = 1.000000000000000000
        YValues.Order = loNone
      end
      object serTest: TLineSeries
        Marks.ArrowLength = 8
        Marks.Visible = False
        SeriesColor = clBlue
        Title = 'Systolic'
        Pointer.InflateMargins = True
        Pointer.Style = psCircle
        Pointer.Visible = True
        XValues.DateTime = True
        XValues.Name = 'X'
        XValues.Multiplier = 1.000000000000000000
        XValues.Order = loAscending
        YValues.DateTime = False
        YValues.Name = 'Y'
        YValues.Multiplier = 1.000000000000000000
        YValues.Order = loNone
      end
      object serTime: TPointSeries
        Marks.ArrowLength = 8
        Marks.Visible = False
        SeriesColor = clSilver
        ShowInLegend = False
        Title = 'Time'
        Pointer.Draw3D = False
        Pointer.HorizSize = 3
        Pointer.InflateMargins = True
        Pointer.Style = psCircle
        Pointer.VertSize = 3
        Pointer.Visible = False
        XValues.DateTime = False
        XValues.Name = 'X'
        XValues.Multiplier = 1.000000000000000000
        XValues.Order = loAscending
        YValues.DateTime = False
        YValues.Name = 'Y'
        YValues.Multiplier = 1.000000000000000000
        YValues.Order = loNone
      end
    end
    object pnlLeft: TORAutoPanel
      Left = 0
      Top = 0
      Width = 95
      Height = 214
      Align = alLeft
      TabOrder = 0
      object lstDates: TORListBox
        Left = 1
        Top = 25
        Width = 93
        Height = 132
        Align = alTop
        ItemHeight = 13
        Items.Strings = (
          '1^Today'
          '8^One Week'
          '15^Two Weeks'
          '31^One Month'
          '183^Six Months'
          '366^One Year'
          '732^Two Years'
          '66666^All Results'
          'S^Date Range')
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = lstDatesClick
        Caption = 'Select Vitals from:'
        ItemTipColor = clWindow
        LongList = False
        Pieces = '2'
      end
      object pnlLeftClient: TORAutoPanel
        Left = 1
        Top = 157
        Width = 93
        Height = 68
        BevelOuter = bvNone
        TabOrder = 2
        object chkValues: TCheckBox
          Left = 9
          Top = 8
          Width = 76
          Height = 17
          Caption = 'Values'
          TabOrder = 0
          OnClick = chkValuesClick
        end
        object chk3D: TCheckBox
          Left = 9
          Top = 42
          Width = 76
          Height = 17
          Caption = '3D'
          TabOrder = 2
          OnClick = chk3DClick
        end
        object chkZoom: TCheckBox
          Left = 9
          Top = 25
          Width = 76
          Height = 17
          Caption = 'Zoom'
          TabOrder = 1
          OnClick = chkZoomClick
        end
      end
      object pnlEnterVitals: TPanel
        Left = 1
        Top = 1
        Width = 93
        Height = 24
        Align = alTop
        Caption = 'pnlEnterVitals'
        TabOrder = 0
        OnResize = pnlEnterVitalsResize
        object btnEnterVitals: TButton
          Left = 8
          Top = 0
          Width = 75
          Height = 25
          Caption = 'Enter Vitals'
          TabOrder = 0
          OnClick = btnEnterVitalsClick
        end
      end
    end
  end
  object pnlBottom: TPanel
    Left = 0
    Top = 214
    Width = 514
    Height = 154
    Align = alBottom
    TabOrder = 1
    object grdVitals: TCaptionStringGrid
      Left = 96
      Top = 1
      Width = 417
      Height = 152
      Align = alClient
      Color = clCream
      ColCount = 6
      Ctl3D = True
      DefaultRowHeight = 15
      FixedCols = 0
      RowCount = 8
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 1
      OnSelectCell = grdVitalsSelectCell
      Caption = 'Vitals Data'
      ColWidths = (
        64
        64
        64
        64
        64
        64)
    end
    object pnlButtons: TPanel
      Left = 1
      Top = 1
      Width = 95
      Height = 152
      Align = alLeft
      BevelOuter = bvNone
      TabOrder = 0
      DesignSize = (
        95
        152)
      object lstVitals: TCaptionListBox
        Left = 0
        Top = 16
        Width = 95
        Height = 119
        Style = lbOwnerDrawFixed
        Anchors = [akLeft, akTop, akRight, akBottom]
        ItemHeight = 16
        Items.Strings = (
          'Temperature'
          'Pulse'
          'Respiration'
          'Blood Pressure'
          'Height'
          'Weight'
          'Pain')
        TabOrder = 0
        OnClick = lstVitalsClick
        Caption = 'Vitals'
      end
    end
  end
  object popChart: TPopupMenu
    OnPopup = popChartPopup
    Left = 37
    Top = 317
    object popValues: TMenuItem
      Caption = 'Values'
      OnClick = popValuesClick
    end
    object pop3D: TMenuItem
      Caption = '3D'
      OnClick = pop3DClick
    end
    object popZoom: TMenuItem
      Caption = 'Zoom Enabled'
      OnClick = popZoomClick
    end
    object popZoomBack: TMenuItem
      Caption = 'Zoom Back'
      OnClick = popZoomBackClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object popCopy: TMenuItem
      Caption = 'Copy'
      OnClick = popCopyClick
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object popDetails: TMenuItem
      Caption = 'Details'
      OnClick = popDetailsClick
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object popPrint: TMenuItem
      Caption = 'Print'
      OnClick = popPrintClick
    end
  end
  object calVitalsRange: TORDateRangeDlg
    DateOnly = True
    Instruction = 'Enter a date range -'
    LabelStart = 'Begin Date'
    LabelStop = 'End Date'
    RequireTime = False
    Format = 'mmm d,yy'
    Left = 74
    Top = 320
  end
  object dlgWinPrint: TPrintDialog
    Left = 146
    Top = 324
  end
  object DKLanguageController1: TDKLanguageController
    Left = 111
    Top = 8
    LangData = {
      090066726D566974616C73010100000001000000070043617074696F6E012000
      00000600706E6C546F7000000C006C626C4E6F526573756C7473010100000002
      000000070043617074696F6E0008006368744368617274010200000004000000
      16004C656674417869732E5469746C652E43617074696F6E030000000A005469
      746C652E54657874000800736572546573745901030000000500000005005469
      746C65060000000C005856616C7565732E4E616D65070000000C005956616C75
      65732E4E616D6500080073657254657374580103000000080000000500546974
      6C65090000000C005856616C7565732E4E616D650A0000000C005956616C7565
      732E4E616D650007007365725465737401030000000B00000005005469746C65
      0C0000000C005856616C7565732E4E616D650D0000000C005956616C7565732E
      4E616D6500070073657254696D6501030000000E00000005005469746C650F00
      00000C005856616C7565732E4E616D65100000000C005956616C7565732E4E61
      6D65000700706E6C4C656674000008006C737444617465730102000000120000
      00070043617074696F6E1100000005004974656D73000D00706E6C4C65667443
      6C69656E740000090063686B56616C7565730101000000130000000700436170
      74696F6E00050063686B3344010100000014000000070043617074696F6E0007
      0063686B5A6F6F6D010100000015000000070043617074696F6E000E00706E6C
      456E746572566974616C73010100000016000000070043617074696F6E000E00
      62746E456E746572566974616C73010100000017000000070043617074696F6E
      000900706E6C426F74746F6D00000900677264566974616C7301010000001800
      0000070043617074696F6E000A00706E6C427574746F6E73000009006C737456
      6974616C7301020000001A000000070043617074696F6E190000000500497465
      6D73000800706F70436861727400000900706F7056616C75657301010000001B
      000000070043617074696F6E000500706F70334401010000001C000000070043
      617074696F6E000700706F705A6F6F6D01010000001D00000007004361707469
      6F6E000B00706F705A6F6F6D4261636B01010000001E00000007004361707469
      6F6E0002004E3100000700706F70436F707901010000001F0000000700436170
      74696F6E0002004E3200000A00706F7044657461696C73010100000020000000
      070043617074696F6E0002004E3300000800706F705072696E74010100000021
      000000070043617074696F6E000E0063616C566974616C7352616E6765010400
      0000250000000600466F726D6174220000000B00496E737472756374696F6E23
      0000000A004C6162656C53746172742400000009004C6162656C53746F70000B
      00646C6757696E5072696E740000}
  end
end