| 1 | object Form14: TForm14 | 
 
 
 
 
 | 2 | Left = 0 | 
 
 
 
 
 | 3 | Top = 0 | 
 
 
 
 
 | 4 | BorderStyle = bsToolWindow | 
 
 
 
 
 | 5 | Caption = 'Models' | 
 
 
 
 
 | 6 | ClientHeight = 217 | 
 
 
 
 
 | 7 | ClientWidth = 265 | 
 
 
 
 
 | 8 | Color = clBtnFace | 
 
 
 
 
 | 9 | Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 | 10 | Font.Color = clWindowText | 
 
 
 
 
 | 11 | Font.Height = -11 | 
 
 
 
 
 | 12 | Font.Name = 'Tahoma' | 
 
 
 
 
 | 13 | Font.Style = [] | 
 
 
 
 
 | 14 | OldCreateOrder = False | 
 
 
 
 
 | 15 | OnCloseQuery = FormCloseQuery | 
 
 
 
 
 | 16 | PixelsPerInch = 96 | 
 
 
 
 
 | 17 | TextHeight = 13 | 
 
 
 
 
 | 18 | object Label1: TLabel | 
 
 
 
 
 | 19 | Left = 8 | 
 
 
 
 
 | 20 | Top = 8 | 
 
 
 
 
 | 21 | Width = 121 | 
 
 
 
 
 | 22 | Height = 17 | 
 
 
 
 
 | 23 | AutoSize = False | 
 
 
 
 
 | 24 | Caption = 'Char to apply model on:' | 
 
 
 
 
 | 25 | end | 
 
 
 
 
 | 26 | object Label2: TLabel | 
 
 
 
 
 | 27 | Left = 8 | 
 
 
 
 
 | 28 | Top = 32 | 
 
 
 
 
 | 29 | Width = 73 | 
 
 
 
 
 | 30 | Height = 17 | 
 
 
 
 
 | 31 | AutoSize = False | 
 
 
 
 
 | 32 | Caption = 'Model:' | 
 
 
 
 
 | 33 | end | 
 
 
 
 
 | 34 | object edit_char: TEdit | 
 
 
 
 
 | 35 | Left = 126 | 
 
 
 
 
 | 36 | Top = 6 | 
 
 
 
 
 | 37 | Width = 107 | 
 
 
 
 
 | 38 | Height = 17 | 
 
 
 
 
 | 39 | AutoSize = False | 
 
 
 
 
 | 40 | ReadOnly = True | 
 
 
 
 
 | 41 | TabOrder = 0 | 
 
 
 
 
 | 42 | Text = '0' | 
 
 
 
 
 | 43 | end | 
 
 
 
 
 | 44 | object list: TListBox | 
 
 
 
 
 | 45 | Left = 8 | 
 
 
 
 
 | 46 | Top = 48 | 
 
 
 
 
 | 47 | Width = 249 | 
 
 
 
 
 | 48 | Height = 161 | 
 
 
 
 
 | 49 | ItemHeight = 13 | 
 
 
 
 
 | 50 | TabOrder = 1 | 
 
 
 
 
 | 51 | OnClick = listClick | 
 
 
 
 
 | 52 | end | 
 
 
 
 
 | 53 | object updown: TUpDown | 
 
 
 
 
 | 54 | Left = 235 | 
 
 
 
 
 | 55 | Top = 4 | 
 
 
 
 
 | 56 | Width = 17 | 
 
 
 
 
 | 57 | Height = 20 | 
 
 
 
 
 | 58 | Max = 32 | 
 
 
 
 
 | 59 | TabOrder = 2 | 
 
 
 
 
 | 60 | OnClick = updownClick | 
 
 
 
 
 | 61 | end | 
 
 
 
 
 | 62 | object tim_lvlcheck: TTimer | 
 
 
 
 
 | 63 | OnTimer = tim_lvlcheckTimer | 
 
 
 
 
 | 64 | Left = 152 | 
 
 
 
 
 | 65 | Top = 32 | 
 
 
 
 
 | 66 | end | 
 
 
 
 
 | 67 | end |