home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Computer Buyer 1999 September
/
Dpcb0999.iso
/
Business
/
Empire
/
_SETUP.1
/
EmpireBuilder.exe
/
0
/
RCDATA
/
TFMPLBALSHEETGRAPH
/
TFMPLBALSHEETGRAPH.txt
Wrap
Text File
|
1999-06-21
|
19KB
|
561 lines
object fmPLBalSheetGraph: TfmPLBalSheetGraph
Left = -4
Top = -4
AutoScroll = False
Caption = 'P&L Balance Sheet'
ClientHeight = 543
ClientWidth = 800
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 120
TextHeight = 16
object SpeedBar: TSpeedBar
Left = 0
Top = 0
Width = 800
Height = 49
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [sbAllowDrag, sbFlatBtns, sbTransparentBtns]
BtnOffsetHorz = 3
BtnOffsetVert = 3
BtnWidth = 70
BtnHeight = 43
TabOrder = 0
InternalVer = 1
object Label6: TLabel
Left = 564
Top = 16
Width = 72
Height = 16
Caption = 'Graph Type'
end
object ComboBox2: TComboBox
Left = 652
Top = 12
Width = 137
Height = 24
Hint = 'Press F1 for help'
ItemHeight = 16
Items.Strings = (
'Vertical Bar '
'Horizontal Bar'
'Line'
'Fast Line'
'Point'
'Area')
TabOrder = 1
Text = 'Vertical Bar '
OnChange = ComboBox2Change
end
object cbMarks: TCheckBox
Left = 424
Top = 16
Width = 125
Height = 17
Hint = 'Press F1 for help'
HelpContext = 147
Alignment = taLeftJustify
Caption = '&Toggle Marks'
State = cbChecked
TabOrder = 0
OnClick = cbMarksClick
end
object SpeedbarSection2: TSpeedbarSection
Caption = 'Untitled (0)'
end
object btnSaveGraph: TSpeedItem
BtnCaption = 'Save'
Caption = 'Save Graph'
DropDownMenu = pmSaveGraph
Hint = 'Save Graph'
NumGlyphs = 2
Spacing = 1
Left = 3
Top = 3
Visible = True
SectionName = 'Untitled (0)'
end
object btnPrintGraph: TSpeedItem
BtnCaption = '&Print'
Caption = 'Print graph'
Hint = 'Print graph|'
Spacing = 1
Left = 73
Top = 3
Visible = True
OnClick = btnPrintGraphClick
SectionName = 'Untitled (0)'
end
object btnEmailGraph: TSpeedItem
BtnCaption = '&Email'
Caption = 'Email graph'
Hint = 'Email graph|'
Spacing = 1
Left = 143
Top = 3
Visible = True
OnClick = btnEmailGraphClick
SectionName = 'Untitled (0)'
end
object btnCloseGraph: TSpeedItem
BtnCaption = 'Close'
Caption = 'Close'
Hint = 'Close|'
Spacing = 1
Left = 283
Top = 3
Visible = True
OnClick = btnCloseGraphClick
SectionName = 'Untitled (0)'
end
object btnHelp: TSpeedItem
BtnCaption = '&Help'
Caption = 'Help'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888886446888
888888888E6648888888888888E6688888888888888888888888888888446888
8888888886664888888888888E664888888888888E6664888888888888E66648
88888888888E6664888888844888E6664888886664888E66488888E666444666
4888888E6666666668888888EE6666668888888888EEEEE88888}
Hint = 'Help|'
Spacing = 1
Left = 213
Top = 3
Visible = True
OnClick = btnHelpClick
SectionName = 'Untitled (0)'
end
end
object PageControl1: TPageControl
Left = 0
Top = 49
Width = 800
Height = 494
ActivePage = TabProfitLoss
Align = alClient
TabOrder = 1
OnChange = PageControl1Change
object TabProfitLoss: TTabSheet
Caption = 'Profit && Loss'
object Notebook1: TNotebook
Left = 0
Top = 0
Width = 792
Height = 463
Align = alClient
TabOrder = 0
object TPage
Left = 0
Top = 0
Caption = 'nbpByProductGroup'
object ByItemChart: TChart
Left = 0
Top = 0
Width = 792
Height = 463
BottomWall.Color = clWhite
Foot.Font.Charset = DEFAULT_CHARSET
Foot.Font.Color = clRed
Foot.Font.Height = -13
Foot.Font.Name = 'Arial'
Foot.Font.Style = [fsItalic]
Gradient.EndColor = 8453888
Gradient.StartColor = clTeal
Gradient.Visible = True
LeftWall.Color = 16744448
LeftWall.Pen.Color = 8388863
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -17
Title.Font.Name = 'Arial'
Title.Font.Style = []
Title.Text.Strings = (
'Profit and Loss By Category')
BackColor = clWhite
BottomAxis.Title.Caption = 'Categories'
BottomAxis.Title.Font.Charset = ANSI_CHARSET
BottomAxis.Title.Font.Color = clBlue
BottomAxis.Title.Font.Height = -13
BottomAxis.Title.Font.Name = 'Arial Black'
BottomAxis.Title.Font.Style = []
LeftAxis.Title.Caption = 'Amount'
LeftAxis.Title.Font.Charset = ANSI_CHARSET
LeftAxis.Title.Font.Color = clBlue
LeftAxis.Title.Font.Height = -13
LeftAxis.Title.Font.Name = 'Arial Black'
LeftAxis.Title.Font.Style = []
Legend.LegendStyle = lsSeries
Legend.TextStyle = ltsRightValue
MaxPointsPerPage = 4
Align = alClient
BorderStyle = bsSingle
Color = 8388863
TabOrder = 0
object CostSer: TBarSeries
Marks.ArrowLength = 20
Marks.Style = smsValue
Marks.Visible = True
Title = 'Cost Values'
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
end
object SalesSer: TBarSeries
Marks.ArrowLength = 20
Marks.Style = smsValue
Marks.Visible = True
Title = 'Sales Values'
SeriesColor = clGreen
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
end
end
end
object TPage
Left = 0
Top = 0
Caption = 'nbpItems'
object ByProductChart: TChart
Left = 0
Top = 0
Width = 792
Height = 463
BottomWall.Color = clWhite
Foot.Font.Charset = DEFAULT_CHARSET
Foot.Font.Color = clRed
Foot.Font.Height = -13
Foot.Font.Name = 'Arial'
Foot.Font.Style = [fsItalic]
Gradient.EndColor = 16744576
Gradient.StartColor = clAqua
Gradient.Visible = True
LeftWall.Color = 16744448
LeftWall.Pen.Color = 8388863
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -17
Title.Font.Name = 'Arial'
Title.Font.Style = []
Title.Text.Strings = (
'Profit and Loss By Group ')
BackColor = clWhite
BottomAxis.LabelsFont.Charset = DEFAULT_CHARSET
BottomAxis.LabelsFont.Color = clBlack
BottomAxis.LabelsFont.Height = -10
BottomAxis.LabelsFont.Name = 'Arial'
BottomAxis.LabelsFont.Style = []
BottomAxis.Title.Caption = 'Groups'
BottomAxis.Title.Font.Charset = ANSI_CHARSET
BottomAxis.Title.Font.Color = clBlue
BottomAxis.Title.Font.Height = -13
BottomAxis.Title.Font.Name = 'Arial Black'
BottomAxis.Title.Font.Style = []
LeftAxis.LabelsFont.Charset = DEFAULT_CHARSET
LeftAxis.LabelsFont.Color = clBlack
LeftAxis.LabelsFont.Height = -10
LeftAxis.LabelsFont.Name = 'Arial'
LeftAxis.LabelsFont.Style = []
LeftAxis.Title.Caption = 'Amount'
LeftAxis.Title.Font.Charset = ANSI_CHARSET
LeftAxis.Title.Font.Color = clBlue
LeftAxis.Title.Font.Height = -13
LeftAxis.Title.Font.Name = 'Arial Black'
LeftAxis.Title.Font.Style = []
Legend.Font.Charset = DEFAULT_CHARSET
Legend.Font.Color = clBlue
Legend.Font.Height = -10
Legend.Font.Name = 'Arial'
Legend.Font.Style = [fsItalic]
Legend.TextStyle = ltsLeftPercent
MaxPointsPerPage = 4
Align = alClient
BorderStyle = bsSingle
Color = 8388863
TabOrder = 0
object CostSeries: TBarSeries
Marks.ArrowLength = 20
Marks.Style = smsValue
Marks.Visible = True
Title = 'Cost Value'
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
end
object SaleSeries: TBarSeries
Marks.ArrowLength = 20
Marks.Style = smsValue
Marks.Visible = True
Title = 'Sales Value'
SeriesColor = clGreen
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
end
end
end
end
end
object TabBalSheet: TTabSheet
Caption = 'Balance Sheet'
object Notebook2: TNotebook
Left = 0
Top = 0
Width = 792
Height = 463
Align = alClient
PageIndex = 1
TabOrder = 0
object TPage
Left = 0
Top = 0
Caption = 'nbpByProductGroup'
object Chart1: TChart
Left = 0
Top = 0
Width = 792
Height = 463
BottomWall.Color = clWhite
Foot.Font.Charset = DEFAULT_CHARSET
Foot.Font.Color = clRed
Foot.Font.Height = -13
Foot.Font.Name = 'Arial'
Foot.Font.Style = [fsItalic]
Gradient.EndColor = 8453888
Gradient.StartColor = clTeal
Gradient.Visible = True
LeftWall.Color = 16744448
LeftWall.Pen.Color = 8388863
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -17
Title.Font.Name = 'Arial'
Title.Font.Style = []
Title.Text.Strings = (
'Balance Sheet by Category')
BackColor = clWhite
BottomAxis.Title.Caption = 'Categories'
BottomAxis.Title.Font.Charset = ANSI_CHARSET
BottomAxis.Title.Font.Color = clBlue
BottomAxis.Title.Font.Height = -13
BottomAxis.Title.Font.Name = 'Arial Black'
BottomAxis.Title.Font.Style = []
LeftAxis.Title.Caption = 'Amount'
LeftAxis.Title.Font.Charset = ANSI_CHARSET
LeftAxis.Title.Font.Color = clBlue
LeftAxis.Title.Font.Height = -13
LeftAxis.Title.Font.Name = 'Arial Black'
LeftAxis.Title.Font.Style = []
Legend.Font.Charset = DEFAULT_CHARSET
Legend.Font.Color = clBlue
Legend.Font.Height = -10
Legend.Font.Name = 'Arial'
Legend.Font.Style = [fsItalic]
Legend.LegendStyle = lsSeries
Legend.TextStyle = ltsRightValue
MaxPointsPerPage = 4
Align = alClient
BorderStyle = bsSingle
Color = 8388863
TabOrder = 0
object BarSeries1: TBarSeries
Marks.ArrowLength = 20
Marks.Style = smsValue
Marks.Visible = True
Title = 'Cost Values'
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
end
object BarSeries2: TBarSeries
Marks.ArrowLength = 20
Marks.Style = smsValue
Marks.Visible = True
Title = 'Sales Values'
SeriesColor = clGreen
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
end
end
end
object TPage
Left = 0
Top = 0
Caption = 'nbpItems'
object Chart2: TChart
Left = 0
Top = 0
Width = 792
Height = 463
BottomWall.Color = clWhite
Foot.Font.Charset = DEFAULT_CHARSET
Foot.Font.Color = clRed
Foot.Font.Height = -13
Foot.Font.Name = 'Arial'
Foot.Font.Style = [fsItalic]
Gradient.EndColor = 16777088
Gradient.StartColor = 16744576
Gradient.Visible = True
LeftWall.Color = 16744448
LeftWall.Pen.Color = 8388863
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -17
Title.Font.Name = 'Arial'
Title.Font.Style = []
Title.Text.Strings = (
'Balance Sheet by Group')
BackColor = clWhite
BottomAxis.LabelsFont.Charset = DEFAULT_CHARSET
BottomAxis.LabelsFont.Color = clBlack
BottomAxis.LabelsFont.Height = -10
BottomAxis.LabelsFont.Name = 'Arial'
BottomAxis.LabelsFont.Style = []
BottomAxis.Title.Caption = 'Groups'
BottomAxis.Title.Font.Charset = ANSI_CHARSET
BottomAxis.Title.Font.Color = clBlue
BottomAxis.Title.Font.Height = -13
BottomAxis.Title.Font.Name = 'Arial Black'
BottomAxis.Title.Font.Style = []
LeftAxis.LabelsFont.Charset = DEFAULT_CHARSET
LeftAxis.LabelsFont.Color = clBlack
LeftAxis.LabelsFont.Height = -10
LeftAxis.LabelsFont.Name = 'Arial'
LeftAxis.LabelsFont.Style = []
LeftAxis.Title.Caption = 'Amount'
LeftAxis.Title.Font.Charset = ANSI_CHARSET
LeftAxis.Title.Font.Color = clBlue
LeftAxis.Title.Font.Height = -13
LeftAxis.Title.Font.Name = 'Arial Black'
LeftAxis.Title.Font.Style = []
Legend.Font.Charset = DEFAULT_CHARSET
Legend.Font.Color = clBlue
Legend.Font.Height = -10
Legend.Font.Name = 'Arial'
Legend.Font.Style = [fsItalic]
Legend.TextStyle = ltsLeftPercent
MaxPointsPerPage = 4
Align = alClient
BorderStyle = bsSingle
Color = 8388863
TabOrder = 0
object BarSeries3: TBarSeries
Marks.ArrowLength = 10
Marks.Font.Charset = DEFAULT_CHARSET
Marks.Font.Color = clBlack
Marks.Font.Height = -10
Marks.Font.Name = 'Arial'
Marks.Font.Style = []
Marks.Style = smsValue
Marks.Visible = True
Title = 'Cost Value'
BarWidthPercent = 100
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
end
object BarSeries4: TBarSeries
Marks.ArrowLength = 20
Marks.Font.Charset = DEFAULT_CHARSET
Marks.Font.Color = clBlack
Marks.Font.Height = -10
Marks.Font.Name = 'Arial'
Marks.Font.Style = []
Marks.Style = smsValue
Marks.Visible = True
Title = 'Sales Value'
SeriesColor = clGreen
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
end
end
end
end
end
end
object pmSaveGraph: TRxPopupMenu
LeftMargin = 30
Style = msOwnerDraw
OnDrawMargin = pmSaveGraphDrawMargin
Left = 702
Top = 218
object pmSaveAsBitmap: TMenuItem
Caption = 'Save As &Bitmap'
OnClick = pmSaveAsBitmapClick
end
object pmSaveAsMetafile: TMenuItem
Caption = 'Save As &Metafile'
OnClick = pmSaveAsMetafileClick
end
object pmCopyToClipboard: TMenuItem
Caption = 'Copy To &Clipboard'
OnClick = pmCopyToClipboardClick
end
end
object BudgetVarQuery: TwwQuery
DatabaseName = 'EmpireBuilder'
ValidateWithMask = True
Left = 702
Top = 167
end
end