home *** CD-ROM | disk | FTP | other *** search
- object PainterQBF: TPainterQBF
- Left = 90
- Top = 124
- BorderStyle = bsToolWindow
- Caption = 'QuickBack'
- ClientHeight = 399
- ClientWidth = 570
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OldCreateOrder = False
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 16
- object Panel1: TPanel
- Left = 354
- Top = 0
- Width = 216
- Height = 399
- Align = alRight
- TabOrder = 0
- object Bevel1: TBevel
- Left = 1
- Top = 1
- Width = 214
- Height = 113
- Align = alTop
- end
- object Panel2: TPanel
- Left = 1
- Top = 114
- Width = 214
- Height = 284
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object Shape1: TShape
- Left = 104
- Top = 12
- Width = 25
- Height = 15
- Brush.Color = clRed
- Pen.Style = psClear
- Shape = stCircle
- end
- object Shape2: TShape
- Left = 128
- Top = 12
- Width = 25
- Height = 15
- Brush.Color = clGreen
- Pen.Style = psClear
- Shape = stCircle
- end
- object Shape3: TShape
- Left = 152
- Top = 12
- Width = 25
- Height = 15
- Brush.Color = clBlue
- Pen.Style = psClear
- Shape = stCircle
- end
- object btnUse: TSpeedButton
- Left = 112
- Top = 256
- Width = 65
- Height = 22
- Caption = 'Use'
- Flat = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clGreen
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = btnUseClick
- end
- object QBList: TListBox
- Left = 0
- Top = 0
- Width = 97
- Height = 284
- Align = alLeft
- ItemHeight = 16
- Items.Strings = (
- 'Prod'
- 'Sum'
- 'Sub'
- 'Xor'
- 'And'
- 'OutAnd'
- 'InAnd'
- 'OutXor'
- 'InXor'
- 'OutMod'
- 'InMod'
- 'ProdXor'
- 'SumXor'
- 'SubXor'
- 'ProdAnd'
- 'SumAnd'
- 'SubAnd'
- 'Inner'
- 'Outer'
- 'OutRed'
- 'InRed'
- 'OutGreen'
- 'InGreen'
- 'Outblue'
- 'InBlue'
- 'InModOut'
- 'OutModIn'
- 'OutModIn2'
- 'ModMod'
- 'ModModXor'
- 'Mod3'
- 'ModModSub'
- 'ModModAdd'
- 'ModModAnd'
- 'ModModOr'
- 'Xor3'
- 'XOr3Mod')
- TabOrder = 0
- OnClick = QBListClick
- end
- object trkred: TScrollBar
- Left = 107
- Top = 32
- Width = 20
- Height = 209
- Kind = sbVertical
- Max = 255
- PageSize = 0
- TabOrder = 1
- OnChange = trkRedChange
- end
- object trkgreen: TScrollBar
- Left = 131
- Top = 32
- Width = 20
- Height = 209
- Kind = sbVertical
- Max = 255
- PageSize = 0
- TabOrder = 2
- OnChange = trkGreenChange
- end
- object trkblue: TScrollBar
- Left = 155
- Top = 32
- Width = 20
- Height = 209
- Kind = sbVertical
- Max = 255
- PageSize = 0
- TabOrder = 3
- OnChange = trkBlueChange
- end
- object trkfactor: TScrollBar
- Left = 187
- Top = 32
- Width = 20
- Height = 209
- Kind = sbVertical
- Max = 255
- Min = 16
- PageSize = 0
- Position = 255
- TabOrder = 4
- OnChange = trkFactorChange
- end
- end
- object qbpresets: TComboBox
- Left = 8
- Top = 75
- Width = 201
- Height = 22
- Style = csOwnerDrawFixed
- Color = 12639424
- ItemHeight = 16
- PopupMenu = presetspop
- Sorted = True
- TabOrder = 1
- OnClick = qbpresetsClick
- OnDrawItem = qbpresetsDrawItem
- end
- object blueradio: TRadioButton
- Left = 8
- Top = 48
- Width = 105
- Height = 17
- Caption = 'Prod'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = blueradioClick
- end
- object greenradio: TRadioButton
- Left = 8
- Top = 28
- Width = 105
- Height = 17
- Caption = 'Prod'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clGreen
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = greenradioClick
- end
- object redradio: TRadioButton
- Left = 8
- Top = 8
- Width = 121
- Height = 17
- Caption = 'Prod'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = redradioClick
- end
- end
- object ScrollBox1: TScrollBox
- Left = 0
- Top = 0
- Width = 354
- Height = 399
- Align = alClient
- TabOrder = 1
- object image: TImage
- Left = 16
- Top = 8
- Width = 105
- Height = 105
- AutoSize = True
- end
- end
- object presetspop: TPopupMenu
- Left = 168
- Top = 72
- object AddBackdrop1: TMenuItem
- Caption = '&Add Backdrop'
- OnClick = AddBackdrop1Click
- end
- object DeleteBackdrop1: TMenuItem
- Caption = '&Delete Backdrop'
- OnClick = DeleteBackdrop1Click
- end
- object UpdateBackdrop1: TMenuItem
- Caption = '&Update Backdrop'
- OnClick = UpdateBackdrop1Click
- end
- end
- end
-