medinfo.dfm

来自「C++ Builder数据库开发经典案例解析 示例程序都是在C++ Build」· DFM 代码 · 共 374 行

inherited fmMedInfo: TfmMedInfo
  Caption = #33647#21697#20449#24687#32500#25252
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited DBGrid1: TDBGrid
    Height = 214
    Columns = <
      item
        Expanded = False
        FieldName = #32534#21495
        Width = 39
        Visible = True
      end
      item
        Expanded = False
        FieldName = #21517#31216
        Width = 79
        Visible = True
      end
      item
        Expanded = False
        FieldName = #35268#26684
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25972#37327#21333#20301
        Width = 59
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25955#37327#21333#20301
        Width = 56
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20837#24211#21333#20215
        Width = 54
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20986#24211#21333#20215
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25209#21457#20215
        Width = 47
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25972#25955#27604
        Width = 43
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20998#31867
        Width = 53
        Visible = True
      end
      item
        Expanded = False
        FieldName = #36153#29992#24402#31867
        Width = 53
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25340#38899#30721
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25928#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = #19978#38480
        Visible = True
      end
      item
        Expanded = False
        FieldName = #19979#38480
        Visible = True
      end>
  end
  inherited Panel2: TPanel
    Top = 289
    Height = 165
    object Label4: TLabel
      Left = 30
      Top = 14
      Width = 28
      Height = 13
      Caption = #32534#21495
      FocusControl = EditDBEdit
    end
    object Label5: TLabel
      Left = 151
      Top = 14
      Width = 28
      Height = 13
      Caption = #21517#31216
      FocusControl = EditDBEdit2
    end
    object Label6: TLabel
      Left = 350
      Top = 12
      Width = 28
      Height = 13
      Caption = #35268#26684
      FocusControl = EditDBEdit3
    end
    object Label7: TLabel
      Left = 510
      Top = 12
      Width = 56
      Height = 13
      Caption = #25972#37327#21333#20301
      FocusControl = EditDBEdit4
    end
    object Label8: TLabel
      Left = 30
      Top = 68
      Width = 56
      Height = 13
      Caption = #25955#37327#21333#20301
      FocusControl = EditDBEdit5
    end
    object Label9: TLabel
      Left = 109
      Top = 68
      Width = 56
      Height = 13
      Caption = #20837#24211#21333#20215
      FocusControl = EditDBEdit6
    end
    object Label10: TLabel
      Left = 180
      Top = 68
      Width = 56
      Height = 13
      Caption = #20986#24211#21333#20215
      FocusControl = EditDBEdit7
    end
    object Label11: TLabel
      Left = 262
      Top = 68
      Width = 42
      Height = 13
      Caption = #25209#21457#20215
      FocusControl = EditDBEdit8
    end
    object Label12: TLabel
      Left = 333
      Top = 68
      Width = 42
      Height = 13
      Caption = #25972#25955#27604
      FocusControl = EditDBEdit9
    end
    object Label13: TLabel
      Left = 412
      Top = 68
      Width = 28
      Height = 13
      Caption = #20998#31867
    end
    object Label14: TLabel
      Left = 30
      Top = 116
      Width = 56
      Height = 13
      Caption = #36153#29992#24402#31867
      FocusControl = EditDBEdit11
    end
    object Label15: TLabel
      Left = 134
      Top = 116
      Width = 42
      Height = 13
      Caption = #25340#38899#30721
      FocusControl = EditDBEdit12
    end
    object Label16: TLabel
      Left = 221
      Top = 116
      Width = 28
      Height = 13
      Caption = #25928#26399
      FocusControl = EditDBEdit13
    end
    object Label17: TLabel
      Left = 290
      Top = 116
      Width = 28
      Height = 13
      Caption = #19978#38480
      FocusControl = EditDBEdit14
    end
    object Label18: TLabel
      Left = 374
      Top = 116
      Width = 28
      Height = 13
      Caption = #19979#38480
      FocusControl = EditDBEdit15
    end
    object EditDBEdit: TDBEdit
      Left = 30
      Top = 29
      Width = 115
      Height = 21
      DataField = #32534#21495
      DataSource = DataSource1
      TabOrder = 0
    end
    object EditDBEdit2: TDBEdit
      Left = 151
      Top = 29
      Width = 186
      Height = 21
      DataField = #21517#31216
      DataSource = DataSource1
      TabOrder = 1
    end
    object EditDBEdit3: TDBEdit
      Left = 350
      Top = 27
      Width = 147
      Height = 21
      DataField = #35268#26684
      DataSource = DataSource1
      TabOrder = 2
    end
    object EditDBEdit4: TDBEdit
      Left = 510
      Top = 27
      Width = 59
      Height = 21
      DataField = #25972#37327#21333#20301
      DataSource = DataSource1
      TabOrder = 3
    end
    object EditDBEdit5: TDBEdit
      Left = 30
      Top = 83
      Width = 59
      Height = 21
      DataField = #25955#37327#21333#20301
      DataSource = DataSource1
      TabOrder = 4
    end
    object EditDBEdit6: TDBEdit
      Left = 109
      Top = 83
      Width = 65
      Height = 21
      DataField = #20837#24211#21333#20215
      DataSource = DataSource1
      TabOrder = 5
    end
    object EditDBEdit7: TDBEdit
      Left = 180
      Top = 83
      Width = 65
      Height = 21
      DataField = #20986#24211#21333#20215
      DataSource = DataSource1
      TabOrder = 6
    end
    object EditDBEdit8: TDBEdit
      Left = 262
      Top = 83
      Width = 65
      Height = 21
      DataField = #25209#21457#20215
      DataSource = DataSource1
      TabOrder = 7
    end
    object EditDBEdit9: TDBEdit
      Left = 333
      Top = 83
      Width = 65
      Height = 21
      DataField = #25972#25955#27604
      DataSource = DataSource1
      TabOrder = 8
    end
    object EditDBEdit11: TDBEdit
      Left = 30
      Top = 131
      Width = 91
      Height = 21
      DataField = #36153#29992#24402#31867
      DataSource = DataSource1
      TabOrder = 9
    end
    object EditDBEdit12: TDBEdit
      Left = 134
      Top = 131
      Width = 67
      Height = 21
      DataField = #25340#38899#30721
      DataSource = DataSource1
      TabOrder = 10
    end
    object EditDBEdit13: TDBEdit
      Left = 221
      Top = 131
      Width = 55
      Height = 21
      DataField = #25928#26399
      DataSource = DataSource1
      TabOrder = 11
    end
    object EditDBEdit14: TDBEdit
      Left = 290
      Top = 131
      Width = 65
      Height = 21
      DataField = #19978#38480
      DataSource = DataSource1
      TabOrder = 12
    end
    object EditDBEdit15: TDBEdit
      Left = 374
      Top = 131
      Width = 65
      Height = 21
      DataField = #19979#38480
      DataSource = DataSource1
      TabOrder = 13
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 411
      Top = 83
      Width = 158
      Height = 21
      DataField = #20998#31867
      DataSource = DataSource1
      KeyField = #21517#31216
      ListField = #21517#31216
      ListSource = DataSource2
      TabOrder = 14
    end
  end
  inherited Table1: TTable
    TableName = 'dbo.'#33647#21697#36164#26009
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'db'
    TableName = 'dbo.'#33647#21697#20998#31867
    Left = 536
    Top = 408
  end
  object DataSource2: TDataSource
    AutoEdit = False
    DataSet = Table2
    Left = 568
    Top = 408
  end
end