providerinfo.dfm

来自「这也是师兄的毕业设计,具体的功能我也不清楚,因为我才大一,请见谅!!!!!!!不」· DFM 代码 · 共 336 行

DFM
336
字号
inherited F_ProviderInfo: TF_ProviderInfo
  Left = -154
  Top = 118
  Width = 800
  Height = 570
  Caption = #20379#24212#21830#20449#24687
  FormStyle = fsMDIChild
  OldCreateOrder = True
  Position = poScreenCenter
  Visible = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited palDown: TPanel
    Top = 534
    Width = 792
    inherited imgRightDown: TImage
      Left = 782
    end
    inherited imgDownMin: TImage
      Width = 772
    end
  end
  inherited palLeft: TPanel
    Height = 469
    inherited imgLeft: TImage
      Height = 469
    end
  end
  inherited palRight: TPanel
    Left = 777
    Height = 469
    inherited imgRight: TImage
      Height = 469
    end
  end
  inherited palToolbar: TPanel
    Width = 792
    inherited tiLocate: TTradeImg
      OnClick = tiLocateClick
    end
    inherited tiLast: TTradeImg
      OnClick = tiLastClick
    end
    inherited tiNext: TTradeImg
      OnClick = tiNextClick
    end
    inherited tiPrior: TTradeImg
      OnClick = tiPriorClick
    end
    inherited tiFirst: TTradeImg
      OnClick = tiFirstClick
    end
  end
  object GroupBox1: TGroupBox
    Left = 10
    Top = 65
    Width = 767
    Height = 469
    Align = alClient
    Caption = #20379#24212#21830#20449#24687
    Color = 13619151
    ParentColor = False
    TabOrder = 4
    object Label1: TLabel
      Left = 48
      Top = 24
      Width = 72
      Height = 13
      Caption = #20379#24212#21830#32534#21495#65306
      FocusControl = DBEdit1
    end
    object Label2: TLabel
      Left = 48
      Top = 67
      Width = 72
      Height = 13
      Caption = #20379#24212#21830#21517#31216#65306
      FocusControl = DBEdit2
    end
    object Label3: TLabel
      Left = 48
      Top = 115
      Width = 36
      Height = 13
      Caption = #22320#22336#65306
      FocusControl = DBEdit3
    end
    object Label4: TLabel
      Left = 48
      Top = 158
      Width = 36
      Height = 13
      Caption = #30005#35805#65306
      FocusControl = DBEdit4
    end
    object Label5: TLabel
      Left = 216
      Top = 158
      Width = 48
      Height = 13
      Caption = #32852#31995#20154#65306
      FocusControl = DBEdit5
    end
    object Label6: TLabel
      Left = 416
      Top = 24
      Width = 60
      Height = 13
      Caption = #21830#21697#21517#31216#65306
      FocusControl = DBEdit6
    end
    object Label7: TLabel
      Left = 416
      Top = 67
      Width = 36
      Height = 13
      Caption = #35268#26684#65306
      FocusControl = DBEdit7
    end
    object Label8: TLabel
      Left = 416
      Top = 115
      Width = 36
      Height = 13
      Caption = #20215#26684#65306
      FocusControl = DBEdit8
    end
    object Label9: TLabel
      Left = 416
      Top = 158
      Width = 36
      Height = 13
      Caption = #24065#31181#65306
      FocusControl = DBEdit9
    end
    object Label10: TLabel
      Left = 200
      Top = 24
      Width = 60
      Height = 13
      Caption = #35760#24405#24207#21495#65306
      FocusControl = DBEdit10
    end
    object DBEdit1: TDBEdit
      Left = 48
      Top = 41
      Width = 108
      Height = 21
      Color = clSilver
      DataField = 'Provider_ID'
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 48
      Top = 85
      Width = 233
      Height = 21
      Color = clSilver
      DataField = 'Provider_Name'
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 48
      Top = 128
      Width = 297
      Height = 21
      Color = clSilver
      DataField = 'Provider_Address'
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 48
      Top = 172
      Width = 134
      Height = 21
      Color = clSilver
      DataField = 'Provider_Phone'
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 208
      Top = 172
      Width = 134
      Height = 21
      Color = clSilver
      DataField = 'Provider_Linkman'
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 4
    end
    object DBEdit6: TDBEdit
      Left = 416
      Top = 41
      Width = 169
      Height = 21
      Color = clSilver
      DataField = 'Ware_Name'
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 5
    end
    object DBEdit7: TDBEdit
      Left = 416
      Top = 85
      Width = 108
      Height = 21
      Color = clSilver
      DataField = 'Ware_Specs'
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 6
    end
    object DBEdit8: TDBEdit
      Left = 416
      Top = 128
      Width = 169
      Height = 21
      Color = clSilver
      DataField = 'Ware_Price'
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 7
    end
    object DBEdit9: TDBEdit
      Left = 416
      Top = 172
      Width = 108
      Height = 21
      Color = clSilver
      DataField = 'Money_Class'
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 8
    end
    object DBEdit10: TDBEdit
      Left = 200
      Top = 41
      Width = 57
      Height = 21
      Color = clSilver
      DataField = 'Note_Code'
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 9
    end
    object DBGrid1: TDBGrid
      Left = 0
      Top = 200
      Width = 967
      Height = 362
      Align = alCustom
      Anchors = [akLeft, akTop, akRight, akBottom]
      DataSource = dm.d_providerinfo
      ReadOnly = True
      TabOrder = 10
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'Provider_ID'
          Title.Caption = #32534#21495
          Width = 82
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Provider_Name'
          Title.Caption = #21517#31216
          Width = 105
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Provider_Address'
          Title.Caption = #22320#22336
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Provider_Phone'
          Title.Caption = #30005#35805
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Provider_Linkman'
          Title.Caption = #32852#31995#20154
          Width = 71
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Ware_Name'
          Title.Caption = #21830#21697#21517#31216
          Width = 89
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Ware_Specs'
          Title.Caption = #35268#26684
          Width = 81
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Ware_Price'
          Title.Caption = #20215#26684
          Width = 87
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Money_Class'
          Title.Caption = #24065#31181
          Width = 75
          Visible = True
        end>
    end
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?