tswh_form.dfm

来自「本系统实现了一个图书销售管理系统」· DFM 代码 · 共 475 行

DFM
475 行
字号 
object TSWH_F: TTSWH_F
  Left = 371
  Top = 115
  ActiveControl = XG_FRBtn
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #22270#20070#32500#25252
  ClientHeight = 524
  ClientWidth = 300
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100001000400E80200001600000028000000200000004000
    0000010004000000000000000000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000011000000000000000000000000000001371000000000000000000000000
    0000133F10000000000000000000000000013773F10000000000000000000000
    0017373F3F1000000000000000000000001373F3F3F110000000000000000000
    01373FFF3F3F3110000000000000000017373FFFF3F3F7311000000000000000
    1373FFBFFF3F33F73310000000000001373FF8FFFFF3F733F731100000000017
    373FFF8FFFFF33F7373371100000001373FFF8F8FFFFFF33F377337110000137
    37BFFF8000FFFFBF33337733711007373FFFFFF76E000FFF37BF337733717373
    BF787FFFF6EF60F37FFFBF337733373FF77787FFFF6E6007FFBFFFBF3377373F
    7F877887FFF60000BFFFBFFFBF3373FFF8778F78FFFF00C40FBFFFBFFFB83FF8
    7F87F87878FF346C40FFBFFFBF803FF78778888788883F46C40FFFBFF80008BF
    787F777787137FF46C40BFFF8000008FF77778787837FFBF46C40FB800000008
    BF78F738813FBFFFB46C4080000000008FFF788783BFFFBFFF46C40000000000
    08BFFF783FFFBFFFBFF46C40000000000088FF788FBFFFBFFFB846C400000000
    00008880088FBFFFBF80046C400000000000000000088FBFF8000046C4000000
    000000000000088F80000004640000000000000000000008000000004440FF9F
    FFFFFF8FFFFFFF07FFFFFE03FFFFFE01FFFFFC00FFFFF8007FFFF8001FFFF000
    07FFE00001FFE000007FC000001F800000078000000100000000000000000000
    0000000000000000000000000000000000010000000380000007C000000FE000
    001FF000001FF800000FFC000007FF180183FFFE03C1FFFF87E1FFFFEFF1}
  OldCreateOrder = False
  Position = poDesktopCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object TSWH_PC: TPageControl
    Left = 0
    Top = 0
    Width = 297
    Height = 521
    ActivePage = TSXGSC_TS
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnChange = TSWH_PCChange
    object TSXGSC_TS: TTabSheet
      Caption = #22270#20070#20462#25913#21024#38500
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      object FlatGroupBox1: TFlatGroupBox
        Left = 0
        Top = 16
        Width = 289
        Height = 57
        Caption = #22270#20070#35760#24405#26597#35810#65306
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        ColorBorder = clMaroon
        object Label16: TLabel
          Left = 8
          Top = 24
          Width = 60
          Height = 12
          Caption = #22270#20070#32534#21495#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object DWBH_FE: TFlatEdit
          Left = 72
          Top = 24
          Width = 121
          Height = 18
          ColorBorder = clMaroon
          ColorFlat = clBtnFace
          ParentColor = True
          MaxLength = 13
          TabOrder = 0
        end
        object DW_FBtn: TFlatButton
          Left = 200
          Top = 24
          Width = 65
          Height = 17
          ColorFocused = clSkyBlue
          ColorBorder = clMaroon
          Caption = #26597#35810
          TabOrder = 1
          OnClick = DW_FBtnClick
        end
      end
      object FlatGroupBox2: TFlatGroupBox
        Left = 0
        Top = 88
        Width = 289
        Height = 305
        Caption = #22270#20070#20449#24687#65306
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        ColorBorder = clMaroon
        object Label1: TLabel
          Left = 32
          Top = 24
          Width = 60
          Height = 12
          Caption = #32534'    '#21495#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label3: TLabel
          Left = 32
          Top = 56
          Width = 60
          Height = 12
          Caption = #20070'    '#21517#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label5: TLabel
          Left = 32
          Top = 88
          Width = 60
          Height = 12
          Caption = #20316'    '#32773#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label7: TLabel
          Left = 32
          Top = 120
          Width = 60
          Height = 12
          Caption = #31867'    '#21035#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label8: TLabel
          Left = 32
          Top = 152
          Width = 60
          Height = 12
          Caption = #20986#29256#26085#26399#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label9: TLabel
          Left = 32
          Top = 248
          Width = 60
          Height = 12
          Caption = #20986' '#29256' '#31038#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label10: TLabel
          Left = 32
          Top = 184
          Width = 60
          Height = 12
          Caption = #23450'    '#20215#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label11: TLabel
          Left = 28
          Top = 280
          Width = 66
          Height = 12
          Caption = ' '#25968'    '#37327#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label12: TLabel
          Left = 32
          Top = 216
          Width = 60
          Height = 12
          Caption = #22791'    '#27880#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object BH_FE: TFlatEdit
          Left = 103
          Top = 21
          Width = 170
          Height = 18
          ColorBorder = clMaroon
          ColorFlat = clBtnFace
          ParentColor = True
          Enabled = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          MaxLength = 13
          ParentFont = False
          TabOrder = 0
        end
        object SM_FE: TFlatEdit
          Left = 103
          Top = 52
          Width = 170
          Height = 18
          ColorBorder = clMaroon
          ColorFlat = clBtnFace
          ParentColor = True
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
        object ZZ_FE: TFlatEdit
          Left = 103
          Top = 83
          Width = 170
          Height = 18
          ColorBorder = clMaroon
          ColorFlat = clBtnFace
          ParentColor = True
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 2
        end
        object LB_FCB: TFlatComboBox
          Left = 104
          Top = 114
          Width = 169
          Height = 20
          Style = csDropDownList
          Color = clWindow
          ColorBorder = clMaroon
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ItemHeight = 12
          ParentFont = False
          TabOrder = 3
          ItemIndex = -1
        end
        object CBRQ_FE: TFlatEdit
          Left = 104
          Top = 149
          Width = 169
          Height = 18
          ColorBorder = clMaroon
          ColorFlat = clBtnFace
          ParentColor = True
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 4
        end
        object CBS_FE: TFlatEdit
          Left = 104
          Top = 245
          Width = 169
          Height = 18
          ColorBorder = clMaroon
          ColorFlat = clBtnFace
          ParentColor = True
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 5
        end
        object DJ_FE: TFlatEdit
          Left = 104
          Top = 181
          Width = 169
          Height = 18
          ColorBorder = clMaroon
          ColorFlat = clBtnFace
          ParentColor = True
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 6
        end
        object SL_FE: TFlatEdit
          Left = 104
          Top = 277
          Width = 169
          Height = 18
          ColorBorder = clMaroon
          ColorFlat = clBtnFace
          ParentColor = True
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 7
        end
        object BZ_FM: TFlatMemo
          Left = 104
          Top = 213
          Width = 169
          Height = 20
          ColorBorder = clMaroon
          ColorFlat = clBtnFace
          ParentColor = True
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 8
        end
      end
      object FlatGroupBox3: TFlatGroupBox
        Left = 0
        Top = 408
        Width = 289
        Height = 81
        Caption = #25805#20316#65306
        TabOrder = 2
        ColorBorder = clMaroon
        object FlatGroupBox4: TFlatGroupBox
          Left = 16
          Top = 24
          Width = 81
          Height = 33
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          ColorBorder = clMaroon
          object XG_FRBtn: TFlatRadioButton
            Left = 16
            Top = 9
            Width = 49
            Height = 17
            Caption = #20462#25913
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 0
          end
        end
        object ZX_FBtn: TFlatButton
          Left = 104
          Top = 24
          Width = 81
          Height = 33
          ColorFocused = clSkyBlue
          ColorBorder = clMaroon
          Caption = #25191#34892
          Enabled = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          OnClick = ZX_FBtnClick
        end
      end
    end
  end
  object Close_Btn: TButton
    Left = 200
    Top = 456
    Width = 89
    Height = 33
    Caption = #20851#38381
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = Close_BtnClick
  end
end

tswh_form.dfm - 源码说明

本页面展示了「本系统实现了一个图书销售管理系统」中的 tswh_form.dfm 源码文件，采用 DFM 编程语言编写，共 475 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与图书相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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