object frmTemplateAutoGen: TfrmTemplateAutoGen Left = 361 Top = 230 ActiveControl = rgSource BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Generate Template' ClientHeight = 213 ClientWidth = 415 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object lblTop: TMemo Left = 256 Top = 8 Width = 147 Height = 65 TabStop = False BorderStyle = bsNone Color = clBtnFace Lines.Strings = ( 'Template generation creates a ' 'new template, automatically ' 'copying the template'#39's ' 'boilerplate from an existing ' 'source.') TabOrder = 5 end object lblSelect: TStaticText Left = 0 Top = 0 Width = 241 Height = 213 Align = alLeft Alignment = taCenter AutoSize = False Caption = 'Select Source of Template Generation ...' TabOrder = 6 end object rgSource: TKeyClickRadioGroup Left = 256 Top = 88 Width = 153 Height = 81 Caption = ' Template Generate Source ' Items.Strings = ( '&Boilerplated Note Title' '&Patient Data (Object)') TabOrder = 2 TabStop = True OnClick = rgSourceClick end object cbxObjects: TORComboBox Left = 0 Top = 0 Width = 249 Height = 213 Style = orcsSimple AutoSelect = True Caption = 'Patient Data' Color = clWindow DropDownCount = 8 ItemHeight = 13 ItemTipColor = clWindow ItemTipEnable = True ListItemsOnly = False LongList = False LookupPiece = 0 MaxLength = 0 Pieces = '1' Sorted = False SynonymChars = '<>' TabOrder = 1 Visible = False OnDblClick = cbxObjectsDblClick CharsNeedMatch = 1 end object btnOK: TButton Left = 257 Top = 190 Width = 75 Height = 21 Caption = '&OK' Default = True ModalResult = 1 TabOrder = 3 end object btnCancel: TButton Left = 337 Top = 190 Width = 75 Height = 21 Cancel = True Caption = '&Cancel' ModalResult = 2 TabOrder = 4 end object cbxTitles: TORComboBox Left = 0 Top = 0 Width = 249 Height = 213 Style = orcsSimple AutoSelect = True Caption = 'Choose Existing Template' Color = clWindow DropDownCount = 8 ItemHeight = 13 ItemTipColor = clWindow ItemTipEnable = True ListItemsOnly = True LongList = True LookupPiece = 0 MaxLength = 0 Pieces = '2' Sorted = False SynonymChars = '<>' TabOrder = 0 Visible = False OnDblClick = cbxTitlesDblClick OnNeedData = cbxTitlesNeedData CharsNeedMatch = 1 end object DKLanguageController1: TDKLanguageController Left = 200 Top = 112 LangData = { 120066726D54656D706C6174654175746F47656E010100000001000000070043 617074696F6E010700000006006C626C546F7001010000000200000005004C69 6E65730009006C626C53656C656374010100000003000000070043617074696F 6E0008007267536F75726365010200000004000000070043617074696F6E0500 000005004974656D73000A006362784F626A6563747301010000000600000007 0043617074696F6E00050062746E4F4B01010000000700000007004361707469 6F6E00090062746E43616E63656C010100000008000000070043617074696F6E 0009006362785469746C6573010100000009000000070043617074696F6E00} end end