inherited frmODAllergy: TfrmODAllergy
  Tag = 105
  Left = 13
  Top = 106
  Width = 542
  Height = 357
  HorzScrollBar.Range = 520
  VertScrollBar.Range = 312
  Caption = 'Enter Allergy Information'
  PixelsPerInch = 96
  TextHeight = 13
  object btnAgent: TSpeedButton [0]
    Left = 175
    Top = 61
    Width = 19
    Height = 19
    Caption = '...'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    OnClick = btnAgentClick
  end
  object lblReactionType: TOROffsetLabel [1]
    Left = 7
    Top = 81
    Width = 188
    Height = 15
    Caption = 'Type of Reaction:'
    HorzOffset = 2
    Transparent = False
    VertOffset = 2
    WordWrap = False
  end
  object lblAgent: TOROffsetLabel [2]
    Left = 7
    Top = 44
    Width = 188
    Height = 15
    Caption = 'Causative agent:'
    HorzOffset = 2
    Transparent = False
    VertOffset = 2
    WordWrap = False
  end
  object lblSymptoms: TOROffsetLabel [3]
    Left = 7
    Top = 125
    Width = 134
    Height = 15
    Caption = 'Signs/Symptoms'
    HorzOffset = 2
    Transparent = False
    VertOffset = 2
    WordWrap = False
  end
  object lblSelectedSymptoms: TOROffsetLabel [4]
    Left = 147
    Top = 125
    Width = 119
    Height = 15
    Caption = 'Selected Symptoms'
    HorzOffset = 2
    Transparent = False
    VertOffset = 2
    WordWrap = False
  end
  object lblComments: TOROffsetLabel [5]
    Left = 281
    Top = 125
    Width = 226
    Height = 15
    Caption = 'Comments'
    HorzOffset = 2
    Transparent = False
    VertOffset = 2
    WordWrap = False
  end
  object lblOriginator: TOROffsetLabel [6]
    Left = 209
    Top = 6
    Width = 45
    Height = 15
    Caption = 'Observer'
    HorzOffset = 2
    Transparent = False
    VertOffset = 2
    WordWrap = False
  end
  object Bevel1: TBevel [7]
    Left = 2
    Top = 125
    Width = 273
    Height = 125
  end
  object lblObservedDate: TOROffsetLabel [8]
    Left = 366
    Top = 46
    Width = 140
    Height = 15
    Caption = 'Reaction Date/Time'
    HorzOffset = 2
    Transparent = False
    VertOffset = 2
    WordWrap = False
  end
  object lblSeverity: TOROffsetLabel [9]
    Left = 365
    Top = 82
    Width = 141
    Height = 15
    Caption = 'Severity'
    HorzOffset = 2
    Transparent = False
    VertOffset = 2
    WordWrap = False
  end
  object lstAllergy: TORListBox [10]
    Left = 8
    Top = 61
    Width = 166
    Height = 21
    Color = clBtnFace
    ExtendedSelect = False
    ItemHeight = 13
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    OnClick = lstAllergyClick
    Caption = 'Causative agent'
    ItemTipColor = clWindow
    LongList = False
    Pieces = '2'
    OnChange = ControlChange
  end
  inherited memOrder: TCaptionMemo
    Left = 5
    Top = 256
    TabOrder = 16
  end
  object cboReactionType: TORComboBox [12]
    Left = 7
    Top = 96
    Width = 190
    Height = 21
    Style = orcsDropDown
    AutoSelect = True
    Caption = 'Type of Reaction'
    Color = clWindow
    DropDownCount = 8
    ItemHeight = 13
    ItemTipColor = clWindow
    ItemTipEnable = True
    ListItemsOnly = True
    LongList = False
    LookupPiece = 0
    MaxLength = 0
    Pieces = '2'
    Sorted = False
    SynonymChars = '<>'
    TabOrder = 3
    OnChange = ControlChange
    CharsNeedMatch = 1
  end
  object grpObsHist: TRadioGroup [13]
    Left = 364
    Top = 11
    Width = 147
    Height = 30
    Columns = 2
    Ctl3D = True
    Items.Strings = (
      '&Observed'
      '&Historical')
    ParentCtl3D = False
    TabOrder = 9
    OnClick = grpObsHistClick
  end
  object memComments: TRichEdit [14]
    Left = 282
    Top = 142
    Width = 229
    Height = 104
    TabOrder = 12
    WantTabs = True
    OnExit = memCommentsExit
    OnKeyUp = memCommentsKeyUp
  end
  object lstSelectedSymptoms: TORListBox [15]
    Left = 147
    Top = 143
    Width = 122
    Height = 75
    ExtendedSelect = False
    ItemHeight = 13
    ParentShowHint = False
    ShowHint = True
    TabOrder = 5
    Caption = 'Selected Symptoms'
    ItemTipColor = clWindow
    LongList = False
    Pieces = '2,4'
    OnChange = ControlChange
  end
  object ckNoKnownAllergies: TCheckBox [16]
    Left = 8
    Top = 18
    Width = 119
    Height = 17
    Caption = 'No Known Allergies'
    TabOrder = 0
    OnClick = ckNoKnownAllergiesClick
  end
  object cboOriginator: TORComboBox [17]
    Left = 210
    Top = 22
    Width = 170
    Height = 96
    Anchors = [akLeft, akTop, akRight]
    Style = orcsSimple
    AutoSelect = True
    Caption = 'Observer'
    Color = clWindow
    DropDownCount = 8
    ItemHeight = 13
    ItemTipColor = clWindow
    ItemTipEnable = True
    ListItemsOnly = True
    LongList = True
    LookupPiece = 2
    MaxLength = 0
    ParentShowHint = False
    Pieces = '2,3'
    ShowHint = False
    Sorted = False
    SynonymChars = '<>'
    TabOrder = 8
    OnChange = ControlChange
    OnNeedData = cboOriginatorNeedData
    CharsNeedMatch = 1
  end
  object cboSymptoms: TORComboBox [18]
    Left = 7
    Top = 143
    Width = 135
    Height = 103
    Style = orcsSimple
    AutoSelect = True
    Caption = 'Signs/Symptoms'
    Color = clWindow
    DropDownCount = 8
    ItemHeight = 13
    ItemTipColor = clWindow
    ItemTipEnable = True
    ListItemsOnly = True
    LongList = True
    LookupPiece = 0
    MaxLength = 0
    Pieces = '2'
    Sorted = False
    SynonymChars = '<>'
    TabOrder = 4
    OnKeyDown = cboSymptomsKeyDown
    OnMouseClick = cboSymptomsMouseClick
    OnNeedData = cboSymptomsNeedData
    CharsNeedMatch = 1
  end
  object btnCurrent: TButton [19]
    Left = 137
    Top = 14
    Width = 56
    Height = 21
    Caption = 'Current'
    TabOrder = 1
    OnClick = btnCurrentClick
  end
  object calObservedDate: TORDateBox [20]
    Left = 365
    Top = 62
    Width = 145
    Height = 21
    TabOrder = 10
    OnChange = ControlChange
    DateOnly = False
    RequireTime = False
    Caption = 'Reaction Date/Time'
  end
  object cboSeverity: TORComboBox [21]
    Left = 365
    Top = 97
    Width = 144
    Height = 21
    Style = orcsDropDown
    AutoSelect = True
    Caption = 'Severity'
    Color = clWindow
    DropDownCount = 8
    ItemHeight = 13
    ItemTipColor = clWindow
    ItemTipEnable = True
    ListItemsOnly = True
    LongList = False
    LookupPiece = 0
    MaxLength = 0
    Pieces = '2'
    Sorted = False
    SynonymChars = '<>'
    TabOrder = 11
    OnChange = ControlChange
    CharsNeedMatch = 1
  end
  object btnRemove: TButton [22]
    Left = 210
    Top = 224
    Width = 57
    Height = 21
    Caption = 'Remove'
    TabOrder = 7
    OnClick = btnRemoveClick
  end
  object btnDateTime: TButton [23]
    Left = 147
    Top = 224
    Width = 62
    Height = 21
    Caption = 'Date/Time'
    TabOrder = 6
    OnClick = btnDateTimeClick
  end
  inherited cmdAccept: TButton
    Left = 441
    Top = 256
    Caption = 'Accept'
    TabOrder = 13
  end
  inherited cmdQuit: TButton
    Left = 441
    Top = 283
    TabOrder = 14
  end
  inherited pnlMessage: TPanel
    Left = 20
    Top = 253
    TabOrder = 15
    inherited memMessage: TRichEdit
      Left = 41
    end
  end
  inherited DKLanguageController1: TDKLanguageController
    LangData = {
      0C0066726D4F44416C6C65726779010100000005000000070043617074696F6E
      011E00000008006D656D4F72646572010100000002000000070043617074696F
      6E000900636D64416363657074010100000003000000070043617074696F6E00
      0700636D6451756974010100000004000000070043617074696F6E000A00706E
      6C4D65737361676500000A00696D674D65737361676500000A006D656D4D6573
      736167650000080062746E4167656E7400000F006C626C5265616374696F6E54
      797065010100000006000000070043617074696F6E0008006C626C4167656E74
      010100000007000000070043617074696F6E000B006C626C53796D70746F6D73
      010100000008000000070043617074696F6E0013006C626C53656C6563746564
      53796D70746F6D73010100000009000000070043617074696F6E000B006C626C
      436F6D6D656E747301010000000A000000070043617074696F6E000D006C626C
      4F726967696E61746F7201010000000B000000070043617074696F6E00060042
      6576656C3100000F006C626C4F627365727665644461746501010000000C0000
      00070043617074696F6E000B006C626C536576657269747901010000000D0000
      00070043617074696F6E000A006C7374416C6C6572677901010000000E000000
      070043617074696F6E000F0063626F5265616374696F6E547970650101000000
      0F000000070043617074696F6E000A006772704F627348697374010100000010
      00000005004974656D73000B006D656D436F6D6D656E7473000013006C737453
      656C656374656453796D70746F6D73010100000011000000070043617074696F
      6E001200636B4E6F4B6E6F776E416C6C65726769657301010000001200000007
      0043617074696F6E000D0063626F4F726967696E61746F720101000000130000
      00070043617074696F6E000B0063626F53796D70746F6D730101000000140000
      00070043617074696F6E000A0062746E43757272656E74010100000015000000
      070043617074696F6E000F0063616C4F62736572766564446174650101000000
      16000000070043617074696F6E000B0063626F53657665726974790101000000
      17000000070043617074696F6E00090062746E52656D6F766501010000001800
      0000070043617074696F6E000B0062746E4461746554696D6501010000001900
      0000070043617074696F6E001300646C675265616374696F6E4461746554696D
      650000}
  end
  object dlgReactionDateTime: TORDateTimeDlg
    FMDateTime = 2981202.000000000000000000
    DateOnly = False
    RequireTime = False
    Left = 242
    Top = 10
  end
end