object AVI3Dattr: TAVI3Dattr Left = 588 Top = 467 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsDialog Caption = 'Transformation first attractor to second' ClientHeight = 148 ClientWidth = 428 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter Scaled = False OnCloseQuery = FormCloseQuery OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 4 Top = 4 Width = 421 Height = 109 Style = bsRaised end object Label1: TLabel Left = 12 Top = 15 Width = 33 Height = 13 Caption = '&1st file:' FocusControl = Edit1 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 12 Top = 44 Width = 37 Height = 13 Caption = '&2nd file:' FocusControl = Edit2 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object SpeedButton1: TSpeedButton Tag = 1 Left = 396 Top = 12 Width = 22 Height = 22 Hint = 'Load first FR3 file' Caption = '...' Flat = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial Black' Font.Style = [] Margin = 3 NumGlyphs = 2 ParentFont = False ParentShowHint = False ShowHint = True Spacing = 0 OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Tag = 2 Left = 396 Top = 40 Width = 22 Height = 22 Hint = 'Load second FR3 file' Caption = '...' Flat = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial Black' Font.Style = [] Margin = 3 NumGlyphs = 2 ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton1Click end object Label3: TLabel Left = 12 Top = 70 Width = 75 Height = 13 Caption = '&Frame count:' FocusControl = SpinEdit1 Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 116 Top = 70 Width = 58 Height = 13 Caption = '&Iterations:' FocusControl = ComboBox1 Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object SpinEdit1: TSpinEdit Left = 12 Top = 84 Width = 93 Height = 23 AutoSize = False Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Increment = 5 MaxLength = 3 MaxValue = 999 MinValue = 5 ParentFont = False TabOrder = 2 Value = 10 end object Button2: TButton Left = 220 Top = 120 Width = 89 Height = 25 Cancel = True Caption = '&Cancel' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 6 OnClick = Button2Click end object CheckBox1: TCheckBox Left = 220 Top = 86 Width = 137 Height = 17 Caption = 'Make &ping-pong clip' Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 4 end object Edit1: TEdit Tag = 1 Left = 52 Top = 12 Width = 341 Height = 22 Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 0 OnEnter = Edit1Enter OnExit = Edit1Exit end object Edit2: TEdit Tag = 2 Left = 52 Top = 40 Width = 341 Height = 22 Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 1 OnEnter = Edit2Enter OnExit = Edit1Exit end object Button1: TButton Left = 120 Top = 120 Width = 89 Height = 25 Caption = '&Ok' Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = Button1Click end object ComboBox1: TComboBox Left = 116 Top = 86 Width = 93 Height = 21 Hint = 'Changes iterations count. At a plenty of iterations the quality ' + #13#10'of the image is improved, but the time of account is increased' + '.'#13#10#13#10'Use [Ctrl + Down arrow] and [Ctrl + Up arrow] keys to chang' + 'e'#13#10'values without mouse.' Style = csDropDownList DropDownCount = 12 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( ' 10 000' ' 25 000' ' 50 000' ' 100 000' ' 200 000' ' 300 000' ' 500 000' ' 1 000 000' ' 2 000 000' ' 3 000 000' ' 5 000 000' ' 10 000 000' ' 25 000 000' ' 50 000 000' '100 000 000') ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 3 OnChange = ComboBox1Change end object OpenDialog1: TOpenDialog DefaultExt = 'fr3' Filter = '3D attractor files (*.fr3) |*.fr3' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Title = 'Select 3D-attractor file' Left = 284 Top = 12 end end