PC World Komputer 1998 June A/Pcwk6A98.iso/Share95/Tvstudio/_SETUP.1/PStudio.exe/0/RCDATA/TGRADFORM1/TGRADFORM1.txt

Text File | 1998-04-01 | 5.5 KB | 214 lines

object gradform1: Tgradform1
  Left = 415
  Top = -2
  BorderStyle = bsToolWindow
  Caption = 'Use a stretch of gradient color '
  ClientHeight = 114
  ClientWidth = 514
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Image1: TImage
    Left = 0
    Top = 0
    Width = 514
    Height = 25
    Cursor = crHandPoint
    Align = alTop
    OnMouseUp = Image1MouseUp
  end
  object Label1: TLabel
    Left = 72
    Top = 8
    Width = 6
    Height = 13
    Caption = 'L'
    Color = clWhite
    ParentColor = False
  end
  object Label2: TLabel
    Left = 456
    Top = 8
    Width = 8
    Height = 13
    Caption = 'R'
    Color = clWhite
    ParentColor = False
  end
  object Panel4: TPanel
    Left = 0
    Top = 32
    Width = 513
    Height = 81
    TabOrder = 0
    object TrackBar2: TTrackBar
      Left = 0
      Top = 8
      Width = 512
      Height = 26
      LineSize = 4
      Max = 512
      Min = 1
      Orientation = trHorizontal
      PageSize = 1
      Frequency = 4
      Position = 120
      SelEnd = 0
      SelStart = 0
      TabOrder = 0
      TickMarks = tmTopLeft
      TickStyle = tsAuto
      OnChange = TrackBar2Change
      OnKeyUp = TrackBar2KeyUp
    end
    object Panel1: TPanel
      Left = 24
      Top = 40
      Width = 60
      Height = 33
      Color = clRed
      TabOrder = 1
      object SpeedButton1: TSpeedButton
        Left = 4
        Top = 4
        Width = 25
        Height = 25
        Caption = 'R+'
        OnClick = SpeedButton1Click
      end
      object SpeedButton6: TSpeedButton
        Left = 32
        Top = 4
        Width = 25
        Height = 25
        Caption = 'R-'
        OnClick = SpeedButton6Click
      end
    end
    object Panel2: TPanel
      Left = 88
      Top = 40
      Width = 60
      Height = 33
      Color = clGreen
      TabOrder = 2
      object SpeedButton2: TSpeedButton
        Left = 4
        Top = 4
        Width = 25
        Height = 25
        Caption = 'G+'
        OnClick = SpeedButton2Click
      end
      object SpeedButton7: TSpeedButton
        Left = 32
        Top = 4
        Width = 25
        Height = 25
        Caption = 'G-'
        OnClick = SpeedButton7Click
      end
    end
    object Panel3: TPanel
      Left = 152
      Top = 40
      Width = 60
      Height = 33
      Color = clBlue
      TabOrder = 3
      object SpeedButton3: TSpeedButton
        Left = 4
        Top = 4
        Width = 25
        Height = 25
        Caption = 'B+'
        OnClick = SpeedButton3Click
      end
      object SpeedButton8: TSpeedButton
        Left = 32
        Top = 4
        Width = 25
        Height = 25
        Caption = 'B-'
        OnClick = SpeedButton8Click
      end
    end
    object BitBtn1: TBitBtn
      Left = 336
      Top = 48
      Width = 75
      Height = 25
      TabOrder = 4
      OnClick = BitBtn1Click
      Kind = bkOK
    end
    object BitBtn2: TBitBtn
      Left = 424
      Top = 48
      Width = 75
      Height = 25
      Caption = 'Close'
      TabOrder = 5
      Kind = bkClose
    end
    object Panel5: TPanel
      Left = 216
      Top = 40
      Width = 60
      Height = 33
      Caption = ' '
      Color = clWhite
      TabOrder = 6
      object SpeedButton4: TSpeedButton
        Left = 4
        Top = 4
        Width = 25
        Height = 25
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
          333333333337FF3333333333330003333333333333777F333333333333080333
          3333333F33777FF33F3333B33B000B33B3333373F777773F7333333BBB0B0BBB
          33333337737F7F77F333333BBB0F0BBB33333337337373F73F3333BBB0F7F0BB
          B333337F3737F73F7F3333BB0FB7BF0BB3333F737F37F37F73FFBBBB0BF7FB0B
          BBB3773F7F37337F377333BB0FBFBF0BB333337F73F333737F3333BBB0FBF0BB
          B3333373F73FF7337333333BBB000BBB33333337FF777337F333333BBBBBBBBB
          3333333773FF3F773F3333B33BBBBB33B33333733773773373333333333B3333
          333333333337F33333333333333B333333333333333733333333}
        NumGlyphs = 2
        OnClick = SpeedButton4Click
      end
      object SpeedButton5: TSpeedButton
        Left = 32
        Top = 4
        Width = 25
        Height = 25
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
          333333333337FF3333333333330003333333333333777F333333333333080333
          3333333333777F3333333333330003333333333333777F3333333333330F0333
          33333333337F7F3333333333330F033333333333337373F33333333330F7F033
          333333333737F73F333333330FF7FF03333333337F37F37F333333330FF7FF03
          333333337F37337F333333330FFFFF033333333373F333733333333330FFF033
          33333333373FF733333333333300033333333333337773333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          3333333333333333333333333333333333333333333333333333}
        NumGlyphs = 2
        OnClick = SpeedButton5Click
      end
    end
  end
end