jlyda_u.dfm

比较完整的系统 比较完整的系统

          FocusControl = DBMemo1
        end
        object DBMemo1: TDBMemo
          Left = 54
          Top = 23
          Width = 601
          Height = 74
          Color = clSkyBlue
          DataField = #22791#27880
          DataSource = DataSource1
          ScrollBars = ssBoth
          TabOrder = 0
        end
      end
      object Panel1: TPanel
        Left = 8
        Top = 300
        Width = 667
        Height = 41
        BevelInner = bvLowered
        BevelOuter = bvNone
        TabOrder = 2
        object Label13: TLabel
          Left = 223
          Top = 15
          Width = 60
          Height = 12
          Caption = #26597#35810#26465#20214#65306
        end
        object DBNavigator1: TDBNavigator
          Left = 7
          Top = 8
          Width = 210
          Height = 25
          DataSource = DataSource1
          TabOrder = 0
        end
        object BitBtn1: TBitBtn
          Left = 574
          Top = 9
          Width = 45
          Height = 25
          Caption = #25171#21360
          TabOrder = 1
          OnClick = BitBtn1Click
        end
        object BitBtn2: TBitBtn
          Left = 619
          Top = 9
          Width = 45
          Height = 25
          Caption = #36864#20986
          TabOrder = 2
          OnClick = BitBtn2Click
        end
        object BitBtn3: TBitBtn
          Left = 513
          Top = 9
          Width = 60
          Height = 25
          Caption = #23548#20986'EXCEL'
          TabOrder = 3
          OnClick = BitBtn3Click
        end
        object ComboBox1: TComboBox
          Left = 279
          Top = 11
          Width = 81
          Height = 20
          ItemHeight = 12
          TabOrder = 4
          Items.Strings = (
            #32534#21495
            #22995#21517
            #24615#21035
            #25345#29031#31867#21035
            #39550#29031#26377#25928#26399#38480
            #20934#25945#24320#22987#26085#26399
            #20934#25945#25130#27490#26085#26399
            #32852#31995#30005#35805
            #24314#26723#20154
            #24314#26723#26085#26399)
        end
        object Edit1: TEdit
          Left = 399
          Top = 11
          Width = 65
          Height = 20
          TabOrder = 5
        end
        object BitBtn4: TBitBtn
          Left = 472
          Top = 9
          Width = 41
          Height = 25
          Caption = #26597#35810
          TabOrder = 6
          OnClick = BitBtn4Click
        end
        object ComboBox2: TComboBox
          Left = 360
          Top = 11
          Width = 37
          Height = 20
          ItemHeight = 12
          TabOrder = 7
          Items.Strings = (
            '='
            '>='
            '<='
            '<>')
        end
      end
      object DBGridEh1: TDBGridEh
        Left = 8
        Top = 349
        Width = 673
        Height = 137
        FooterColor = clWindow
        FooterFont.Charset = ANSI_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -12
        FooterFont.Name = #23435#20307
        FooterFont.Style = []
        TabOrder = 3
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
      end
    end
    object TabSheet2: TTabSheet
      Caption = #26597#35810
      ImageIndex = 1
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 48
  end
  object Table1: TTable
    Active = True
    BeforeInsert = Table1BeforeInsert
    AfterInsert = Table1AfterInsert
    AfterPost = Table1AfterPost
    AfterCancel = Table1AfterCancel
    BeforeRefresh = Table1BeforeRefresh
    DatabaseName = 'jx'
    FieldDefs = <
      item
        Name = #32534#21495
        DataType = ftString
        Size = 6
      end
      item
        Name = #22995#21517
        DataType = ftString
        Size = 10
      end
      item
        Name = #24615#21035
        DataType = ftString
        Size = 5
      end
      item
        Name = #24180#40836
        DataType = ftSmallint
      end
      item
        Name = #25345#29031#31867#21035
        DataType = ftString
        Size = 5
      end
      item
        Name = #39550#29031#26377#25928#26399#38480
        DataType = ftDateTime
      end
      item
        Name = #20934#25945#31867#21035
        DataType = ftString
        Size = 15
      end
      item
        Name = #20934#25945#24320#22987#26085#26399
        DataType = ftDateTime
      end
      item
        Name = #20934#25945#25130#27490#26085#26399
        DataType = ftDateTime
      end
      item
        Name = #25163#26426
        DataType = ftString
        Size = 13
      end
      item
        Name = #32852#31995#30005#35805
        DataType = ftString
        Size = 13
      end
      item
        Name = #36890#35759#22320#22336
        DataType = ftString
        Size = 50
      end
      item
        Name = #22791#27880
        DataType = ftMemo
        Size = 1
      end
      item
        Name = #24314#26723#20154
        DataType = ftString
        Size = 10
      end
      item
        Name = #24314#26723#26085#26399
        DataType = ftDateTime
      end>
    IndexDefs = <
      item
        Name = 'PrimaryKey'
        Fields = #32534#21495
        Options = [ixUnique]
      end>
    StoreDefs = True
    TableName = #25945#32451#21592#26723#26696
    Left = 80
    object Table1BDEDesigner: TStringField
      FieldName = #32534#21495
      Size = 6
    end
    object Table1BDEDesigner12: TStringField
      FieldName = #22995#21517
      Size = 10
    end
    object Table1BDEDesigner13: TStringField
      FieldName = #24615#21035
      Size = 5
    end
    object Table1BDEDesigner2: TSmallintField
      FieldName = #24180#40836
    end
    object Table1BDEDesigner3: TStringField
      FieldName = #25345#29031#31867#21035
      Size = 5
    end
    object Table1BDEDesigner4: TDateTimeField
      FieldName = #39550#29031#26377#25928#26399#38480
      EditMask = '0000\-00\-00;1;_'
    end
    object Table1BDEDesigner15: TStringField
      FieldName = #20934#25945#31867#21035
      Size = 15
    end
    object Table1BDEDesigner5: TDateTimeField
      FieldName = #20934#25945#24320#22987#26085#26399
      EditMask = '0000\-00\-00;1;_'
    end
    object Table1BDEDesigner6: TDateTimeField
      FieldName = #20934#25945#25130#27490#26085#26399
      EditMask = '0000\-00\-00;1;_'
    end
    object Table1BDEDesigner14: TStringField
      FieldName = #25163#26426
      Size = 13
    end
    object Table1BDEDesigner7: TStringField
      FieldName = #32852#31995#30005#35805
      Size = 13
    end
    object Table1BDEDesigner8: TStringField
      FieldName = #36890#35759#22320#22336
      Size = 50
    end
    object Table1BDEDesigner9: TMemoField
      FieldName = #22791#27880
      BlobType = ftMemo
      Size = 1
    end
    object Table1BDEDesigner10: TStringField
      FieldName = #24314#26723#20154
      Size = 10
    end
    object Table1BDEDesigner11: TDateTimeField
      FieldName = #24314#26723#26085#26399
    end
  end
  object Database1: TDatabase
    AliasName = 'jx'
    Connected = True
    DatabaseName = 'jx'
    LoginPrompt = False
    SessionName = 'Default'
    Left = 16
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'jx'
    TableName = #21442#25968#35774#32622
    Left = 112
  end
  object Table3: TTable
    Active = True
    DatabaseName = 'jx'
    TableName = #35745#25968#22120
    Left = 144
    object Table3jlyda: TIntegerField
      FieldName = 'jlyda'
    end
  end
  object PrintDBGridEh1: TPrintDBGridEh
    DBGridEh = DBGridEh1
    Options = [pghFitGridToPageWidth, pghRowAutoStretch, pghOptimalColWidths]
    Page.BottomMargin = 1.000000000000000000
    Page.LeftMargin = 1.000000000000000000
    Page.RightMargin = 1.000000000000000000
    Page.TopMargin = 1.000000000000000000
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -11
    PageFooter.Font.Name = 'MS Sans Serif'
    PageFooter.Font.Style = []
    PageHeader.CenterText.Strings = (
      #25945#32451#21592#26723#26696)
    PageHeader.Font.Charset = ANSI_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -29
    PageHeader.Font.Name = #23435#20307
    PageHeader.Font.Style = []
    Units = MM
    Left = 72
    Top = 488
  end
end