| 1 | object Form4: TForm4 | 
 
 
 
 
 | 2 | Left = 0 | 
 
 
 
 
 | 3 | Top = 0 | 
 
 
 
 
 | 4 | BorderStyle = bsToolWindow | 
 
 
 
 
 | 5 | Caption = 'Animations' | 
 
 
 
 
 | 6 | ClientHeight = 710 | 
 
 
 
 
 | 7 | ClientWidth = 264 | 
 
 
 
 
 | 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 | OnCreate = FormCreate | 
 
 
 
 
 | 17 | PixelsPerInch = 96 | 
 
 
 
 
 | 18 | TextHeight = 13 | 
 
 
 
 
 | 19 | object Label1: TLabel | 
 
 
 
 
 | 20 | Left = 8 | 
 
 
 
 
 | 21 | Top = 8 | 
 
 
 
 
 | 22 | Width = 121 | 
 
 
 
 
 | 23 | Height = 17 | 
 
 
 
 
 | 24 | AutoSize = False | 
 
 
 
 
 | 25 | Caption = 'Char to apply anims on:' | 
 
 
 
 
 | 26 | end | 
 
 
 
 
 | 27 | object Label2: TLabel | 
 
 
 
 
 | 28 | Left = 8 | 
 
 
 
 
 | 29 | Top = 56 | 
 
 
 
 
 | 30 | Width = 73 | 
 
 
 
 
 | 31 | Height = 17 | 
 
 
 
 
 | 32 | AutoSize = False | 
 
 
 
 
 | 33 | Caption = 'Current anim:' | 
 
 
 
 
 | 34 | end | 
 
 
 
 
 | 35 | object edit_char: TEdit | 
 
 
 
 
 | 36 | Left = 126 | 
 
 
 
 
 | 37 | Top = 6 | 
 
 
 
 
 | 38 | Width = 107 | 
 
 
 
 
 | 39 | Height = 17 | 
 
 
 
 
 | 40 | AutoSize = False | 
 
 
 
 
 | 41 | ReadOnly = True | 
 
 
 
 
 | 42 | TabOrder = 0 | 
 
 
 
 
 | 43 | Text = '0' | 
 
 
 
 
 | 44 | end | 
 
 
 
 
 | 45 | object list: TListBox | 
 
 
 
 
 | 46 | Left = 8 | 
 
 
 
 
 | 47 | Top = 72 | 
 
 
 
 
 | 48 | Width = 249 | 
 
 
 
 
 | 49 | Height = 161 | 
 
 
 
 
 | 50 | ItemHeight = 13 | 
 
 
 
 
 | 51 | TabOrder = 1 | 
 
 
 
 
 | 52 | OnClick = listClick | 
 
 
 
 
 | 53 | end | 
 
 
 
 
 | 54 | object btn_demo: TButton | 
 
 
 
 
 | 55 | Left = 144 | 
 
 
 
 
 | 56 | Top = 240 | 
 
 
 
 
 | 57 | Width = 113 | 
 
 
 
 
 | 58 | Height = 25 | 
 
 
 
 
 | 59 | Caption = 'Start anim &demo' | 
 
 
 
 
 | 60 | TabOrder = 2 | 
 
 
 
 
 | 61 | OnClick = btn_demoClick | 
 
 
 
 
 | 62 | end | 
 
 
 
 
 | 63 | object check_freeze: TCheckBox | 
 
 
 
 
 | 64 | Left = 10 | 
 
 
 
 
 | 65 | Top = 245 | 
 
 
 
 
 | 66 | Width = 129 | 
 
 
 
 
 | 67 | Height = 17 | 
 
 
 
 
 | 68 | Caption = '&Freeze selected anim' | 
 
 
 
 
 | 69 | TabOrder = 3 | 
 
 
 
 
 | 70 | OnClick = check_freezeClick | 
 
 
 
 
 | 71 | end | 
 
 
 
 
 | 72 | object check_global: TRadioButton | 
 
 
 
 
 | 73 | Left = 8 | 
 
 
 
 
 | 74 | Top = 32 | 
 
 
 
 
 | 75 | Width = 121 | 
 
 
 
 
 | 76 | Height = 17 | 
 
 
 
 
 | 77 | Caption = '&Global anims' | 
 
 
 
 
 | 78 | Checked = True | 
 
 
 
 
 | 79 | TabOrder = 4 | 
 
 
 
 
 | 80 | TabStop = True | 
 
 
 
 
 | 81 | OnClick = check_globalClick | 
 
 
 
 
 | 82 | end | 
 
 
 
 
 | 83 | object check_local: TRadioButton | 
 
 
 
 
 | 84 | Left = 136 | 
 
 
 
 
 | 85 | Top = 32 | 
 
 
 
 
 | 86 | Width = 121 | 
 
 
 
 
 | 87 | Height = 17 | 
 
 
 
 
 | 88 | Caption = '&Local anims' | 
 
 
 
 
 | 89 | TabOrder = 5 | 
 
 
 
 
 | 90 | OnClick = check_localClick | 
 
 
 
 
 | 91 | end | 
 
 
 
 
 | 92 | object updown: TUpDown | 
 
 
 
 
 | 93 | Left = 235 | 
 
 
 
 
 | 94 | Top = 4 | 
 
 
 
 
 | 95 | Width = 17 | 
 
 
 
 
 | 96 | Height = 20 | 
 
 
 
 
 | 97 | Max = 32 | 
 
 
 
 
 | 98 | TabOrder = 6 | 
 
 
 
 
 | 99 | OnClick = updownClick | 
 
 
 
 
 | 100 | end | 
 
 
 
 
 | 101 | object group_anim: TGroupBox | 
 
 
 
 
 | 102 | Left = 8 | 
 
 
 
 
 | 103 | Top = 272 | 
 
 
 
 
 | 104 | Width = 249 | 
 
 
 
 
 | 105 | Height = 433 | 
 
 
 
 
 | 106 | Caption = 'Anim info' | 
 
 
 
 
 | 107 | TabOrder = 7 | 
 
 
 
 
 | 108 | object lbl_lvl: TLabel | 
 
 
 
 
 | 109 | Left = 8 | 
 
 
 
 
 | 110 | Top = 16 | 
 
 
 
 
 | 111 | Width = 177 | 
 
 
 
 
 | 112 | Height = 17 | 
 
 
 
 
 | 113 | AutoSize = False | 
 
 
 
 
 | 114 | Caption = 'Lvl required: ' | 
 
 
 
 
 | 115 | end | 
 
 
 
 
 | 116 | object memo: TMemo | 
 
 
 
 
 | 117 | Left = 8 | 
 
 
 
 
 | 118 | Top = 32 | 
 
 
 
 
 | 119 | Width = 233 | 
 
 
 
 
 | 120 | Height = 393 | 
 
 
 
 
 | 121 | TabOrder = 0 | 
 
 
 
 
 | 122 | WordWrap = False | 
 
 
 
 
 | 123 | end | 
 
 
 
 
 | 124 | end | 
 
 
 
 
 | 125 | object timer_anim: TTimer | 
 
 
 
 
 | 126 | Interval = 100 | 
 
 
 
 
 | 127 | OnTimer = timer_animTimer | 
 
 
 
 
 | 128 | Left = 120 | 
 
 
 
 
 | 129 | Top = 64 | 
 
 
 
 
 | 130 | end | 
 
 
 
 
 | 131 | end |