object frmConsMedRslt: TfrmConsMedRslt Left = 468 Top = 172 BorderStyle = bsDialog Caption = 'Select Medicine Result' ClientHeight = 242 ClientWidth = 505 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object pnlBase: TORAutoPanel Left = 0 Top = 0 Width = 505 Height = 242 Align = alClient BevelOuter = bvNone TabOrder = 0 object SrcLabel: TLabel Left = 12 Top = 6 Width = 145 Height = 16 AutoSize = False Caption = 'Select medicine result:' end object lblDateofAction: TOROffsetLabel Left = 133 Top = 159 Width = 112 Height = 19 Caption = 'Date/time of this action' HorzOffset = 2 Transparent = False VertOffset = 6 WordWrap = False end object lblActionBy: TOROffsetLabel Left = 266 Top = 159 Width = 215 Height = 19 Caption = 'Action by' HorzOffset = 2 Transparent = False VertOffset = 6 WordWrap = False end object lblResultName: TOROffsetLabel Left = 27 Top = 29 Width = 90 Height = 15 Caption = 'Type of Result' HorzOffset = 2 Transparent = False VertOffset = 2 WordWrap = False end object lblResultDate: TOROffsetLabel Left = 255 Top = 29 Width = 74 Height = 15 Caption = 'Date of Result' HorzOffset = 2 Transparent = False VertOffset = 2 WordWrap = False end object lblSummary: TOROffsetLabel Left = 375 Top = 29 Width = 45 Height = 15 Caption = 'Summary' HorzOffset = 2 Transparent = False VertOffset = 2 WordWrap = False end object cmdOK: TButton Left = 332 Top = 211 Width = 75 Height = 21 Caption = 'OK' Default = True TabOrder = 5 OnClick = cmdOKClick end object cmdCancel: TButton Left = 412 Top = 211 Width = 75 Height = 21 Cancel = True Caption = 'Cancel' TabOrder = 6 OnClick = cmdCancelClick end object lstMedResults: TORListBox Left = 15 Top = 45 Width = 476 Height = 114 Style = lbOwnerDrawFixed ItemHeight = 13 ParentShowHint = False ShowHint = True Sorted = True TabOrder = 0 OnDrawItem = lstMedResultsDrawItem Caption = 'Select medicine result' ItemTipColor = clWindow LongList = False Pieces = '2,3,4' TabPositions = '40,60' end object cmdDetails: TButton Left = 15 Top = 179 Width = 75 Height = 21 Caption = 'Show Details' TabOrder = 1 OnClick = cmdDetailsClick end object ckAlert: TCheckBox Left = 131 Top = 211 Width = 79 Height = 17 Caption = 'Send alert' TabOrder = 4 OnClick = ckAlertClick end object calDateofAction: TORDateBox Left = 133 Top = 179 Width = 116 Height = 21 TabStop = False TabOrder = 2 Text = 'Now' DateOnly = False RequireTime = False Caption = 'Date/time of this action' end object cboPerson: TORComboBox Left = 265 Top = 179 Width = 220 Height = 21 Style = orcsDropDown AutoSelect = True Caption = 'Action by' Color = clWindow DropDownCount = 8 ItemHeight = 13 ItemTipColor = clWindow ItemTipEnable = True ListItemsOnly = True LongList = True LookupPiece = 2 MaxLength = 0 Pieces = '2,3' Sorted = False SynonymChars = '<>' TabOrder = 3 OnNeedData = NewPersonNeedData CharsNeedMatch = 1 end end object DKLanguageController1: TDKLanguageController Left = 240 Top = 128 LangData = { 0E0066726D436F6E734D656452736C7401010000000100000007004361707469 6F6E010E0000000700706E6C42617365000008005372634C6162656C01010000 0002000000070043617074696F6E000F006C626C446174656F66416374696F6E 010100000003000000070043617074696F6E000B006C626C416374696F6E4279 010100000004000000070043617074696F6E000D006C626C526573756C744E61 6D65010100000005000000070043617074696F6E000D006C626C526573756C74 44617465010100000006000000070043617074696F6E000A006C626C53756D6D 617279010100000007000000070043617074696F6E000500636D644F4B010100 000008000000070043617074696F6E000900636D6443616E63656C0101000000 09000000070043617074696F6E000D006C73744D6564526573756C7473010100 00000A000000070043617074696F6E000A00636D6444657461696C7301010000 000B000000070043617074696F6E000700636B416C65727401010000000C0000 00070043617074696F6E000F0063616C446174656F66416374696F6E01020000 000E000000070043617074696F6E0D00000004005465787400090063626F5065 72736F6E01010000000F000000070043617074696F6E00} end end