home *** CD-ROM | disk | FTP | other *** search
- object ChartPreviewForm: TChartPreviewForm
- Left = 111
- Top = 90
- Width = 537
- Height = 450
- ActiveControl = BShow
- Caption = 'TeeChart Pro -- RunTime Previewer Options'
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 96
- Position = poScreenCenter
- Scaled = False
- OnCreate = FormCreate
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 529
- Height = 65
- Align = alTop
- TabOrder = 0
- object Memo1: TMemo
- Left = 8
- Top = 8
- Width = 265
- Height = 49
- Lines.Strings = (
- 'Like the Chart Editor component, the new '
- 'Chart Previewer component has many properties'
- 'to customize the Print Preview dialog at run-time.')
- TabOrder = 0
- end
- object Button1: TButton
- Left = 447
- Top = 12
- Width = 75
- Height = 25
- Caption = 'Close'
- Default = True
- TabOrder = 1
- OnClick = Button1Click
- end
- object BShow: TBitBtn
- Left = 288
- Top = 13
- Width = 129
- Height = 33
- Caption = '&Show Preview !'
- TabOrder = 2
- OnClick = BShowClick
- end
- end
- object Chart1: TChart
- Left = 0
- Top = 193
- Width = 529
- Height = 230
- BackWall.Brush.Color = clWhite
- BackWall.Color = clSilver
- BackWall.Size = 8
- BottomWall.Size = 6
- Title.Alignment = taLeftJustify
- Title.Text.Strings = (
- 'Surface example')
- BackColor = clSilver
- BottomAxis.EndPosition = 100.000000000000000000
- Chart3DPercent = 70
- LeftAxis.EndPosition = 100.000000000000000000
- Legend.Alignment = laBottom
- Legend.Visible = False
- RightAxis.EndPosition = 100.000000000000000000
- TopAxis.EndPosition = 100.000000000000000000
- View3DOptions.Elevation = 331
- View3DOptions.Orthogonal = False
- View3DOptions.Rotation = 305
- View3DOptions.Zoom = 37
- Align = alClient
- TabOrder = 1
- object Series1: TSurfaceSeries
- Marks.ArrowLength = 8
- Marks.Visible = False
- SeriesColor = clRed
- NumXValues = 15
- NumZValues = 15
- XValues.DateTime = False
- XValues.Name = 'X'
- XValues.Multiplier = 1.000000000000000000
- XValues.Order = loNone
- YValues.DateTime = False
- YValues.Name = 'Y'
- YValues.Multiplier = 1.000000000000000000
- YValues.Order = loNone
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 65
- Width = 529
- Height = 128
- Align = alTop
- TabOrder = 2
- object Label1: TLabel
- Left = 7
- Top = 16
- Width = 58
- Height = 13
- Caption = 'Paper &Color:'
- end
- object Shape1: TShape
- Left = 70
- Top = 11
- Width = 24
- Height = 22
- OnMouseUp = Shape1MouseUp
- end
- object Label2: TLabel
- Left = 42
- Top = 44
- Width = 23
- Height = 13
- Caption = '&Title:'
- FocusControl = Edit1
- end
- object Label3: TLabel
- Left = 23
- Top = 72
- Width = 42
- Height = 13
- Caption = '&Window:'
- FocusControl = CBWindowStyle
- end
- object CBWindowStyle: TComboBox
- Left = 69
- Top = 69
- Width = 122
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- 'Normal'
- 'Maximized'
- 'Minimized')
- TabOrder = 0
- OnChange = CBWindowStyleChange
- end
- object Edit1: TEdit
- Left = 69
- Top = 39
- Width = 121
- Height = 21
- TabOrder = 1
- OnChange = Edit1Change
- end
- object GroupBox1: TGroupBox
- Left = 202
- Top = 6
- Width = 321
- Height = 115
- Caption = 'Options:'
- TabOrder = 2
- object CBPrinter: TCheckBox
- Left = 8
- Top = 16
- Width = 89
- Height = 17
- Caption = 'Change Printer'
- State = cbChecked
- TabOrder = 0
- end
- object CBSetup: TCheckBox
- Left = 8
- Top = 40
- Width = 89
- Height = 17
- Caption = 'Setup Printer'
- State = cbChecked
- TabOrder = 1
- end
- object CBResize: TCheckBox
- Left = 8
- Top = 64
- Width = 89
- Height = 17
- Caption = 'Resize Chart'
- State = cbChecked
- TabOrder = 2
- end
- object CBMove: TCheckBox
- Left = 104
- Top = 16
- Width = 97
- Height = 17
- Caption = 'Move Chart'
- State = cbChecked
- TabOrder = 3
- end
- object CBDetail: TCheckBox
- Left = 104
- Top = 40
- Width = 97
- Height = 17
- Caption = 'Change Detail'
- State = cbChecked
- TabOrder = 4
- end
- object CBOrient: TCheckBox
- Left = 104
- Top = 64
- Width = 113
- Height = 17
- Caption = 'Change Orientation'
- State = cbChecked
- TabOrder = 5
- end
- object CBMargins: TCheckBox
- Left = 104
- Top = 88
- Width = 97
- Height = 17
- Caption = 'Change Margins'
- State = cbChecked
- TabOrder = 6
- end
- object CBPropor: TCheckBox
- Left = 232
- Top = 64
- Width = 81
- Height = 17
- Caption = 'Proportional'
- State = cbChecked
- TabOrder = 7
- end
- object CBDrag: TCheckBox
- Left = 232
- Top = 40
- Width = 73
- Height = 17
- Caption = 'Drag Chart'
- TabOrder = 8
- end
- object CBPanel: TCheckBox
- Left = 8
- Top = 88
- Width = 81
- Height = 17
- Caption = 'Print Panel'
- TabOrder = 9
- end
- object CBBitmap: TCheckBox
- Left = 232
- Top = 16
- Width = 73
- Height = 17
- Caption = 'As Bitmap'
- TabOrder = 10
- end
- end
- end
- object ChartPreviewer1: TChartPreviewer
- Chart = Chart1
- Left = 432
- Top = 240
- end
- end
-