ywgl_gjgl_jdform.~dfm

明日腾龙编修管理系统,对于做相关软件的朋友是一个非常好的参考

object YWGL_GJGL_JD: TYWGL_GJGL_JD
  Left = 298
  Top = 175
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = #24037#20855#20511#36151#31649#29702
  ClientHeight = 143
  ClientWidth = 411
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 19
    Top = 13
    Width = 24
    Height = 12
    Caption = #32534#21495
    FocusControl = DBEdit1
  end
  object Label2: TLabel
    Left = 19
    Top = 37
    Width = 48
    Height = 12
    Caption = #24037#20855#21517#31216
    FocusControl = DBEdit2
  end
  object Label3: TLabel
    Left = 19
    Top = 61
    Width = 48
    Height = 12
    Caption = #24037#20855#22411#21495
    FocusControl = DBEdit3
  end
  object Label4: TLabel
    Left = 19
    Top = 84
    Width = 48
    Height = 12
    Caption = #24037#20855#35268#26684
    FocusControl = DBEdit4
  end
  object Label5: TLabel
    Left = 216
    Top = 13
    Width = 24
    Height = 12
    Caption = #32844#21592
  end
  object Label6: TLabel
    Left = 216
    Top = 37
    Width = 24
    Height = 12
    Caption = #32844#21153
    FocusControl = DBEdit6
  end
  object Label7: TLabel
    Left = 216
    Top = 61
    Width = 48
    Height = 12
    Caption = #29616#26377#24037#20316
    FocusControl = DBEdit7
  end
  object Bevel1: TBevel
    Left = -12
    Top = 109
    Width = 441
    Height = 3
  end
  object DBEdit1: TDBEdit
    Left = 76
    Top = 9
    Width = 124
    Height = 20
    DataField = #32534#21495
    DataSource = YWGL_GJGL.DataSource1
    ReadOnly = True
    TabOrder = 0
    OnEnter = DBEdit1Enter
    OnExit = DBEdit1Exit
    OnKeyPress = DBEdit1KeyPress
  end
  object DBEdit2: TDBEdit
    Left = 76
    Top = 33
    Width = 124
    Height = 20
    DataField = #24037#20855#21517#31216
    DataSource = YWGL_GJGL.DataSource1
    ReadOnly = True
    TabOrder = 1
    OnEnter = DBEdit1Enter
    OnExit = DBEdit1Exit
    OnKeyPress = DBEdit1KeyPress
  end
  object DBEdit3: TDBEdit
    Left = 76
    Top = 57
    Width = 124
    Height = 20
    DataField = #24037#20855#22411#21495
    DataSource = YWGL_GJGL.DataSource1
    ReadOnly = True
    TabOrder = 2
    OnEnter = DBEdit1Enter
    OnExit = DBEdit1Exit
    OnKeyPress = DBEdit1KeyPress
  end
  object DBEdit4: TDBEdit
    Left = 76
    Top = 81
    Width = 124
    Height = 20
    DataField = #24037#20855#35268#26684
    DataSource = YWGL_GJGL.DataSource1
    ReadOnly = True
    TabOrder = 3
    OnEnter = DBEdit1Enter
    OnExit = DBEdit1Exit
    OnKeyPress = DBEdit1KeyPress
  end
  object DBEdit6: TDBEdit
    Left = 272
    Top = 33
    Width = 124
    Height = 20
    DataField = #32844#21153
    DataSource = DataSource1
    ReadOnly = True
    TabOrder = 4
    OnEnter = DBEdit1Enter
    OnExit = DBEdit1Exit
    OnKeyPress = DBEdit1KeyPress
  end
  object DBEdit7: TDBEdit
    Left = 272
    Top = 57
    Width = 124
    Height = 20
    DataField = #29616#26377#24037#20316
    DataSource = DataSource1
    ReadOnly = True
    TabOrder = 5
    OnEnter = DBEdit1Enter
    OnExit = DBEdit1Exit
    OnKeyPress = DBEdit1KeyPress
  end
  object BitBtn1: TBitBtn
    Left = 42
    Top = 115
    Width = 80
    Height = 25
    Caption = #20511#20986'[&A]'
    TabOrder = 6
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 166
    Top = 115
    Width = 80
    Height = 25
    Caption = #24402#36824'[&D]'
    TabOrder = 7
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 290
    Top = 115
    Width = 80
    Height = 25
    Caption = #31163#24320'[&E]'
    TabOrder = 8
    OnClick = BitBtn3Click
  end
  object DBLookupComboBox1: TDBLookupComboBox
    Left = 272
    Top = 9
    Width = 124
    Height = 20
    KeyField = #32844#21592
    ListField = #32844#21592
    ListSource = DataSource1
    TabOrder = 9
    OnKeyPress = DBEdit1KeyPress
  end
  object ADOTable1: TADOTable
    Active = True
    ConnectionString = 
      'Provider=MSDASQL.1;Password=mrwxdata1;Persist Security Info=True' +
      ';Data Source=mr_wx'
    CursorType = ctStatic
    TableName = #32844#21592#24037#20316#34920
    Left = 176
    Top = 65533
    object ADOTable1DSDesigner: TStringField
      FieldName = #32844#21592
    end
    object ADOTable1DSDesigner2: TStringField
      FieldName = #32844#21153
    end
    object ADOTable1DSDesigner3: TStringField
      FieldName = #29616#26377#24037#20316
    end
    object ADOTable1DSDesigner4: TStringField
      FieldName = #27966#20462#26085#26399
    end
    object ADOTable1DSDesigner5: TFloatField
      FieldName = #25552#25104#30334#20998#27604
    end
    object ADOTable1DSDesigner6: TStringField
      FieldName = #24212#29992#24037#20855
      Size = 50
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 152
    Top = 65533
  end
end