object frmLabTestGroups: TfrmLabTestGroups Left = 337 Top = 202 Width = 465 Height = 461 Caption = 'Select Lab Tests' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object pnlLabTestGroups: TORAutoPanel Left = 0 Top = 0 Width = 457 Height = 427 Align = alClient Caption = 'Specimen' TabOrder = 0 object bvlTestGroups: TBevel Left = 1 Top = 1 Width = 455 Height = 120 Align = alTop end object lblTests: TLabel Left = 10 Top = 124 Width = 79 Height = 13 Caption = 'Laboratory Tests' end object lblList: TLabel Left = 284 Top = 144 Width = 100 Height = 13 Caption = 'Tests to be displayed' end object lblSpecimen: TLabel Left = 12 Top = 383 Width = 47 Height = 13 Caption = 'Specimen' end object lblTestGroups: TLabel Left = 10 Top = 38 Width = 58 Height = 13 Caption = 'Test Groups' end object lblUsers: TLabel Left = 164 Top = 4 Width = 159 Height = 13 Caption = 'Persons with defined Test Groups' end object lblOrder: TLabel Left = 182 Top = 304 Width = 40 Height = 52 Caption = 'Arrange order of tests for display.' WordWrap = True end object lblDefine: TLabel Left = 356 Top = 4 Width = 92 Height = 13 Caption = 'Define Test Groups' end object lblTestGroup: TLabel Left = 181 Top = 198 Width = 91 Height = 39 Caption = 'To create a New Test Group, limit selection to 7 tests.' WordWrap = True end object pnlUpButton: TKeyClickPanel Left = 235 Top = 299 Width = 27 Height = 27 BevelOuter = bvNone Caption = 'Display selected test earlier' Constraints.MaxHeight = 27 Constraints.MaxWidth = 27 TabOrder = 5 TabStop = True OnClick = cmdUpClick OnEnter = pnlUpButtonEnter OnExit = pnlUpButtonExit OnResize = pnlUpButtonResize object cmdUp: TSpeedButton Left = 0 Top = 1 Width = 27 Height = 25 Caption = '^' Enabled = False OnClick = cmdUpClick end end object pnlDownButton: TKeyClickPanel Left = 235 Top = 331 Width = 27 Height = 27 BevelOuter = bvNone Caption = 'Display selected test later' Constraints.MaxHeight = 27 Constraints.MaxWidth = 27 TabOrder = 6 TabStop = True OnClick = cmdDownClick OnEnter = pnlDownButtonEnter OnExit = pnlDownButtonExit OnResize = pnlDownButtonResize object cmdDown: TSpeedButton Left = 0 Top = 1 Width = 27 Height = 25 Caption = 'v' Enabled = False OnClick = cmdDownClick end end object cmdOK: TButton Left = 277 Top = 398 Width = 72 Height = 21 Caption = 'OK' TabOrder = 8 OnClick = cmdOKClick end object cmdCancel: TButton Left = 368 Top = 398 Width = 72 Height = 21 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 9 end object cmdClear: TButton Left = 189 Top = 244 Width = 72 Height = 21 Caption = 'Remove All' Enabled = False TabOrder = 3 OnClick = cmdClearClick end object cmdRemove: TButton Left = 189 Top = 268 Width = 72 Height = 21 Caption = 'Remove One' Enabled = False TabOrder = 4 OnClick = cmdRemoveClick end object lstList: TORListBox Left = 280 Top = 166 Width = 160 Height = 211 ItemHeight = 13 ParentShowHint = False ShowHint = True TabOrder = 7 OnClick = lstListClick Caption = 'Tests to be displayed' ItemTipColor = clWindow LongList = False Pieces = '2' end object cboTests: TORComboBox Left = 10 Top = 144 Width = 160 Height = 233 Style = orcsSimple AutoSelect = True Caption = 'Laboratory Tests' Color = clWindow DropDownCount = 8 ItemHeight = 13 ItemTipColor = clWindow ItemTipEnable = True ListItemsOnly = False LongList = True LookupPiece = 0 MaxLength = 0 ParentShowHint = False Pieces = '2' ShowHint = True Sorted = False SynonymChars = '<>' TabOrder = 0 TabStop = True OnChange = cboTestsChange OnDblClick = cmdAddTestClick OnEnter = cboTestsEnter OnExit = cboTestsExit OnNeedData = cboTestsNeedData CharsNeedMatch = 1 end object cboUsers: TORComboBox Left = 164 Top = 26 Width = 160 Height = 21 Style = orcsDropDown AutoSelect = True Caption = 'Persons with defined Test Groups' Color = clWindow DropDownCount = 8 ItemHeight = 13 ItemTipColor = clWindow ItemTipEnable = True ListItemsOnly = False LongList = True LookupPiece = 0 MaxLength = 0 Pieces = '2' Sorted = False SynonymChars = '<>' TabOrder = 10 OnClick = cboUsersClick OnNeedData = cboUsersNeedData CharsNeedMatch = 1 end object lstTestGroups: TORListBox Left = 10 Top = 56 Width = 319 Height = 57 ItemHeight = 13 ParentShowHint = False ShowHint = True TabOrder = 11 OnClick = lstTestGroupsClick Caption = 'Test Groups' ItemTipColor = clWindow LongList = False Pieces = '2' end object cmdReplace: TButton Left = 368 Top = 60 Width = 72 Height = 21 Caption = 'Replace' Enabled = False TabOrder = 13 OnClick = cmdReplaceClick end object cboSpecimen: TORComboBox Left = 12 Top = 402 Width = 160 Height = 21 Style = orcsDropDown AutoSelect = True Caption = 'Specimen' Color = clWindow DropDownCount = 8 ItemHeight = 13 ItemTipColor = clWindow ItemTipEnable = True ListItemsOnly = False LongList = True LookupPiece = 0 MaxLength = 0 ParentShowHint = False Pieces = '2' ShowHint = True Sorted = False SynonymChars = '<>' TabOrder = 1 OnNeedData = cboSpecimenNeedData CharsNeedMatch = 1 end object cmdDelete: TButton Left = 368 Top = 88 Width = 72 Height = 21 Caption = 'Delete' Enabled = False TabOrder = 14 OnClick = cmdDeleteClick end object cmdAdd: TButton Left = 368 Top = 32 Width = 72 Height = 21 Caption = 'New' Enabled = False ParentShowHint = False ShowHint = False TabOrder = 12 OnClick = cmdAddClick end object cmdAddTest: TButton Left = 189 Top = 144 Width = 72 Height = 21 Caption = 'Add' Enabled = False TabOrder = 2 OnClick = cmdAddTestClick end end object DKLanguageController1: TDKLanguageController Left = 416 Top = 128 LangData = { 100066726D4C61625465737447726F7570730101000000010000000700436170 74696F6E011B0000001000706E6C4C61625465737447726F7570730101000000 02000000070043617074696F6E000D0062766C5465737447726F757073000008 006C626C5465737473010100000003000000070043617074696F6E0007006C62 6C4C697374010100000004000000070043617074696F6E000B006C626C537065 63696D656E010100000005000000070043617074696F6E000D006C626C546573 7447726F757073010100000006000000070043617074696F6E0008006C626C55 73657273010100000007000000070043617074696F6E0008006C626C4F726465 72010100000008000000070043617074696F6E0009006C626C446566696E6501 0100000009000000070043617074696F6E000C006C626C5465737447726F7570 01010000000A000000070043617074696F6E000B00706E6C5570427574746F6E 01010000000B000000070043617074696F6E000500636D64557000000D00706E 6C446F776E427574746F6E01010000000C000000070043617074696F6E000700 636D64446F776E01010000000D000000070043617074696F6E000500636D644F 4B01010000000E000000070043617074696F6E000900636D6443616E63656C01 010000000F000000070043617074696F6E000800636D64436C65617201010000 0010000000070043617074696F6E000900636D6452656D6F7665010100000011 000000070043617074696F6E0007006C73744C69737401010000001200000007 0043617074696F6E00080063626F546573747301010000001300000007004361 7074696F6E00080063626F557365727301010000001400000007004361707469 6F6E000D006C73745465737447726F7570730101000000150000000700436170 74696F6E000A00636D645265706C616365010100000016000000070043617074 696F6E000B0063626F53706563696D656E010100000017000000070043617074 696F6E000900636D6444656C657465010100000018000000070043617074696F 6E000600636D64416464010100000019000000070043617074696F6E000A0063 6D644164645465737401010000001A000000070043617074696F6E00} end end