unit1.dfm

该系统建立一个数库,来存储人口记录.以某一字段进行统计查询,输出结果以报表形式输出.添加,删除,查询各种功能.

object Form1: TForm1
  Left = 215
  Top = 122
  Width = 544
  Height = 375
  Caption = #20154#21475#26222#26597#31995#32479
  Color = clOlive
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Shape1: TShape
    Left = 40
    Top = 48
    Width = 201
    Height = 49
    Brush.Color = clYellow
    Shape = stRoundRect
  end
  object Shape2: TShape
    Left = 184
    Top = 144
    Width = 201
    Height = 49
    Brush.Color = clSkyBlue
    Shape = stRoundRect
  end
  object Shape3: TShape
    Left = 320
    Top = 248
    Width = 201
    Height = 49
    Brush.Color = clAqua
    Shape = stRoundRect
  end
  object SpeedButton1: TSpeedButton
    Left = 50
    Top = 55
    Width = 181
    Height = 34
    Caption = #26222#26597#30331#35760#31995#32479
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -21
    Font.Name = #21326#25991#20013#23435
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 193
    Top = 151
    Width = 183
    Height = 35
    Caption = #26597#35810#32479#35745#31995#32479
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -21
    Font.Name = #21326#25991#20013#23435
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton2Click
  end
  object SpeedButton3: TSpeedButton
    Left = 329
    Top = 255
    Width = 182
    Height = 35
    Caption = #20219#24847#25253#34920#31995#32479
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -21
    Font.Name = #21326#25991#20013#23435
    Font.Style = []
    ParentFont = False
  end
end