object JvSpecialProgressMainForm: TJvSpecialProgressMainForm Left = 247 Top = 109 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'JvSpecialProgressMainForm' ClientHeight = 541 ClientWidth = 762 Color = clBtnFace DefaultMonitor = dmDesktop Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poDesktopCenter Scaled = False OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 762 Height = 238 Align = alClient Color = clOlive Constraints.MinHeight = 183 FullRepaint = False TabOrder = 0 object JvSpecialProgress1: TJvSpecialProgress Left = 8 Top = 56 Width = 744 Height = 55 Hint = 'TJvSpecialProgress' Anchors = [akLeft, akTop, akRight, akBottom] Color = clYellow EndColor = clWhite HintColor = clYellow ParentColor = False ShowHint = True StartColor = clBlack Step = 0 TextOption = toPercent end object Gauge1: TGauge Left = 8 Top = 8 Width = 744 Height = 41 Hint = 'TGauge' Anchors = [akLeft, akTop, akRight] ParentShowHint = False Progress = 0 ShowHint = True end object TrackBar1: TTrackBar Left = 8 Top = 184 Width = 744 Height = 45 Anchors = [akLeft, akRight, akBottom] Max = 100 Orientation = trHorizontal Frequency = 100 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 1 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TrackBar1Change end object ProgressBar1: TProgressBar Left = 8 Top = 126 Width = 744 Height = 41 Hint = 'TProgressBar' Anchors = [akLeft, akRight, akBottom] Min = 0 Max = 100 ParentShowHint = False ShowHint = True TabOrder = 0 end end object Panel2: TPanel Left = 0 Top = 238 Width = 762 Height = 303 Align = alBottom Caption = 'Panel2' TabOrder = 1 object rgrStartColor: TRadioGroup Left = 8 Top = 8 Width = 137 Height = 209 Caption = 'Start Color: ' Columns = 2 ItemIndex = 0 Items.Strings = ( 'clBlack' 'clMaroon' 'clGreen' 'clOlive' 'clNavy' 'clPurple' 'clTeal' 'clGray' 'clSilver' 'clRed' 'clLime' 'clYellow' 'clBlue' 'clFuchsia' 'clAqua' 'clWhite') TabOrder = 0 OnClick = rgrStartColorClick end object rgrEndColor: TRadioGroup Left = 152 Top = 8 Width = 137 Height = 209 Caption = ' End Color: ' Columns = 2 ItemIndex = 15 Items.Strings = ( 'clBlack' 'clMaroon' 'clGreen' 'clOlive' 'clNavy' 'clPurple' 'clTeal' 'clGray' 'clSilver' 'clRed' 'clLime' 'clYellow' 'clBlue' 'clFuchsia' 'clAqua' 'clWhite') TabOrder = 1 OnClick = rgrEndColorClick end object rgrBackground: TRadioGroup Left = 296 Top = 8 Width = 137 Height = 209 Caption = ' Background Color: ' Columns = 2 ItemIndex = 11 Items.Strings = ( 'clBlack' 'clMaroon' 'clGreen' 'clOlive' 'clNavy' 'clPurple' 'clTeal' 'clGray' 'clSilver' 'clRed' 'clLime' 'clYellow' 'clBlue' 'clFuchsia' 'clAqua' 'clWhite') TabOrder = 2 OnClick = rgrBackgroundClick end object rgrPanel: TRadioGroup Left = 440 Top = 8 Width = 137 Height = 209 Caption = ' Panel Color: ' Color = clBtnFace Columns = 2 ItemIndex = 3 Items.Strings = ( 'clBlack' 'clMaroon' 'clGreen' 'clOlive' 'clNavy' 'clPurple' 'clTeal' 'clGray' 'clSilver' 'clRed' 'clLime' 'clYellow' 'clBlue' 'clFuchsia' 'clAqua' 'clWhite') ParentColor = False TabOrder = 3 OnClick = rgrPanelClick end object chbSolid: TCheckBox Left = 584 Top = 24 Width = 97 Height = 17 Caption = 'Solid' TabOrder = 5 OnClick = chbSolidClick end object chbTextVisible: TCheckBox Left = 584 Top = 56 Width = 97 Height = 17 Caption = 'Text Visible' TabOrder = 7 OnClick = chbTextVisibleClick end object chbTextCentered: TCheckBox Left = 584 Top = 40 Width = 97 Height = 17 Caption = 'Text Centered' TabOrder = 6 OnClick = chbTextCenteredClick end object chbTransparent: TCheckBox Left = 584 Top = 72 Width = 97 Height = 17 Caption = 'Transparent' TabOrder = 8 end object chbGradientBlocks: TCheckBox Left = 584 Top = 8 Width = 97 Height = 17 Caption = 'Gradient Blocks' TabOrder = 4 OnClick = chbGradientBlocksClick end object rgrFont: TRadioGroup Left = 8 Top = 224 Width = 425 Height = 73 Caption = ' Font: ' Columns = 4 Items.Strings = ( 'Font 1' 'Font 2' 'Font 3' 'Font 4' 'Font 5' 'Font 6' 'Font 7' 'Font 8') TabOrder = 10 OnClick = rgrFontClick end object Panel3: TPanel Left = 584 Top = 136 Width = 169 Height = 161 TabOrder = 12 object lblMinimum: TLabel Left = 8 Top = 8 Width = 44 Height = 13 Caption = 'Minimum:' end object lblMaximum: TLabel Left = 8 Top = 60 Width = 47 Height = 13 Caption = 'Maximum:' end object lblStep: TLabel Left = 8 Top = 108 Width = 25 Height = 13 Caption = 'Step:' end object edtMinimum: TEdit Left = 8 Top = 28 Width = 65 Height = 21 TabOrder = 0 Text = '0' end object edtMaximum: TEdit Left = 8 Top = 76 Width = 65 Height = 21 TabOrder = 1 Text = '100' end object edtStep: TEdit Left = 8 Top = 124 Width = 65 Height = 21 TabOrder = 2 Text = '10' end object btnApply: TButton Left = 86 Top = 76 Width = 75 Height = 25 Caption = 'Apply' TabOrder = 3 OnClick = btnApplyClick end object btnStepIt: TButton Left = 86 Top = 124 Width = 75 Height = 25 Caption = 'StepIt' TabOrder = 4 OnClick = btnStepItClick end end object chbPanelDoubleBuffered: TCheckBox Left = 584 Top = 104 Width = 153 Height = 17 Caption = 'Panel Double Buffered' TabOrder = 9 OnClick = chbPanelDoubleBufferedClick end object btnRandom: TButton Left = 440 Top = 224 Width = 137 Height = 73 Caption = 'Random' TabOrder = 11 OnClick = btnRandomClick end end end