backup.~dfm

宁夏中药管理系统,在其它的基础上改的,将他人没有完成的功能补上

object f_backup: Tf_backup
  Left = 265
  Top = 217
  BorderIcons = [biSystemMenu]
  BorderStyle = bsToolWindow
  Caption = #25968#25454#22791#20221
  ClientHeight = 302
  ClientWidth = 478
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 139
    Top = 8
    Width = 190
    Height = 24
    Alignment = taCenter
    Caption = ' '#25968' '#25454' '#24211' '#22791' '#20221
    Color = clTeal
    Font.Charset = DEFAULT_CHARSET
    Font.Color = 4227327
    Font.Height = -24
    Font.Name = #38582#20070
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object Label2: TLabel
    Left = 8
    Top = 61
    Width = 3
    Height = 15
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clPurple
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 233
    Top = 102
    Width = 128
    Height = 16
    Alignment = taCenter
    Caption = #36873#25321#22791#20221#30340#30446#24405#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 4
    Top = 102
    Width = 64
    Height = 16
    Caption = #39537#21160#22120#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 7
    Top = 149
    Width = 131
    Height = 15
    Caption = #22791#20221#30340#25991#20214'(*.mdb)'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 8
    Top = 50
    Width = 160
    Height = 16
    Caption = #22791#20221#30340#30446#24405#21450#25991#20214#21517#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #38582#20070
    Font.Style = []
    ParentFont = False
  end
  object DriveComboBox1: TDriveComboBox
    Left = 6
    Top = 120
    Width = 219
    Height = 22
    DirList = DirectoryListBox1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    ParentFont = False
    TabOrder = 0
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 234
    Top = 120
    Width = 239
    Height = 146
    FileList = FileListBox1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    ItemHeight = 16
    ParentFont = False
    TabOrder = 1
    OnChange = DirectoryListBox1Change
  end
  object FileListBox1: TFileListBox
    Left = 5
    Top = 168
    Width = 212
    Height = 97
    FileEdit = Edit1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    ItemHeight = 16
    Mask = '*.mdb'
    ParentFont = False
    TabOrder = 2
  end
  object Edit1: TEdit
    Left = 8
    Top = 70
    Width = 457
    Height = 25
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Times New Roman'
    Font.Style = []
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    ParentFont = False
    TabOrder = 3
    Text = '*.mdb'
    OnChange = Edit1Change
  end
  object Button1: TButton
    Left = 47
    Top = 275
    Width = 73
    Height = 25
    Caption = #30830' '#23450
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 223
    Top = 275
    Width = 73
    Height = 25
    Caption = #21462' '#28040
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnClick = Button2Click
  end
end