userverchart.dfm

是个办公系统,可以实现财务上的管理和人员的流动

object frmServerchart: TfrmServerchart
  Left = 304
  Top = 99
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #23458#25143#26381#21153#20449#24687#32479#35745
  ClientHeight = 348
  ClientWidth = 621
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object DBChart1: TDBChart
    Left = 200
    Top = 5
    Width = 420
    Height = 342
    BackWall.Brush.Color = clWhite
    Title.Text.Strings = (
      'TDBChart')
    Legend.Alignment = laBottom
    Legend.ColorWidth = 10
    Legend.HorizMargin = 12
    Legend.ResizeChart = False
    Legend.ShadowSize = 0
    Legend.TopPos = 2
    Legend.Visible = False
    View3DOptions.Elevation = 315
    View3DOptions.Orthogonal = False
    View3DOptions.Perspective = 0
    View3DOptions.Rotation = 360
    View3DOptions.Zoom = 106
    TabOrder = 0
    object Series1: TBarSeries
      Marks.ArrowLength = 20
      Marks.Visible = True
      SeriesColor = clRed
      XLabelsSource = #23458#25143#35780#20215
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1.000000000000000000
      XValues.Order = loAscending
      XValues.ValueSource = #23458#25143#25968#37327
      YValues.DateTime = False
      YValues.Name = 'Bar'
      YValues.Multiplier = 1.000000000000000000
      YValues.Order = loNone
      YValues.ValueSource = #23458#25143#25968#37327
    end
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 199
    Height = 348
    Align = alLeft
    TabOrder = 1
    object Panel2: TPanel
      Left = 2
      Top = 318
      Width = 195
      Height = 28
      Align = alBottom
      TabOrder = 0
      object RadioGroup1: TRadioGroup
        Left = 0
        Top = -6
        Width = 201
        Height = 35
        Columns = 2
        ItemIndex = 0
        Items.Strings = (
          #23458#25143#28385#24847#24230
          #32500#25252#27425#25968)
        TabOrder = 0
        OnClick = RadioGroup1Click
      end
    end
    object DBGrid1: TDBGrid
      Left = 2
      Top = 15
      Width = 195
      Height = 303
      Align = alClient
      DataSource = dm.DSChart
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = #23458#25143#35780#20215
          Visible = True
        end
        item
          Expanded = False
          FieldName = #23458#25143#25968#37327
          Visible = True
        end>
    end
  end
end