home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hot Shareware 35
/
hot35.iso
/
ficheros
/
9APLI
/
32PSAO31.ZIP
/
_SETUP.1
/
ADO30.exe
/
0
/
RCDATA
/
TPIEGRAPHDLG
/
TPIEGRAPHDLG.txt
Wrap
Text File
|
1998-05-08
|
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
BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
33337777773FF733333333333300033333333333337773333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
Layout = blGlyphRight
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 4
Top = 3
Width = 89
Height = 25
Hint = 'Print Graph'
Caption = 'P&rint'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = BitBtn3Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
Layout = blGlyphRight
NumGlyphs = 2
end
object BitBtn4: TBitBtn
Left = 95
Top = 3
Width = 89
Height = 25
Hint = 'Close Graph Window'
Caption = '&Close'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Kind = bkOK
end
end
object Edit1: TEdit
Left = 192
Top = 32
Width = 33
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 2
ParentFont = False
TabOrder = 4
OnKeyPress = Edit1KeyPress
end
end
end