object frmSurgeryView: TfrmSurgeryView Left = 333 Top = 256 Width = 366 Height = 229 BorderIcons = [] Caption = 'List Selected Cases' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object pnlBase: TORAutoPanel Left = 0 Top = 0 Width = 358 Height = 195 Align = alClient BevelOuter = bvNone TabOrder = 0 object lblBeginDate: TLabel Left = 4 Top = 10 Width = 48 Height = 13 Caption = 'Start Date' end object lblEndDate: TLabel Left = 4 Top = 67 Width = 48 Height = 13 Caption = 'Stop Date' end object lblMaxDocs: TLabel Left = 4 Top = 125 Width = 107 Height = 13 Caption = 'Max Number to Return' end object calBeginDate: TORDateBox Left = 4 Top = 24 Width = 156 Height = 21 TabOrder = 0 DateOnly = False RequireTime = False Caption = 'Start Date' end object calEndDate: TORDateBox Left = 4 Top = 81 Width = 156 Height = 21 TabOrder = 1 DateOnly = False RequireTime = False Caption = 'Stop Date' end object cmdOK: TButton Left = 97 Top = 172 Width = 72 Height = 21 Caption = 'OK' Default = True TabOrder = 5 OnClick = cmdOKClick end object cmdCancel: TButton Left = 177 Top = 172 Width = 72 Height = 21 Cancel = True Caption = 'Cancel' TabOrder = 6 OnClick = cmdCancelClick end object edMaxDocs: TCaptionEdit Left = 4 Top = 138 Width = 156 Height = 21 MaxLength = 6 TabOrder = 2 Caption = 'Max Number to Return' end object grpTreeView: TGroupBox Left = 177 Top = 9 Width = 175 Height = 150 Caption = 'Sorting/Grouping of Cases' TabOrder = 3 object lblGroupBy: TOROffsetLabel Left = 10 Top = 71 Width = 49 Height = 15 Caption = 'Group By:' HorzOffset = 2 Transparent = False VertOffset = 2 WordWrap = False end object cboGroupBy: TORComboBox Left = 10 Top = 85 Width = 153 Height = 21 Style = orcsDropDown AutoSelect = True Caption = 'Group By' Color = clWindow DropDownCount = 8 Items.Strings = ( 'D^Surgery Date' 'P^Procedure' 'S^Surgeon' 'T^Type of Procedure') ItemHeight = 13 ItemTipColor = clWindow ItemTipEnable = True ListItemsOnly = True LongList = False LookupPiece = 0 MaxLength = 0 Pieces = '2' Sorted = False SynonymChars = '<>' TabOrder = 1 CharsNeedMatch = 1 end object radTreeSort: TRadioGroup Left = 9 Top = 20 Width = 155 Height = 49 Caption = 'Sort Order' Items.Strings = ( '&Ascending' '&Descending') TabOrder = 0 end end object cmdClear: TButton Left = 190 Top = 125 Width = 146 Height = 21 Caption = 'Clear Sort/Group' TabOrder = 4 OnClick = cmdClearClick end end object DKLanguageController1: TDKLanguageController Left = 168 Top = 104 LangData = { 0E0066726D537572676572795669657701010000000100000007004361707469 6F6E010E0000000700706E6C4261736500000C006C626C426567696E44617465 010100000002000000070043617074696F6E000A006C626C456E644461746501 0100000003000000070043617074696F6E000A006C626C4D6178446F63730101 00000004000000070043617074696F6E000C0063616C426567696E4461746501 0100000005000000070043617074696F6E000A0063616C456E64446174650101 00000006000000070043617074696F6E000500636D644F4B0101000000070000 00070043617074696F6E000900636D6443616E63656C01010000000800000007 0043617074696F6E00090065644D6178446F6373010100000009000000070043 617074696F6E000B00677270547265655669657701010000000A000000070043 617074696F6E000A006C626C47726F7570427901010000000B00000007004361 7074696F6E000A0063626F47726F7570427901020000000C0000000700436170 74696F6E0D00000005004974656D73000B0072616454726565536F7274010200 00000E000000070043617074696F6E0F00000005004974656D73000800636D64 436C656172010100000010000000070043617074696F6E00} end end