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

📄 unqkbasic.dfm

📁 资料室图书借阅管理系统
💻 DFM
📖 第 1 页 / 共 2 页
字号:
    Top = 504
    Width = 60
    Height = 33
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    ButtonType = btButton
    Caption = #30830' '#23450
    Color = clWebSTEELBLUE
    DoSubmitValidation = True
    Font.Color = clCream
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWButton3'
    ScriptEvents = <>
    TabOrder = 0
    OnClick = IWButton3Click
  end
  object IWButton4: TIWButton
    Left = 180
    Top = 504
    Width = 60
    Height = 33
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    ButtonType = btButton
    Caption = #21462' '#28040
    Color = clWebSTEELBLUE
    DoSubmitValidation = True
    Font.Color = clCream
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWButton4'
    ScriptEvents = <>
    TabOrder = 0
    OnClick = IWButton4Click
  end
  object IWButton5: TIWButton
    Left = 271
    Top = 504
    Width = 60
    Height = 33
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    ButtonType = btButton
    Caption = #19978#19968#26465
    Color = clWebSTEELBLUE
    DoSubmitValidation = True
    Font.Color = clCream
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWButton5'
    ScriptEvents = <>
    TabOrder = 0
    OnClick = IWButton5Click
  end
  object IWButton6: TIWButton
    Left = 333
    Top = 504
    Width = 60
    Height = 33
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    ButtonType = btButton
    Caption = #19979#19968#26465
    Color = clWebSTEELBLUE
    DoSubmitValidation = True
    Font.Color = clCream
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWButton6'
    ScriptEvents = <>
    TabOrder = 0
    OnClick = IWButton6Click
  end
  object IWEdit1: TIWEdit
    Left = 86
    Top = 344
    Width = 335
    Height = 21
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    Alignment = taLeftJustify
    BGColor = clNone
    FocusColor = clNone
    DoSubmitValidation = True
    Editable = True
    Font.Color = clNone
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWEdit1'
    MaxLength = 0
    ReadOnly = False
    Required = False
    ScriptEvents = <>
    TabOrder = 0
    PasswordPrompt = False
    Text = ' '
  end
  object IWEdit2: TIWEdit
    Left = 538
    Top = 368
    Width = 240
    Height = 21
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    Alignment = taLeftJustify
    BGColor = clNone
    FocusColor = clNone
    DoSubmitValidation = True
    Editable = True
    Font.Color = clNone
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWEdit2'
    MaxLength = 0
    ReadOnly = False
    Required = False
    ScriptEvents = <>
    TabOrder = 3
    PasswordPrompt = False
    Text = ' '
  end
  object IWEdit3: TIWEdit
    Left = 86
    Top = 368
    Width = 335
    Height = 21
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    Alignment = taLeftJustify
    BGColor = clNone
    FocusColor = clNone
    DoSubmitValidation = True
    Editable = True
    Font.Color = clNone
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWEdit3'
    MaxLength = 0
    ReadOnly = False
    Required = False
    ScriptEvents = <>
    TabOrder = 2
    PasswordPrompt = False
    Text = ' '
  end
  object IWMemo1: TIWMemo
    Left = 22
    Top = 424
    Width = 757
    Height = 65
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    BGColor = clWebWHITE
    Editable = True
    Font.Color = clNone
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    ScriptEvents = <>
    InvisibleBorder = False
    HorizScrollBar = False
    VertScrollBar = True
    Required = False
    TabOrder = 4
    FriendlyName = 'IWMemo1'
  end
  object IWButton9: TIWButton
    Left = 662
    Top = 550
    Width = 121
    Height = 33
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    ButtonType = btButton
    Caption = #24405' '#20837' '#26399' '#21002
    Color = clWebSTEELBLUE
    DoSubmitValidation = True
    Font.Color = clCream
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWButton9'
    ScriptEvents = <>
    TabOrder = 0
    OnClick = IWButton9Click
  end
  object IWComboBox2: TIWComboBox
    Left = 538
    Top = 339
    Width = 240
    Height = 21
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    BGColor = clNone
    Font.Color = clNone
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FocusColor = clNone
    AutoHideOnMenuActivation = False
    ItemsHaveValues = False
    NoSelectionText = '-- '#20854#23427'--'
    Required = False
    RequireSelection = True
    ScriptEvents = <>
    UseSize = True
    DoSubmitValidation = True
    Editable = True
    TabOrder = 1
    ItemIndex = 0
    Items.Strings = (
      #26376#21002
      #21608#21002
      #26092#21002
      #21322#26376#21002
      #23395#21002
      #19981#23450#26399
      #20854#23427)
    Sorted = False
    FriendlyName = 'IWComboBox2'
  end
  object btnfirst: TIWButton
    Left = 434
    Top = 506
    Width = 60
    Height = 33
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    ButtonType = btButton
    Caption = #31532#19968#39029
    Color = clWebSTEELBLUE
    DoSubmitValidation = True
    Font.Color = clCream
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'btnfirst'
    ScriptEvents = <>
    TabOrder = 0
    OnClick = btnfirstClick
  end
  object btnlast: TIWButton
    Left = 617
    Top = 506
    Width = 60
    Height = 33
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    ButtonType = btButton
    Caption = #26368#23614#39029
    Color = clWebSTEELBLUE
    DoSubmitValidation = True
    Font.Color = clCream
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'btnlast'
    ScriptEvents = <>
    TabOrder = 0
    OnClick = btnlastClick
  end
  object btnprior: TIWButton
    Left = 495
    Top = 506
    Width = 60
    Height = 33
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    ButtonType = btButton
    Caption = #19978#19968#39029
    Color = clWebSTEELBLUE
    DoSubmitValidation = True
    Font.Color = clCream
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWButton7'
    ScriptEvents = <>
    TabOrder = 0
    OnClick = btnpriorClick
  end
  object btnnext: TIWButton
    Left = 555
    Top = 506
    Width = 60
    Height = 33
    Cursor = crAuto
    IW50Hint = False
    ParentShowHint = False
    ShowHint = True
    ZIndex = 0
    RenderSize = True
    ButtonType = btButton
    Caption = #19979#19968#39029
    Color = clWebSTEELBLUE
    DoSubmitValidation = True
    Font.Color = clCream
    Font.Enabled = True
    Font.Size = 10
    Font.Style = []
    FriendlyName = 'IWButton8'
    ScriptEvents = <>
    TabOrder = 0
    OnClick = btnnextClick
  end
  inline IWFrame11: TIWFrame1
    Left = 0
    Top = 0
    Width = 800
    Height = 34
    Align = alTop
    TabOrder = 0
    inherited IWMenu1: TIWMenu
      Width = 800
    end
  end
  object ADOQuery1: TADOQuery
    CursorType = ctStatic
    AfterScroll = ADOQuery1AfterScroll
    Parameters = <>
    SQL.Strings = (
      
        'SELECT Journalbasic.Name, Journalbasic.yfdh, Journalbasic.publis' +
        'h, Journalbasic.type, Journalbasic.Memo'
      'FROM Journalbasic')
    Left = 598
    Top = 54
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 638
    Top = 54
  end
end

⌨️ 快捷键说明

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