home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Computer Buyer 1999 September
/
Dpcb0999.iso
/
Business
/
Empire
/
_SETUP.1
/
EmpireBuilder.exe
/
0
/
RCDATA
/
TFMSTKPEOFIT2GRAPH
/
TFMSTKPEOFIT2GRAPH.txt
Wrap
Text File
|
1999-06-21
|
10KB
|
333 lines
object fmStkPeofit2Graph: TfmStkPeofit2Graph
Left = -4
Top = -4
AutoScroll = False
Caption = 'Stock Profit (Period By Period Analysis) Graph'
ClientHeight = 553
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 = 659
Top = 4
Width = 72
Height = 16
Caption = 'Graph Type'
end
object ComboBox2: TComboBox
Left = 657
Top = 20
Width = 137
Height = 24
Hint = 'Press F1 for help'
ItemHeight = 16
Items.Strings = (
'Vertical Bar '
'Horizontal Bar'
'Line'
'Fast Line'
'Point'
'Area')
ParentShowHint = False
ShowHint = True
TabOrder = 1
Text = 'Vertical Bar '
OnChange = ComboBox2Change
end
object cbMarks: TCheckBox
Left = 509
Top = 20
Width = 125
Height = 17
Hint = 'Press F1 for help'
HelpContext = 147
Alignment = taLeftJustify
Caption = '&Toggle Marks'
ParentShowHint = False
ShowHint = True
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 = 'View full help on this window'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888886446888
888888888E6648888888888888E6688888888888888888888888888888446888
8888888886664888888888888E664888888888888E6664888888888888E66648
88888888888E6664888888844888E6664888886664888E66488888E666444666
4888888E6666666668888888EE6666668888888888EEEEE88888}
Hint = 'View full help on this window|'
Spacing = 1
Left = 213
Top = 3
Visible = True
OnClick = btnHelpClick
SectionName = 'Untitled (0)'
end
end
object Notebook1: TNotebook
Left = 0
Top = 49
Width = 800
Height = 504
Align = alClient
TabOrder = 1
object TPage
Left = 0
Top = 0
Caption = 'ByProductGroup'
object StkSalesGraph: TChart
Left = 0
Top = 0
Width = 800
Height = 504
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 = 8454016
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 = (
'Stock Profit (Period By Period Analysis) By Product 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 = 'Product Group'
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 = 'Quantity'
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 = 6
Align = alClient
BorderStyle = bsSingle
Color = 8388863
TabOrder = 0
object Series1: TBarSeries
Marks.ArrowLength = 20
Marks.Visible = True
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
end
end
object TPage
Left = 0
Top = 0
Caption = 'ByStockItem'
object Chart1: TChart
Left = 0
Top = 0
Width = 800
Height = 504
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 = 16744448
Gradient.StartColor = 8453888
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 = (
'Stock Profit (Period By Period Analysis) By Product')
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 = 'Product'
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 = 'Quantity'
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 = 6
Align = alClient
BorderStyle = bsSingle
Color = 8388863
TabOrder = 0
object Series2: TBarSeries
Marks.ArrowLength = 20
Marks.Visible = True
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
end
end
end
object pmSaveGraph: TRxPopupMenu
LeftMargin = 30
Style = msOwnerDraw
OnDrawMargin = pmSaveGraphDrawMargin
Left = 714
Top = 202
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 taTempTable: TwwTable
SyncSQLByRange = False
NarrowSearch = False
ValidateWithMask = True
Left = 714
Top = 255
end
end