home *** CD-ROM | disk | FTP | other *** search
- object ViewWinProps: TViewWinProps
- Left = 196
- Top = 161
- BorderStyle = bsDialog
- Caption = 'View Window Properties'
- ClientHeight = 301
- ClientWidth = 332
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object PageControl1: TPageControl
- Left = 0
- Top = 0
- Width = 332
- Height = 258
- ActivePage = TabSheet1
- TabOrder = 0
- object TabSheet1: TTabSheet
- Caption = 'Background'
- object Label1: TLabel
- Left = 172
- Top = 26
- Width = 81
- Height = 13
- Caption = 'Foreground Color'
- end
- object Label2: TLabel
- Left = 168
- Top = 66
- Width = 85
- Height = 13
- Caption = 'Background Color'
- end
- object Label3: TLabel
- Left = 15
- Top = 111
- Width = 60
- Height = 13
- Caption = '&Pattern Style'
- Enabled = False
- FocusControl = bsEdit
- end
- object Label4: TLabel
- Left = 15
- Top = 158
- Width = 63
- Height = 13
- Caption = '&Checker Size'
- Enabled = False
- end
- object PForeColor: TPanel
- Left = 275
- Top = 15
- Width = 35
- Height = 34
- Hint = 'Click To Set'
- BevelInner = bvLowered
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = PForeColorClick
- end
- object PBackColor: TPanel
- Left = 275
- Top = 55
- Width = 35
- Height = 34
- Hint = 'Click To Set'
- BevelInner = bvLowered
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = PBackColorClick
- end
- object rgStyle: TRadioGroup
- Left = 13
- Top = 7
- Width = 132
- Height = 91
- Caption = 'Style'
- ItemIndex = 0
- Items.Strings = (
- 'Solid'
- 'Checker Board'
- 'Pattern')
- TabOrder = 2
- OnClick = rgStyleClick
- end
- object bsEdit: TDCBrushStyleEdit
- Left = 13
- Top = 127
- Width = 132
- Height = 21
- BrushStyle = bsSolid
- DropOnClick = True
- Enabled = False
- Flat = False
- ParentColor = False
- ReadOnly = False
- TabOrder = 3
- TabStop = True
- Text = 'bsSolid'
- OnChange = bsEditChange
- object TPopupBrushBox
- Left = 0
- Top = 0
- Width = 121
- Height = 82
- TabStop = False
- ItemHeight = 16
- DisplayNames = True
- end
- end
- object Panel3: TPanel
- Left = 166
- Top = 108
- Width = 144
- Height = 115
- BevelInner = bvLowered
- TabOrder = 4
- object pb: TPaintBox
- Left = 2
- Top = 2
- Width = 140
- Height = 111
- Align = alClient
- OnPaint = pbPaint
- end
- end
- object cbShowGuides: TCheckBox
- Left = 13
- Top = 203
- Width = 97
- Height = 17
- Caption = 'Show Guides'
- TabOrder = 5
- OnClick = cbShowGuidesClick
- end
- object cbCheckerSize: TComboBox
- Left = 13
- Top = 175
- Width = 132
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- '10'
- '20'
- '50'
- '100')
- TabOrder = 6
- OnChange = cbCheckerSizeChange
- end
- object Panel1: TPanel
- Left = 166
- Top = 99
- Width = 144
- Height = 9
- Color = 8404992
- TabOrder = 7
- end
- end
- end
- object Button1: TButton
- Left = 80
- Top = 269
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 1
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 178
- Top = 269
- Width = 75
- Height = 25
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 2
- end
- object cd: TColorDialog
- Ctl3D = True
- Options = [cdFullOpen]
- Left = 274
- Top = 267
- end
- end
-