home *** CD-ROM | disk | FTP | other *** search
- object Form7: TForm7
- Left = 408
- Top = 55
- BorderIcons = []
- BorderStyle = bsDialog
- Caption = 'Fade In'
- ClientHeight = 303
- ClientWidth = 260
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = True
- Position = poScreenCenter
- OnActivate = FormActivate
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 134
- Top = 120
- Width = 108
- Height = 110
- end
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 402
- Height = 27
- Stretch = True
- end
- object Image3: TImage
- Left = 161
- Top = 0
- Width = 99
- Height = 303
- Align = alRight
- AutoSize = True
- Picture.Data = {<image001.bmp>}
- Transparent = True
- end
- object Label1: TLabel
- Left = 16
- Top = 46
- Width = 66
- Height = 13
- Caption = '&Initial percent:'
- FocusControl = TrackBar1
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label2: TLabel
- Left = 215
- Top = 96
- Width = 26
- Height = 13
- Caption = '100%'
- end
- object Label3: TLabel
- Left = 117
- Top = 96
- Width = 20
- Height = 13
- Caption = '50%'
- end
- object Label4: TLabel
- Left = 17
- Top = 96
- Width = 14
- Height = 13
- Caption = '0%'
- end
- object Bevel2: TBevel
- Left = 134
- Top = 174
- Width = 108
- Height = 2
- Shape = bsTopLine
- Style = bsRaised
- end
- object Image2: TImage
- Left = 8
- Top = 8
- Width = 32
- Height = 32
- AutoSize = True
- Picture.Data = {<image002.bmp>}
- end
- object Image4: TImage
- Left = 49
- Top = 0
- Width = 112
- Height = 303
- Align = alRight
- AutoSize = True
- Picture.Data = {<image003.bmp>}
- Transparent = True
- Visible = False
- end
- object GroupBox1: TGroupBox
- Left = 16
- Top = 115
- Width = 108
- Height = 48
- Caption = '&Manual Selection'
- TabOrder = 4
- object Label5: TLabel
- Left = 79
- Top = 19
- Width = 14
- Height = 16
- Caption = '%'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Edit1: TEdit
- Left = 16
- Top = 16
- Width = 57
- Height = 24
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- Text = '100'
- OnExit = Edit1Exit
- OnKeyPress = Edit1KeyPress
- end
- end
- object TrackBar1: TTrackBar
- Left = 8
- Top = 64
- Width = 241
- Height = 33
- Max = 100
- Orientation = trHorizontal
- Frequency = 10
- Position = 100
- SelEnd = 100
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = TrackBar1Change
- end
- object Button1: TButton
- Left = 151
- Top = 236
- Width = 75
- Height = 25
- Caption = '&OK'
- Default = True
- ModalResult = 1
- TabOrder = 1
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 151
- Top = 260
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- ModalResult = 2
- TabOrder = 2
- OnClick = Button2Click
- end
- object RadioGroup1: TRadioGroup
- Left = 16
- Top = 169
- Width = 108
- Height = 116
- Caption = '&Progression type:'
- ItemIndex = 0
- Items.Strings = (
- 'Linear'
- 'Exponential'
- 'Logarithm')
- TabOrder = 3
- OnClick = RadioGroup1Click
- end
- end
-