⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit2.dfm

📁 一个小型的仓库管理系统实现了出库和入库的基本功能
💻 DFM
字号:
object Form2: TForm2
  Left = 248
  Top = 176
  Width = 545
  Height = 367
  Caption = #31995#32479#21151#33021#21015#34920
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 537
    Height = 313
    ActivePage = TabSheet1
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #20837#24211#30331#35760' '
      object Label1: TLabel
        Left = 40
        Top = 24
        Width = 45
        Height = 13
        Caption = #36135#29289#21495'   '
      end
      object Label2: TLabel
        Left = 40
        Top = 72
        Width = 45
        Height = 13
        Caption = #36135#29289#25968'   '
      end
      object Label3: TLabel
        Left = 272
        Top = 128
        Width = 45
        Height = 13
        Caption = #36135#29289#21517'   '
      end
      object Label4: TLabel
        Left = 40
        Top = 176
        Width = 33
        Height = 13
        Caption = #36135#20027'   '
      end
      object Label5: TLabel
        Left = 272
        Top = 24
        Width = 45
        Height = 13
        Caption = #20179#24211#21495'   '
      end
      object Label6: TLabel
        Left = 272
        Top = 72
        Width = 33
        Height = 13
        Caption = #26085#26399'   '
      end
      object Label15: TLabel
        Left = 40
        Top = 128
        Width = 57
        Height = 13
        Caption = #36135#29289#20215#26684'   '
      end
      object DateTimePicker1: TDateTimePicker
        Left = 352
        Top = 64
        Width = 121
        Height = 21
        Date = 39059.000000000000000000
        Time = 39059.000000000000000000
        DateFormat = dfLong
        TabOrder = 0
      end
      object BitBtn1: TBitBtn
        Left = 296
        Top = 224
        Width = 75
        Height = 25
        Caption = #36864#20986
        TabOrder = 1
        Kind = bkClose
      end
      object Button1: TButton
        Left = 144
        Top = 224
        Width = 75
        Height = 25
        Caption = #30830#23450
        TabOrder = 2
        OnClick = Button1Click
      end
      object Edit1: TEdit
        Left = 112
        Top = 16
        Width = 121
        Height = 21
        TabOrder = 3
      end
      object Edit2: TEdit
        Left = 112
        Top = 64
        Width = 121
        Height = 21
        TabOrder = 4
      end
      object Edit3: TEdit
        Left = 112
        Top = 120
        Width = 121
        Height = 21
        TabOrder = 5
      end
      object Edit4: TEdit
        Left = 112
        Top = 168
        Width = 121
        Height = 21
        TabOrder = 6
      end
      object Edit5: TEdit
        Left = 352
        Top = 16
        Width = 121
        Height = 21
        TabOrder = 7
      end
      object Edit6: TEdit
        Left = 352
        Top = 120
        Width = 121
        Height = 21
        TabOrder = 8
      end
      object Edit9: TEdit
        Left = 352
        Top = 168
        Width = 121
        Height = 21
        TabOrder = 9
        Visible = False
      end
    end
    object TabSheet2: TTabSheet
      Caption = #20986#24211#30331#35760' '
      ImageIndex = 1
      object Label9: TLabel
        Left = 80
        Top = 176
        Width = 48
        Height = 13
        Caption = #36135#29289#21495'    '
      end
      object Label10: TLabel
        Left = 80
        Top = 216
        Width = 48
        Height = 13
        Caption = #36135#29289#25968'    '
      end
      object BitBtn2: TBitBtn
        Left = 264
        Top = 248
        Width = 75
        Height = 25
        Caption = #36864#20986
        TabOrder = 0
        Kind = bkClose
      end
      object Button2: TButton
        Left = 104
        Top = 248
        Width = 75
        Height = 25
        Caption = #30830#23450
        TabOrder = 1
        OnClick = Button2Click
      end
      object DBGrid1: TDBGrid
        Left = 0
        Top = 0
        Width = 529
        Height = 161
        DataSource = DataSource1
        TabOrder = 2
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
      object Button4: TButton
        Left = 424
        Top = 168
        Width = 75
        Height = 25
        Caption = #21047#26032
        TabOrder = 3
        OnClick = Button4Click
      end
      object Edit7: TEdit
        Left = 144
        Top = 168
        Width = 121
        Height = 21
        TabOrder = 4
      end
      object Edit8: TEdit
        Left = 144
        Top = 208
        Width = 121
        Height = 21
        TabOrder = 5
      end
    end
    object TabSheet3: TTabSheet
      Caption = #20449#24687#32500#25252' '
      ImageIndex = 2
      object RadioButton1: TRadioButton
        Left = 56
        Top = 64
        Width = 113
        Height = 17
        Caption = #36861#21152#26032#35760#24405'    '
        Checked = True
        TabOrder = 0
        TabStop = True
      end
      object RadioButton2: TRadioButton
        Left = 56
        Top = 112
        Width = 161
        Height = 17
        Caption = #20462#25913#24050#23384#22312#36135#29289#20449#24687'   '
        TabOrder = 1
      end
      object Button3: TButton
        Left = 360
        Top = 64
        Width = 75
        Height = 25
        Caption = #30830#23450
        TabOrder = 2
        OnClick = Button3Click
      end
      object BitBtn3: TBitBtn
        Left = 360
        Top = 120
        Width = 75
        Height = 25
        Caption = #36864#20986
        TabOrder = 3
        Kind = bkClose
      end
      object RadioButton3: TRadioButton
        Left = 56
        Top = 160
        Width = 113
        Height = 17
        Caption = #20449#24687#26597#35810
        TabOrder = 4
      end
    end
    object TabSheet4: TTabSheet
      Caption = #20179#24211#26597#35810' '
      ImageIndex = 3
      object DBGrid2: TDBGrid
        Left = 8
        Top = 8
        Width = 513
        Height = 225
        DataSource = DataSource2
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
      object DBNavigator1: TDBNavigator
        Left = 104
        Top = 248
        Width = 330
        Height = 25
        DataSource = DataSource2
        TabOrder = 1
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 314
    Width = 537
    Height = 19
    Color = clBackground
    Panels = <
      item
        Text = #20179#20648#31649#29702#31995#32479
        Width = 100
      end
      item
        Text = #36213#25391#28023
        Width = 100
      end
      item
        Text = #29677#32423#65306'04062301'
        Width = 100
      end
      item
        Text = #23398#21495#65306'04301266'
        Width = 100
      end>
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 4
    Top = 240
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select *'
      'from import')
    Left = 4
    Top = 280
  end
  object ADOCommand1: TADOCommand
    Connection = ADOConnection1
    Parameters = <>
    Left = 68
    Top = 280
  end
  object DataSource2: TDataSource
    DataSet = ADOTable1
    Left = 28
    Top = 240
  end
  object ADOTable1: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'store'
    Left = 36
    Top = 280
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=cangchu;Data Source=ZZH'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 4
    Top = 208
  end
end

⌨️ 快捷键说明

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