mc_lsfycx.~dfm

1、系统环境要求：所有程序均在Windows98/XP操作系统下测试运行。 2、建议用户在系统上安装DELPHI7.0企业版。 3、如果数据库为SQL Server数据库

            Expanded = False
            FieldName = #25143#20027#22995#21517
            Title.Caption = #22995#21517
            Width = 51
            Visible = True
          end
          item
            Expanded = False
            FieldName = #36153#29992#31185#30446
            Width = 74
            Visible = True
          end
          item
            Expanded = False
            FieldName = #25910#36153#37329#39069
            Width = 53
            Visible = True
          end
          item
            Expanded = False
            FieldName = #35745#36153#36215#22987#26085#26399
            Title.Caption = #36215#22987#26085#26399
            Width = 65
            Visible = True
          end
          item
            Expanded = False
            FieldName = #35745#36153#32456#27490#26085#26399
            Title.Caption = #32456#27490#26085#26399
            Width = 62
            Visible = True
          end
          item
            Expanded = False
            FieldName = #24212#25910#37329#39069
            Title.Caption = #24212#25910
            Width = 39
            Visible = True
          end
          item
            Expanded = False
            FieldName = #23454#25910#37329#39069
            Title.Caption = #23384#27454#20256#20837
            Width = 39
            Visible = True
          end
          item
            Expanded = False
            FieldName = #26412#27425#34917#20132
            Visible = True
          end
          item
            Expanded = False
            FieldName = #21097#20313#37329#39069
            Title.Caption = #20313#39069
            Width = 40
            Visible = True
          end
          item
            Expanded = False
            FieldName = #20943#20813#37329#39069
            Width = 52
            Visible = True
          end
          item
            Expanded = False
            FieldName = #21407#22240
            Visible = True
          end>
      end
    end
    object TabSheet7: TTabSheet
      Caption = #12304#25151#31199#36153#29992#20449#24687#12305
      ImageIndex = 6
      object DBGrid9: TDBGrid
        Left = 6
        Top = 7
        Width = 585
        Height = 314
        DataSource = DataSource10
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = #25151#38388#20195#21495
            Width = 61
            Visible = True
          end
          item
            Expanded = False
            FieldName = #22995#21517
            Width = 47
            Visible = True
          end
          item
            Expanded = False
            FieldName = #24615#21035
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = #36523#20221#35777#21495
            Width = 74
            Visible = True
          end
          item
            Expanded = False
            FieldName = #32852#31995#26041#24335
            Width = 74
            Visible = True
          end
          item
            Expanded = False
            FieldName = #36215#31199#26085#26399
            Width = 69
            Visible = True
          end
          item
            Expanded = False
            FieldName = #25130#27490#26085#26399
            Width = 67
            Visible = True
          end
          item
            Expanded = False
            FieldName = #24212#25910#31199#37329
            Title.Caption = #24212#25910
            Width = 38
            Visible = True
          end
          item
            Expanded = False
            FieldName = #23454#25910#31199#37329
            Title.Caption = #23454#25910
            Width = 39
            Visible = True
          end
          item
            Expanded = False
            FieldName = #20313#27454#37329#39069
            Title.Caption = #20313#39069
            Width = 41
            Visible = True
          end>
      end
    end
  end
  object GroupBox1: TGroupBox
    Left = 5
    Top = 6
    Width = 166
    Height = 49
    Caption = #23567#21306#65306
    TabOrder = 1
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 11
      Top = 19
      Width = 145
      Height = 20
      KeyField = #23567#21306#21517
      ListField = #23567#21306#21517
      ListSource = DataSource1
      TabOrder = 0
    end
  end
  object GroupBox2: TGroupBox
    Left = 6
    Top = 60
    Width = 166
    Height = 149
    Caption = #22823#27004#21015#34920#65306
    TabOrder = 2
    object DBGrid1: TDBGrid
      Left = 9
      Top = 18
      Width = 146
      Height = 119
      DataSource = DataSource2
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnDblClick = DBGrid1DblClick
      Columns = <
        item
          Expanded = False
          FieldName = #22823#27004#21517#31216
          Width = 53
          Visible = True
        end
        item
          Expanded = False
          FieldName = #36127#36131#20154
          Width = 56
          Visible = True
        end>
    end
  end
  object GroupBox3: TGroupBox
    Left = 6
    Top = 214
    Width = 166
    Height = 203
    Caption = #25151#23627#20449#24687#21015#34920#65306
    TabOrder = 3
    object DBGrid2: TDBGrid
      Left = 10
      Top = 18
      Width = 144
      Height = 159
      DataSource = DataSource3
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnDblClick = DBGrid2DblClick
      Columns = <
        item
          Expanded = False
          FieldName = #25151#38388#32534#21495
          Width = 56
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25151#20027#22995#21517
          Width = 52
          Visible = True
        end>
    end
  end
  object GroupBox4: TGroupBox
    Left = 179
    Top = 6
    Width = 606
    Height = 49
    Caption = #26597#35810#20449#24687#65306
    TabOrder = 4
    object Label1: TLabel
      Left = 10
      Top = 24
      Width = 84
      Height = 12
      Caption = #35745#36153#36215#22987#26085#26399#65306
    end
    object Label2: TLabel
      Left = 235
      Top = 24
      Width = 84
      Height = 12
      Caption = #35745#36153#32456#27490#26085#26399#65306
    end
    object DateTimePicker1: TDateTimePicker
      Left = 94
      Top = 19
      Width = 132
      Height = 20
      CalAlignment = dtaLeft
      Date = 37208
      Time = 37208
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 0
    end
    object DateTimePicker2: TDateTimePicker
      Left = 323
      Top = 19
      Width = 132
      Height = 20
      CalAlignment = dtaLeft
      Date = 37208
      Time = 37208
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 1
    end
    object BitBtn1: TBitBtn
      Left = 462
      Top = 16
      Width = 136
      Height = 25
      Caption = #36820#22238#20027#30028#38754'[&Q]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = BitBtn1Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333FFFFF333333000033333388888833333333333F888888FFF333
        000033338811111188333333338833FFF388FF33000033381119999111833333
        38F338888F338FF30000339119933331111833338F388333383338F300003391
        13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
        33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
        33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
        000039183811193333918338F8F833F83333838F000039118111933339118338
        F3833F83333833830000339111193333391833338F33F8333FF838F300003391
        11833338111833338F338FFFF883F83300003339111888811183333338FF3888
        83FF83330000333399111111993333333388FFFFFF8833330000333333999999
        3333333333338888883333330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'WYGL'
    TableName = 'dbo.'#23567#21306#20449#24687#34920
    Left = 109
    Top = 14
    object Table1BDEDesigner: TStringField
      FieldName = #23567#21306#32534#21495
      Required = True
      FixedChar = True
      Size = 10
    end
    object Table1BDEDesigner2: TStringField
      FieldName = #23567#21306#21517
      FixedChar = True
      Size = 10
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 77
    Top = 14
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'WYGL'
    IndexFieldNames = #25152#23646#21306#22495
    MasterFields = #23567#21306#21517
    MasterSource = DataSource1
    TableName = 'dbo.'#22823#27004#20449#24687#34920
    Left = 110
    Top = 164
    object Table2BDEDesigner: TStringField
      FieldName = #22823#27004#32534#21495
      Required = True
      FixedChar = True
      Size = 10
    end
    object Table2BDEDesigner2: TStringField
      FieldName = #22823#27004#21517#31216
      FixedChar = True
    end
    object Table2BDEDesigner3: TStringField
      FieldName = #36127#36131#20154
      FixedChar = True
      Size = 10
    end
    object Table2BDEDesigner4: TStringField
      FieldName = #25152#23646#21306#22495
      FixedChar = True
    end
  end
  object DataSource2: TDataSource
    DataSet = Table2
    Left = 78
    Top = 164
  end
  object Table3: TTable
    Active = True
    DatabaseName = 'WYGL'
    IndexFieldNames = #22823#27004#32534#21495
    MasterFields = #22823#27004#32534#21495
    MasterSource = DataSource2
    TableName = 'dbo.'#25151#23627#20449#24687#34920
    Left = 118
    Top = 358
    object Table3BDEDesigner: TStringField
      FieldName = #25151#38388#32534#21495
      Required = True
      FixedChar = True
    end
    object Table3BDEDesigner2: TStringField
      FieldName = #21306#21517
      FixedChar = True
    end
    object Table3BDEDesigner3: TStringField
      FieldName = #22823#27004#21517
      FixedChar = True
    end
    object Table3BDEDesigner4: TStringField
      FieldName = #21333#20803
      FixedChar = True
      Size = 10
    end
    object Table3BDEDesigner5: TStringField
      FieldName = #27004#23618
      FixedChar = True
      Size = 10
    end
    object Table3BDEDesigner6: TStringField
      FieldName = #25151#38388#21495#30721
      FixedChar = True
      Size = 10
    end
    object Table3BDEDesigner7: TStringField
      FieldName = #25151#20027#20195#21495
      FixedChar = True
    end
    object Table3BDEDesigner8: TStringField
      FieldName = #25151#20027#22995#21517
      FixedChar = True
      Size = 10
    end
    object Table3BDEDesigner9: TStringField
      FieldName = #22823#27004#32534#21495
      FixedChar = True
    end
  end
  object DataSource3: TDataSource
    DataSet = Table3
    Left = 86
    Top = 358
  end
  object Query1: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select * from '#21382#21490#27700#36153
      'ORDER By '#27700#34920#32534#21495' ASC')
    Left = 191
    Top = 161
  end
  object DataSource4: TDataSource
    DataSet = Query1
    Left = 191
    Top = 129
  end
  object Query2: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select * from '#21382#21490#30005#36153
      'ORDER By '#30005#34920#32534#21495' ASC')
    Left = 255
    Top = 161
  end
  object Query3: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select * from '#21382#21490#29028#27668#36153
      'ORDER By '#29028#27668#34920#32534#21495' ASC')
    Left = 327
    Top = 161
  end
  object Query4: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select * from '#37319#26262#36153#21382#21490#34920
      'ORDER By '#37319#26262#36153#32534#21495' ASC')
    Left = 399
    Top = 161
  end
  object Query5: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select * from '#21382#21490#20854#23427#36153#29992
      'ORDER By '#25910#36153#32534#21495' ASC')
    Left = 471
    Top = 161
  end
  object Query6: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select * from '#21382#21490#24120#29992#36153#29992
      'ORDER By '#25910#36153#32534#21495' ASC')
    Left = 551
    Top = 161
  end
  object Query7: TQuery
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select * from '#25151#31199#36153#36153#29992#21382#21490#34920
      'ORDER By '#25151#38388#20195#21495' ASC')
    Left = 631
    Top = 161
  end
  object DataSource5: TDataSource
    DataSet = Query2
    Left = 255
    Top = 129
  end
  object DataSource6: TDataSource
    DataSet = Query3
    Left = 327
    Top = 129
  end
  object DataSource7: TDataSource
    DataSet = Query4
    Left = 399
    Top = 129
  end
  object DataSource8: TDataSource
    DataSet = Query5
    Left = 471
    Top = 129
  end
  object DataSource9: TDataSource
    DataSet = Query6
    Left = 551
    Top = 129
  end
  object DataSource10: TDataSource
    DataSet = Query7
    Left = 631
    Top = 129
  end
end