object MainForm: TMainForm Left = 234 Top = 144 Width = 1021 Height = 658 ActiveControl = ImageEnView1 Caption = 'Manual animations-flow example' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate OnDestroy = FormDestroy OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 257 Height = 624 Align = alLeft TabOrder = 0 object SpeedButtonAdvanced: TSpeedButton Left = 8 Top = 216 Width = 65 Height = 26 AllowAllUp = True GroupIndex = 1 Caption = 'Advanced' OnClick = SpeedButtonAdvancedClick end object Label7: TLabel Left = 8 Top = 600 Width = 25 Height = 13 Caption = '- - - -' end object Label9: TLabel Left = 111 Top = 221 Width = 47 Height = 13 Caption = 'Animation' end object DriveComboBox1: TDriveComboBox Left = 8 Top = 11 Width = 238 Height = 19 DirList = DirectoryListBox1 TabOrder = 0 end object DirectoryListBox1: TDirectoryListBox Left = 8 Top = 32 Width = 238 Height = 177 ItemHeight = 16 TabOrder = 1 OnChange = DirectoryListBox1Change end object ComboBox1: TComboBox Left = 161 Top = 219 Width = 81 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 2 OnChange = ComboBox1Change Items.Strings = ( 'Horizontal' 'Circular') end object PageControl1: TPageControl Left = 8 Top = 256 Width = 233 Height = 209 ActivePage = TabSheet3 TabOrder = 3 Visible = False object TabSheet3: TTabSheet Caption = 'Common' object Label6: TLabel Left = 8 Top = 10 Width = 71 Height = 13 Caption = 'Anim. Duration' end object Label2: TLabel Left = 128 Top = 11 Width = 29 Height = 13 Caption = 'Depth' end object Label8: TLabel Left = 8 Top = 59 Width = 211 Height = 13 Caption = 'Shadow alpha min and max (-1=no shadow)' end object lblColor: TLabel Left = 137 Top = 131 Width = 29 Height = 13 Caption = 'Color:' end object EditAnimDuration: TEdit Left = 8 Top = 26 Width = 49 Height = 21 TabOrder = 0 Text = '800' OnChange = CtrlsChanged end object UpDownAnimDuration: TUpDown Left = 57 Top = 26 Width = 16 Height = 21 Associate = EditAnimDuration Max = 32767 Position = 800 TabOrder = 1 Thousands = False end object EditDepth: TEdit Left = 128 Top = 27 Width = 49 Height = 21 TabOrder = 2 Text = '500' OnChange = CtrlsChanged end object UpDownDepth: TUpDown Left = 177 Top = 27 Width = 16 Height = 21 Associate = EditDepth Max = 5000 Position = 500 TabOrder = 3 Thousands = False end object EditShadowAlphaMin: TEdit Left = 8 Top = 75 Width = 34 Height = 21 TabOrder = 4 Text = '0' OnChange = CtrlsChanged end object UpDownShadowAlphaMin: TUpDown Left = 42 Top = 75 Width = 16 Height = 21 Associate = EditShadowAlphaMin Min = -1 Max = 255 TabOrder = 5 Thousands = False end object EditShadowAlphaMax: TEdit Left = 96 Top = 75 Width = 34 Height = 21 TabOrder = 6 Text = '40' OnChange = CtrlsChanged end object UpDownShadowAlphaMax: TUpDown Left = 130 Top = 75 Width = 16 Height = 21 Associate = EditShadowAlphaMax Min = -1 Max = 255 Position = 40 TabOrder = 7 Thousands = False end object CheckBoxShowBorder: TCheckBox Left = 8 Top = 105 Width = 97 Height = 17 Caption = 'Show border' TabOrder = 8 OnClick = CtrlsChanged end object CheckBoxShowFilename: TCheckBox Left = 8 Top = 129 Width = 97 Height = 17 Caption = 'Show filename' Checked = True State = cbChecked TabOrder = 9 OnClick = CtrlsChanged end object CheckBoxShowScrollbar: TCheckBox Left = 8 Top = 153 Width = 97 Height = 17 Caption = 'Show scrollbar' Checked = True State = cbChecked TabOrder = 10 OnClick = CtrlsChanged end object pnlColor: TPanel Left = 172 Top = 126 Width = 28 Height = 23 Color = clWhite ParentBackground = False TabOrder = 11 OnClick = pnlColorClick end end object TabSheet1: TTabSheet Caption = 'Horizontal' object Label1: TLabel Left = 8 Top = 8 Width = 91 Height = 13 Caption = 'Horizontal distance' end object Label5: TLabel Left = 128 Top = 9 Width = 62 Height = 13 Caption = 'Rotate angle' end object Label3: TLabel Left = 8 Top = 53 Width = 171 Height = 13 Caption = 'Images horiz. and vert. percentage' end object Label4: TLabel Left = 8 Top = 99 Width = 153 Height = 13 Caption = 'Images and current image zoom' end object EditHorizDistance: TEdit Left = 8 Top = 24 Width = 49 Height = 21 TabOrder = 0 Text = '80' OnChange = CtrlsChanged end object UpDownHorizDistance: TUpDown Left = 57 Top = 24 Width = 16 Height = 21 Associate = EditHorizDistance Max = 500 Position = 80 TabOrder = 1 Thousands = False end object EditRotateAngle: TEdit Left = 128 Top = 25 Width = 49 Height = 21 TabOrder = 2 Text = '40' OnChange = CtrlsChanged end object UpDownRotateAngle: TUpDown Left = 177 Top = 25 Width = 16 Height = 21 Associate = EditRotateAngle Max = 359 Position = 40 TabOrder = 3 Thousands = False end object EditImagesHorizPer: TEdit Left = 8 Top = 69 Width = 49 Height = 21 TabOrder = 4 Text = '40' OnChange = CtrlsChanged end object UpDownImagesHorizPer: TUpDown Left = 57 Top = 69 Width = 16 Height = 21 Associate = EditImagesHorizPer Position = 40 TabOrder = 5 Thousands = False end object EditImagesVertPer: TEdit Left = 128 Top = 70 Width = 49 Height = 21 TabOrder = 6 Text = '80' OnChange = CtrlsChanged end object UpDownImagesVertPer: TUpDown Left = 177 Top = 70 Width = 16 Height = 21 Associate = EditImagesVertPer Position = 80 TabOrder = 7 Thousands = False end object EditImagesZoom: TEdit Left = 8 Top = 115 Width = 34 Height = 21 TabOrder = 8 Text = '70' OnChange = CtrlsChanged end object UpDownImagesZoom: TUpDown Left = 42 Top = 115 Width = 16 Height = 21 Associate = EditImagesZoom Position = 70 TabOrder = 9 Thousands = False end object EditCurrentImageZoom: TEdit Left = 128 Top = 115 Width = 34 Height = 21 TabOrder = 10 Text = '100' OnChange = CtrlsChanged end object UpDownCurrentImageZoom: TUpDown Left = 162 Top = 115 Width = 16 Height = 21 Associate = EditCurrentImageZoom Position = 100 TabOrder = 11 Thousands = False end end object TabSheet2: TTabSheet Caption = 'Circular' ImageIndex = 1 object Label10: TLabel Left = 8 Top = 5 Width = 114 Height = 13 Caption = 'Images size percentage' end object Label11: TLabel Left = 8 Top = 51 Width = 153 Height = 13 Caption = 'Images and current image zoom' end object Label12: TLabel Left = 8 Top = 95 Width = 65 Height = 13 Caption = 'Visible images' end object Label13: TLabel Left = 8 Top = 138 Width = 58 Height = 13 Caption = 'Ellipse angle' end object Edit1: TEdit Left = 8 Top = 21 Width = 49 Height = 21 TabOrder = 0 Text = '40' OnChange = CtrlsChanged end object UpDown1: TUpDown Left = 57 Top = 21 Width = 16 Height = 21 Associate = Edit1 Position = 40 TabOrder = 1 Thousands = False end object Edit2: TEdit Left = 8 Top = 67 Width = 34 Height = 21 TabOrder = 2 Text = '20' OnChange = CtrlsChanged end object UpDown2: TUpDown Left = 42 Top = 67 Width = 16 Height = 21 Associate = Edit2 Position = 20 TabOrder = 3 Thousands = False end object Edit3: TEdit Left = 128 Top = 67 Width = 34 Height = 21 TabOrder = 4 Text = '100' OnChange = CtrlsChanged end object UpDown3: TUpDown Left = 162 Top = 67 Width = 16 Height = 21 Associate = Edit3 Position = 100 TabOrder = 5 Thousands = False end object Edit4: TEdit Left = 8 Top = 111 Width = 49 Height = 21 TabOrder = 6 Text = '15' OnChange = CtrlsChanged end object UpDown4: TUpDown Left = 57 Top = 111 Width = 16 Height = 21 Associate = Edit4 Min = 1 Position = 15 TabOrder = 7 Thousands = False end object Edit5: TEdit Left = 8 Top = 154 Width = 49 Height = 21 TabOrder = 8 Text = '0' OnChange = CtrlsChanged end object UpDown5: TUpDown Left = 57 Top = 154 Width = 16 Height = 21 Associate = Edit5 Max = 359 TabOrder = 9 Thousands = False end end end end object ImageEnView1: TImageEnView Left = 257 Top = 0 Width = 756 Height = 624 Background = clBlack ParentCtl3D = False OnVirtualKey = ImageEnView1VirtualKey EnableInteractionHints = True Align = alClient TabOrder = 1 OnMouseDown = ImageEnView1MouseDown OnMouseMove = ImageEnView1MouseMove OnMouseUp = ImageEnView1MouseUp end object Timer1: TTimer Interval = 10 OnTimer = Timer1Timer Left = 265 Top = 24 end object dlgColor: TColorDialog Left = 320 Top = 24 end end