unit16.dfm

来自「玉龙飞雪进销存管理系统,可以帮您管理进销存的软件」· DFM 代码 · 共 126 行

object Formbei: TFormbei
  Left = 268
  Top = 177
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsDialog
  Caption = #25968#25454#22791#20221
  ClientHeight = 130
  ClientWidth = 272
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton
    Left = 168
    Top = 16
    Width = 81
    Height = 25
    Caption = #24320'     '#22987
    Flat = True
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 170
    Top = 88
    Width = 81
    Height = 25
    Caption = #36864'      '#20986
    Flat = True
    OnClick = SpeedButton2Click
  end
  object RadioButton1: TRadioButton
    Left = 16
    Top = 16
    Width = 89
    Height = 17
    Caption = #36827#36135#34920#22791#20221
    TabOrder = 0
  end
  object RadioButton2: TRadioButton
    Left = 16
    Top = 56
    Width = 81
    Height = 17
    Caption = #38144#21806#34920#22791#20221
    TabOrder = 1
  end
  object RadioButton3: TRadioButton
    Left = 16
    Top = 96
    Width = 89
    Height = 17
    Caption = #23458#25143#34920#22791#20221
    TabOrder = 2
  end
  object BatchMove1: TBatchMove
    Destination = Table2
    Mode = batCopy
    Source = Table1
    Left = 88
    Top = 8
  end
  object Table1: TTable
    AutoCalcFields = False
    DatabaseName = 'mydb'
    TableName = 'jin.DB'
    Left = 8
    Top = 8
  end
  object Table2: TTable
    AutoCalcFields = False
    DatabaseName = 'mydb'
    TableName = 'jinbak.DB'
    Left = 40
    Top = 8
  end
  object Table3: TTable
    AutoCalcFields = False
    DatabaseName = 'mydb'
    TableName = 'xiao.DB'
    Left = 8
    Top = 48
  end
  object Table4: TTable
    AutoCalcFields = False
    DatabaseName = 'mydb'
    TableName = 'xiaobak.db'
    Left = 40
    Top = 48
  end
  object BatchMove2: TBatchMove
    Destination = Table4
    Mode = batCopy
    Source = Table3
    Left = 88
    Top = 48
  end
  object Table5: TTable
    AutoCalcFields = False
    DatabaseName = 'mydb'
    TableName = 'kehu.DB'
    Left = 8
    Top = 88
  end
  object Table6: TTable
    AutoCalcFields = False
    DatabaseName = 'mydb'
    TableName = 'kehubak.db'
    Left = 40
    Top = 88
  end
  object BatchMove3: TBatchMove
    Destination = Table6
    Mode = batCopy
    Source = Table5
    Left = 88
    Top = 88
  end
end