chaxun.dfm

用VC和SQL Server开发的固定资产管理系统

object Form3cha: TForm3cha
  Left = 221
  Top = 170
  Width = 598
  Height = 390
  Caption = #26597#35810#31995#32479
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 8
    Top = 16
    Width = 561
    Height = 329
    ActivePage = TabSheet1
    TabOrder = 0
    object TabSheet1: TTabSheet
      Hint = #25353#21333#20301#26597#35810
      Caption = #25353#21333#20301#26597#35810
      ParentShowHint = False
      ShowHint = True
      object Label1: TLabel
        Left = 16
        Top = 32
        Width = 108
        Height = 13
        Caption = #35831#36755#20837#26597#35810#30340#21333#20301#65306
      end
      object DBGrid1: TDBGrid
        Left = 32
        Top = 112
        Width = 473
        Height = 137
        DataSource = DataSource1danwei
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
      object Edit1: TEdit
        Left = 152
        Top = 24
        Width = 121
        Height = 21
        Hint = #21333#20301#26377#65306#20449#24687#23398#38498#12289#38518#29943#21378#12289#38271#32418
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        Text = 'select * from '#21333#20301
      end
      object Button1: TButton
        Left = 328
        Top = 24
        Width = 75
        Height = 25
        Caption = #26597#35810
        TabOrder = 2
        OnClick = Button1Click
      end
      object DBNavigator1: TDBNavigator
        Left = 96
        Top = 64
        Width = 240
        Height = 25
        DataSource = DataSource1danwei
        TabOrder = 3
      end
    end
    object TabSheet2: TTabSheet
      Hint = #25353#27983#35272#26041#24335#26597#35810
      Caption = #25353#27983#35272#26041#24335#26597#35810
      ImageIndex = 1
      ParentShowHint = False
      ShowHint = True
      object Label6: TLabel
        Left = 72
        Top = 24
        Width = 60
        Height = 13
        Caption = #27983#35272#26041#24335#65306
      end
      object DBNavigator2: TDBNavigator
        Left = 40
        Top = 104
        Width = 240
        Height = 25
        TabOrder = 0
      end
      object DBGrid2: TDBGrid
        Left = 40
        Top = 136
        Width = 457
        Height = 120
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
      object ComboBox2: TComboBox
        Left = 152
        Top = 24
        Width = 145
        Height = 21
        ItemHeight = 13
        TabOrder = 2
        Items.Strings = (
          '1'
          '2'
          '3'
          ''
          ''
          ''
          ''
          '')
      end
      object Button3: TButton
        Left = 312
        Top = 24
        Width = 75
        Height = 25
        Caption = #24320#22987
        TabOrder = 3
      end
    end
    object TabSheet3: TTabSheet
      Caption = #25353#25353#26102#38388#26597#35810
      ImageIndex = 2
      object Label2: TLabel
        Left = 16
        Top = 24
        Width = 60
        Height = 13
        Caption = #36755#20837#24180#20221#65306
      end
      object Label3: TLabel
        Left = 16
        Top = 64
        Width = 60
        Height = 13
        Caption = #36873#25321#26376#20221#65306
      end
      object Label4: TLabel
        Left = 24
        Top = 104
        Width = 48
        Height = 13
        Caption = #36873#25321#22825#65306
      end
      object Label5: TLabel
        Left = 240
        Top = 16
        Width = 60
        Height = 13
        Caption = #26174#31034#20449#24687#65306
      end
      object DBGrid3: TDBGrid
        Left = 40
        Top = 176
        Width = 456
        Height = 120
        DataSource = DataSource2time
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
      object DBNavigator3: TDBNavigator
        Left = 40
        Top = 136
        Width = 240
        Height = 25
        DataSource = DataSource2time
        TabOrder = 1
      end
      object ListBox1: TListBox
        Left = 88
        Top = 56
        Width = 113
        Height = 25
        ItemHeight = 13
        Items.Strings = (
          #19968#26376
          #20108#26376
          #19977#26376
          #22235#26376
          #20116#26376
          #20845#26376
          #19971#26376
          #20843#26376
          #20061#26376
          #21313#26376
          #21313#19968#26376
          #21313#20108#26376)
        TabOrder = 2
      end
      object ComboBox1: TComboBox
        Left = 88
        Top = 104
        Width = 121
        Height = 21
        ItemHeight = 13
        TabOrder = 3
        Items.Strings = (
          '1'#26085
          '2'#26085
          '3'#26085
          '4'#26085
          '5'#26085
          '6'#26085
          '7'#26085
          '8'#26085
          '9'#26085
          '10'#26085
          '11'#26085
          '12'#26085
          '13'#26085
          '14'#26085
          '15'#26085
          '16'#26085
          '17'#26085
          '18'#26085
          '19'#26085
          '20'#26085
          '21'#26085
          '22'#26085
          '23'#26085
          '24'#26085
          '25'#26085
          '26'#26085
          '27'#26085
          '28'#26085
          '29'#26085
          '30'#26085)
      end
      object Button2: TButton
        Left = 384
        Top = 48
        Width = 75
        Height = 25
        Hint = #26174#31034#24182#26597#35810
        Caption = #26597#35810
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        OnClick = Button2Click
      end
      object Memo1: TMemo
        Left = 232
        Top = 32
        Width = 137
        Height = 97
        Lines.Strings = (
          ''
          ''
          ''
          ''
          ''
          ''
          '')
        ReadOnly = True
        TabOrder = 5
      end
      object DateTimePicker1: TDateTimePicker
        Left = 400
        Top = 8
        Width = 113
        Height = 21
        Date = 38512.688775659720000000
        Time = 38512.688775659720000000
        TabOrder = 6
      end
      object Edit2: TEdit
        Left = 88
        Top = 16
        Width = 113
        Height = 21
        TabOrder = 7
        Text = '2005'
      end
    end
  end
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#22266#23450#36164#20135'.mdb.mdb;Persis' +
      't Security Info=False'
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 36
    Top = 48
  end
  object ADOCommand1: TADOCommand
    Connection = ADOConnection1
    Parameters = <>
    Left = 472
    Top = 120
  end
  object ADODataSet1: TADODataSet
    Connection = ADOConnection1
    Parameters = <>
    Left = 40
    Top = 112
  end
  object DataSource1danwei: TDataSource
    DataSet = ADODataSet1
    Left = 88
    Top = 216
  end
  object ADOQuery1: TADOQuery
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#22266#23450#36164#20135'.mdb.mdb;Persis' +
      't Security Info=False'
    Parameters = <>
    Left = 404
    Top = 160
  end
  object DataSource2time: TDataSource
    DataSet = ADOQuery1
    Left = 292
    Top = 240
  end
end