borrowbooks.dfm

来自「好多上载非界面和非WEB源码」· DFM 代码 · 共 290 行

object borrowfrm: Tborrowfrm
  Left = 240
  Top = 129
  Width = 794
  Height = 406
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #22270#20070#20511#38405
  Color = clSkyBlue
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 8
    Top = 0
    Width = 769
    Height = 337
    ActivePage = TabSheet3
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #26032#20070#25512#33616
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 761
        Height = 265
        Align = alTop
        BevelInner = bvLowered
        Color = clSkyBlue
        TabOrder = 0
        object Label1: TLabel
          Left = 16
          Top = 232
          Width = 153
          Height = 17
          AutoSize = False
        end
        object ListView1: TListView
          Left = 16
          Top = 16
          Width = 737
          Height = 209
          Color = clInfoBk
          Columns = <
            item
              AutoSize = True
              Caption = #22270#20070#32534#21495
            end
            item
              AutoSize = True
              Caption = #20070#21517
            end
            item
              AutoSize = True
              Caption = #20316#32773
            end
            item
              AutoSize = True
              Caption = #20986#29256#31038
            end
            item
              AutoSize = True
              Caption = #31867#21035
            end
            item
              AutoSize = True
              Caption = #26159#21542#20511#20986
            end>
          GridLines = True
          ReadOnly = True
          RowSelect = True
          TabOrder = 0
          ViewStyle = vsReport
        end
      end
      object BitBtn1: TBitBtn
        Left = 640
        Top = 272
        Width = 97
        Height = 33
        Caption = #20511#38405#36825#26412#20070
        TabOrder = 1
        OnClick = BitBtn1Click
      end
    end
    object TabSheet2: TTabSheet
      Caption = #20511#38405#25490#34892#27036
      ImageIndex = 1
      OnShow = TabSheet2Show
      object Panel2: TPanel
        Left = 0
        Top = 0
        Width = 761
        Height = 265
        Align = alTop
        BevelInner = bvLowered
        Color = clSkyBlue
        TabOrder = 0
        object Label2: TLabel
          Left = 16
          Top = 232
          Width = 145
          Height = 17
          AutoSize = False
          Color = clSkyBlue
          ParentColor = False
        end
        object ListView2: TListView
          Left = 16
          Top = 16
          Width = 737
          Height = 209
          Color = clInfoBk
          Columns = <
            item
              AutoSize = True
              Caption = #22270#20070#32534#21495
            end
            item
              AutoSize = True
              Caption = #20070#21517
            end
            item
              AutoSize = True
              Caption = #20316#32773
            end
            item
              AutoSize = True
              Caption = #20986#29256#31038
            end
            item
              AutoSize = True
              Caption = #20511#38405#27425#25968
            end
            item
              AutoSize = True
              Caption = #26159#21542#20511#20986
            end>
          GridLines = True
          ReadOnly = True
          RowSelect = True
          TabOrder = 0
          ViewStyle = vsReport
        end
      end
      object BitBtn3: TBitBtn
        Left = 640
        Top = 272
        Width = 97
        Height = 33
        Caption = #20511#38405#36825#26412#20070
        TabOrder = 1
        OnClick = BitBtn3Click
      end
    end
    object TabSheet3: TTabSheet
      Caption = #19968#33324#22270#20070#20511#38405
      ImageIndex = 2
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 761
        Height = 265
        Align = alTop
        BevelInner = bvLowered
        Color = clSkyBlue
        TabOrder = 0
        object Label4: TLabel
          Left = 16
          Top = 232
          Width = 97
          Height = 25
          AutoSize = False
        end
        object Panel4: TPanel
          Left = 2
          Top = 2
          Width = 757
          Height = 71
          Align = alTop
          BevelInner = bvLowered
          Color = clSkyBlue
          TabOrder = 0
          object Label3: TLabel
            Left = 16
            Top = 32
            Width = 57
            Height = 25
            AutoSize = False
            Caption = #36755#20837#65306
          end
          object r1: TRadioButton
            Left = 16
            Top = 8
            Width = 113
            Height = 25
            Caption = #25353#22270#20070#32534#21495
            TabOrder = 0
          end
          object r2: TRadioButton
            Left = 152
            Top = 8
            Width = 89
            Height = 25
            Caption = #25353#20070#21517
            TabOrder = 1
          end
          object valuebox: TEdit
            Left = 56
            Top = 32
            Width = 441
            Height = 21
            TabOrder = 2
          end
          object BitBtn4: TBitBtn
            Left = 528
            Top = 32
            Width = 89
            Height = 25
            Caption = #26597'       '#35810
            TabOrder = 3
            OnClick = BitBtn4Click
          end
        end
        object ListView3: TListView
          Left = 16
          Top = 80
          Width = 737
          Height = 145
          Color = clInfoBk
          Columns = <
            item
              AutoSize = True
              Caption = #22270#20070#32534#21495
            end
            item
              AutoSize = True
              Caption = #20070#21517
            end
            item
              AutoSize = True
              Caption = #20316#32773
            end
            item
              AutoSize = True
              Caption = #20986#29256#31038
            end
            item
              AutoSize = True
              Caption = #31867#21035
            end
            item
              AutoSize = True
              Caption = #26159#21542#20511#20986
            end>
          GridLines = True
          ReadOnly = True
          RowSelect = True
          TabOrder = 1
          ViewStyle = vsReport
        end
      end
      object BitBtn5: TBitBtn
        Left = 640
        Top = 272
        Width = 97
        Height = 33
        Caption = #20511#38405#36825#26412#20070
        TabOrder = 1
        OnClick = BitBtn5Click
      end
    end
  end
  object BitBtn2: TBitBtn
    Left = 352
    Top = 344
    Width = 81
    Height = 33
    Caption = #20851#38381
    TabOrder = 1
    Kind = bkClose
  end
end