kmks1hmc_u.dfm

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

object kmks1hmc: Tkmks1hmc
  Left = 225
  Top = 228
  Width = 780
  Height = 534
  Caption = #31185#30446#19968#32771#35797#33457#21517#20876
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object Panel1: TPanel
    Left = 0
    Top = 44
    Width = 772
    Height = 441
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 5
    BorderStyle = bsSingle
    Color = 15793919
    TabOrder = 0
    object Label1: TLabel
      Left = 5
      Top = 5
      Width = 758
      Height = 21
      Align = alTop
      Alignment = taCenter
      Caption = 'Title'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Panel2: TPanel
      Left = 5
      Top = 26
      Width = 758
      Height = 71
      Align = alTop
      BevelOuter = bvNone
      ParentColor = True
      TabOrder = 0
      object Label2: TLabel
        Left = 5
        Top = 8
        Width = 63
        Height = 14
        Alignment = taCenter
        Caption = #24320#29677#26102#38388':'
      end
      object Label3: TLabel
        Left = 5
        Top = 39
        Width = 91
        Height = 14
        Caption = #26412#26399#23398#21592#20154#25968':'
      end
      object Label4: TLabel
        Left = 221
        Top = 39
        Width = 91
        Height = 14
        Caption = #21442#21152#32771#35797#20154#25968':'
      end
      object Label5: TLabel
        Left = 412
        Top = 39
        Width = 63
        Height = 14
        Caption = #21150#32467#20154#25968':'
      end
      object Label6: TLabel
        Left = 624
        Top = 39
        Width = 63
        Height = 14
        Caption = #36951#30041#20154#25968':'
      end
      object Label8: TLabel
        Left = 412
        Top = 8
        Width = 63
        Height = 14
        Caption = #21333'    '#21495':'
      end
      object DateTimePicker1: TDateTimePicker
        Left = 149
        Top = 8
        Width = 25
        Height = 22
        BevelEdges = [beBottom]
        BevelOuter = bvNone
        BevelKind = bkSoft
        Date = 38562.887806168990000000
        Time = 38562.887806168990000000
        TabOrder = 0
        OnChange = DateTimePicker1Change
      end
      object DBEdit7: TDBEdit
        Left = 690
        Top = 36
        Width = 60
        Height = 20
        BevelEdges = [beBottom]
        BevelKind = bkSoft
        BorderStyle = bsNone
        DataField = #36951#30041#20154#25968
        DataSource = DataSource2
        ParentColor = True
        TabOrder = 1
      end
      object DBEdit3: TDBEdit
        Left = 314
        Top = 36
        Width = 60
        Height = 20
        BevelEdges = [beBottom]
        BevelKind = bkSoft
        BorderStyle = bsNone
        DataField = #21442#32771#20154#25968
        DataSource = DataSource2
        ParentColor = True
        TabOrder = 2
      end
      object DBEdit4: TDBEdit
        Left = 479
        Top = 36
        Width = 60
        Height = 20
        BevelEdges = [beBottom]
        BevelKind = bkSoft
        BorderStyle = bsNone
        DataField = #21150#32467#20154#25968
        DataSource = DataSource2
        ParentColor = True
        TabOrder = 3
      end
      object DBEdit1: TDBEdit
        Left = 69
        Top = 8
        Width = 81
        Height = 20
        BevelEdges = [beBottom]
        BevelKind = bkSoft
        BorderStyle = bsNone
        DataField = #24320#29677#26102#38388
        DataSource = DataSource2
        ParentColor = True
        TabOrder = 4
      end
      object DBEdit5: TDBEdit
        Left = 480
        Top = 8
        Width = 129
        Height = 20
        BevelEdges = [beBottom]
        BevelKind = bkSoft
        BorderStyle = bsNone
        DataField = #21333#21495
        DataSource = DataSource2
        Enabled = False
        ParentColor = True
        TabOrder = 5
      end
      object DBEdit2: TDBEdit
        Left = 99
        Top = 36
        Width = 78
        Height = 20
        BevelEdges = [beBottom]
        BevelKind = bkSoft
        BorderStyle = bsNone
        DataField = #26412#26399#23398#21592#20154#25968
        DataSource = DataSource2
        ParentColor = True
        TabOrder = 6
      end
    end
    object DBGridEh1: TDBGridEh
      Left = 5
      Top = 97
      Width = 758
      Height = 304
      Align = alTop
      DataSource = DataSource1
      FooterColor = clWindow
      FooterFont.Charset = ANSI_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -14
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      TabOrder = 1
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -14
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnEditButtonClick = DBGridEh1EditButtonClick
      OnKeyPress = DBGridEh1KeyPress
      Columns = <
        item
          ButtonStyle = cbsEllipsis
          EditButtons = <>
          FieldName = #22995#21517
          Footers = <>
          Title.Alignment = taCenter
        end
        item
          EditButtons = <>
          FieldName = #24615#21035
          Footers = <>
          ReadOnly = True
          Title.Alignment = taCenter
          Width = 34
        end
        item
          EditButtons = <>
          FieldName = #36523#20221#35777#21495
          Footers = <>
          ReadOnly = True
          Title.Alignment = taCenter
          Width = 91
        end
        item
          EditButtons = <>
          FieldName = #25163#26426
          Footers = <>
          ReadOnly = True
          Title.Alignment = taCenter
        end
        item
          EditButtons = <>
          FieldName = #30005#35805
          Footers = <>
          ReadOnly = True
          Title.Alignment = taCenter
        end
        item
          EditButtons = <>
          FieldName = #32852#31995#20154
          Footers = <>
          ReadOnly = True
          Title.Alignment = taCenter
        end
        item
          EditButtons = <>
          FieldName = #25215#35757#26102#38388
          Footers = <>
          Title.Alignment = taCenter
        end
        item
          EditButtons = <>
          FieldName = #20132#36153#24773#20917
          Footers = <>
          ReadOnly = True