object fmMain: TfmMain Left = 274 Top = 162 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Code template' ClientHeight = 339 ClientWidth = 600 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Menu = MainMenu OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Memo: TMemo Left = 0 Top = 29 Width = 600 Height = 148 Align = alTop ScrollBars = ssVertical TabOrder = 0 OnChange = MemoChange end object ListView: TListView Left = 0 Top = 177 Width = 600 Height = 143 Align = alClient Columns = < item Caption = 'Value' Width = 100 end item AutoSize = True Caption = 'Parameter' end> HotTrackStyles = [] RowSelect = True TabOrder = 1 ViewStyle = vsReport OnEdited = ListViewEdited OnKeyDown = ListViewKeyDown end object Panel1: TPanel Left = 0 Top = 0 Width = 600 Height = 29 Align = alTop TabOrder = 2 object btnNew: TSpeedButton Left = 214 Top = 4 Width = 23 Height = 22 Hint = 'New template' Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000C40E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAA00000000000AAAAA0FEFEFEFEF0AAAAA0E0000000E 0AAAAA0FEFEFEFEF0AAAAA0E0000FEFE0AAAAA0FEFEFEFEF0AAAAA0E0000000E 0AAAAA0FEFEFEFEF0AAAAA0E000EFEFE0AAAAA0FEFEFE0000AAAAA0E000EF0F0 AAAAAA0FEFEFE00AAAAAAA00000000AAAAAAAAAAAAAAAAAAAAAA} ParentShowHint = False ShowHint = True OnClick = itmNewClick end object btnsave: TSpeedButton Left = 242 Top = 4 Width = 23 Height = 22 Hint = 'Save template' Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000C40E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA AAAAAAAAAAA000000000AAAAAAA0FFFFFFF0AAAAAAA0F44444F0A0000000FFFF FFF003077000F44444F003077000FFFFFFF003000000F44F000003333330FFFF 0F0A03800000FFFF00AA0307777000000AAA03077777030AAAAA03077777000A AAAA030777770A0AAAAA00000000000AAAAAAAAAAAAAAAAAAAAA} ParentShowHint = False ShowHint = True OnClick = itmSaveClick end object btnDel: TSpeedButton Left = 270 Top = 4 Width = 23 Height = 22 Hint = 'Delete template' Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000C40E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDD0DDDDDDDDDD0DDD000DDDDDDDDDDDDD0000DDDDDDD 0DDDDD000DDDDDD0DDDDDDD000DDDD00DDDDDDDD000DD00DDDDDDDDDD00000DD DDDDDDDDDD000DDDDDDDDDDDD00000DDDDDDDDDD000DD00DDDDDDD0000DDDD00 DDDDD0000DDDDDD00DDDD000DDDDDDDDD0DDDDDDDDDDDDDDDDDD} ParentShowHint = False ShowHint = True OnClick = itmDeleteClick end object btnClose: TSpeedButton Left = 300 Top = 4 Width = 23 Height = 22 Hint = 'Close window' Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000C40E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDD88888D DDDDDDDDD99999888DDDDDD99999999988DDDD9999999999988DD999F99999F9 998DD99FFF999FFF99889999FFF9FFF9999899999FFFFF999998999999FFF999 999899999FFFFF9999989999FFF9FFF9999DD99FFF999FFF99DDD999F99999F9 99DDDD99999999999DDDDDD999999999DDDDDDDDD99999DDDDDD} ParentShowHint = False ShowHint = True OnClick = itmCloseClick end object cbNames: TComboBox Left = 4 Top = 4 Width = 205 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 OnChange = cbNamesChange end end object StatusBar1: TStatusBar Left = 0 Top = 320 Width = 600 Height = 19 Panels = <> SimplePanel = False end object MainMenu: TMainMenu Left = 340 Top = 260 object itmTemplate: TMenuItem Caption = '&Template' object itmNew: TMenuItem Caption = '&New' OnClick = itmNewClick end object itmSave: TMenuItem Caption = '&Save' OnClick = itmSaveClick end object itmDelete: TMenuItem Caption = '&Delete' OnClick = itmDeleteClick end object N1: TMenuItem Caption = '-' end object itmClose: TMenuItem Caption = '&Close' OnClick = itmCloseClick end end object itmHelp: TMenuItem Caption = '&Help' object itmContents: TMenuItem Caption = '&Contents' end object N2: TMenuItem Caption = '-' end object itmAbout: TMenuItem Caption = '&About ...' OnClick = itmAboutClick end end end end