home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Best Sellers 33: Professional Win95/98
/
CD_1.iso
/
HOME
/
PSCLOR32
/
_SETUP.1
/
COL30.EXE
/
0
/
RCDATA
/
TPIEGRAPHDLG
/
TPIEGRAPHDLG.txt
Wrap
Text File
|
1998-02-19
|
11KB
|
341 lines
object PieGraphDlg: TPieGraphDlg
Left = 44
Top = 113
Width = 578
Height = 413
Caption = 'Summary Graph'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
Position = poScreenCenter
ShowHint = True
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 16
object Chart1: TChart
Left = 0
Top = 60
Width = 570
Height = 326
BottomWall.Color = clWhite
Foot.Font.Charset = DEFAULT_CHARSET
Foot.Font.Color = clRed
Foot.Font.Height = -12
Foot.Font.Name = 'Arial'
Foot.Font.Style = [fsItalic]
Foot.Text.Strings = (
'')
LeftWall.Color = 8454143
MarginBottom = 0
MarginLeft = 4
MarginRight = 4
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -13
Title.Font.Name = 'Arial'
Title.Font.Style = [fsBold, fsItalic]
Title.Text.Strings = (
'TChart Component')
BottomAxis.Grid.Color = clScrollBar
BottomAxis.LabelsAngle = 90
BottomAxis.LabelsSeparation = 0
BottomAxis.LabelsSize = 40
LeftAxis.Grid.Color = clScrollBar
Legend.Alignment = laLeft
Legend.TextStyle = ltsLeftPercent
Legend.TopPos = 0
MaxPointsPerPage = 10
RightAxis.Grid.Color = clScrollBar
TopAxis.Grid.Color = clScrollBar
OnPageChange = Chart1PageChange
Align = alClient
TabOrder = 0
object PieSeries1: TPieSeries
Active = False
Marks.ArrowLength = 8
Marks.Style = smsValue
Marks.Visible = True
PieValues.DateTime = False
PieValues.Name = 'Y'
PieValues.Multiplier = 1.000000000000000000
PieValues.Order = loNone
Left = 504
Top = 352
end
object BarSeries1: TBarSeries
Active = False
ColorEachPoint = True
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
Left = 536
Top = 352
end
object LineSeries1: TLineSeries
Active = False
ColorEachPoint = True
Marks.ArrowLength = 8
Marks.Style = smsValue
Marks.Visible = False
SeriesColor = clGreen
Pointer.InflateMargins = True
Pointer.Style = psRectangle
Pointer.Visible = False
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
Left = 472
Top = 352
end
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 570
Height = 60
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object Label1: TLabel
Left = 192
Top = 4
Width = 47
Height = 26
Caption = 'Items Per Page:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
end
object SpeedButton1: TSpeedButton
Left = 228
Top = 28
Width = 25
Height = 25
Hint = 'Update Graph'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555555555555555555555555555555555555555FF55555555555559055555
55555555577FF5555555555599905555555555557777F5555555555599905555
555555557777FF5555555559999905555555555777777F555555559999990555
5555557777777FF5555557990599905555555777757777F55555790555599055
55557775555777FF5555555555599905555555555557777F5555555555559905
555555555555777FF5555555555559905555555555555777FF55555555555579
05555555555555777FF5555555555557905555555555555777FF555555555555
5990555555555555577755555555555555555555555555555555}
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object CheckBox1: TCheckBox
Left = 4
Top = 6
Width = 37
Height = 17
Caption = '3D'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 0
OnClick = CheckBox1Click
end
object GraphType: TRadioGroup
Left = 44
Top = 0
Width = 61
Height = 56
Caption = 'Chart'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemIndex = 0
Items.Strings = (
'Bars'
'Pie'
'Lines')
ParentFont = False
TabOrder = 1
OnClick = GraphTypeClick
end
object XLabels: TRadioGroup
Left = 108
Top = 0
Width = 77
Height = 56
Caption = 'X Axis Labels'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemIndex = 0
Items.Strings = (
'Horizontal'
'Vertical'
'No Labels')
ParentFont = False
TabOrder = 2
OnClick = XLabelsClick
end
object Panel2: TPanel
Left = 382
Top = 0
Width = 188
Height = 60
Align = alRight
BevelOuter = bvNone
TabOrder = 3
object BitBtn1: TBitBtn
Left = 4
Top = 30
Width = 89
Height = 25
Hint = 'Previous Page'
Caption = '&Previous'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333333333333333333333333333333333FF333333333333
3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
000033333373FF77777733333330003333333333333777333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 95
Top = 30
Width = 89
Height = 25
Hint = 'Next Page'
Caption = '&Next'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333FFF333333333333000333333333
3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
BFB0777F7F33