usjdr.dfm

图书管理系统,已经用于市场,此软件只供学习使用,不的用于商业行为

object sjdrfrm: Tsjdrfrm
  Left = 159
  Top = 203
  Width = 851
  Height = 542
  AutoSize = True
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #25968#25454#23548#20837'[DBF'#25991#20214#8594'access'#25968#25454#24211#20013']'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100001000400E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000088888888888888888888880004444
    0700000000000000000000000000444407078888888888888888888888000000
    770F7777777777777777777778000000770F7888888888888877777778000007
    770F780F000F00F0087777777800000777078777777777778FFF499477000077
    70FF8888888888888FF4994FF000007770FFFFFFFFFFFFFFFFFFFFFF70000077
    000000000000000000000000000000770FFFFFFFFFFFFFFFFFFFFFF700000070
    F700000000000000000007700000000F700000000000000000007700000000FF
    FFFFFFFFF8E8FFFFFFFF700000000000000000000EEE00000000000000000000
    00000008EEEEE80000000000000000000000000EEEEEEE000000000000000000
    000778EEEEEEEEE87000000000000000000778888EEE88887000000000000000
    000777778EEE877770000000000000000007F7F7EEE877F7F000000000000000
    007F7F78EEE77F7F000000000000000000FFFF7EEE7FFFFF0000000000000888
    0FFFF7EEE7FFFFF00000000000000880FFFF7EEE7FFFFF00000000000000000F
    FFF7EEE7FFFF000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFFFFFFFFFFE000007FC000003F80000010000000100000001E000
    0001E0000001C0000001C0000001800000018000000380000003800000078000
    000F8000001F8000003F8000007FFFE03FFFFC0003FFFC0003FFFC0003FFFC00
    03FFFC0003FFF80007FF000007FF00000FFF00001FFF00003FFF8000FFFF}
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 843
    Height = 508
    Align = alClient
    TabOrder = 0
    object Label1: TLabel
      Left = 200
      Top = 112
      Width = 217
      Height = 25
      AutoSize = False
      Caption = #20320#24403#21069#25171#24320#30340'dbf'#25991#20214#30340#35760#24405#20026#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 424
      Top = 112
      Width = 89
      Height = 20
      Alignment = taCenter
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 528
      Top = 112
      Width = 25
      Height = 25
      AutoSize = False
      Caption = #26465
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object DBGrid1: TDBGrid
      Left = 16
      Top = 152
      Width = 809
      Height = 297
      DataSource = DataSourcedbf
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDrawColumnCell = DBGrid1DrawColumnCell
    end
    object GroupBox1: TGroupBox
      Left = 128
      Top = 24
      Width = 585
      Height = 57
      TabOrder = 1
      object btopen: TBitBtn
        Left = 56
        Top = 16
        Width = 105
        Height = 33
        Caption = #25171#24320'dbf'#25991#20214
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = btopenClick
      end
      object btdr: TBitBtn
        Left = 224
        Top = 16
        Width = 105
        Height = 33
        Caption = #23548#20837#21040#25968#25454#20013
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = btdrClick
      end
      object BitBtn1: TBitBtn
        Left = 384
        Top = 16
        Width = 105
        Height = 33
        Caption = #20851' '#38381
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = BitBtn1Click
      end
    end
    object ProgressBar1: TProgressBar
      Left = 0
      Top = 464
      Width = 841
      Height = 41
      TabOrder = 2
    end
  end
  object OpenDialog1: TOpenDialog
    Left = 760
    Top = 24
  end
  object adodbf: TADOQuery
    CursorLocation = clUseServer
    Parameters = <>
    Left = 56
    Top = 16
  end
  object DataSourcedbf: TDataSource
    DataSet = adodbf
    Left = 56
    Top = 72
  end
end