home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 1999 July
/
PCWorld_1999-07_cd.bin
/
software
/
Vyzkuste
/
Movies6
/
Movies6.exe
/
0
/
RCDATA
/
TPAINTERQBF
/
TPAINTERQBF.txt
Wrap
Text File
|
1999-05-23
|
6KB
|
272 lines
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