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

📄 createunit1.dfm

📁 很好用的一个票据管理系统
💻 DFM
字号:
object CreateZtForm: TCreateZtForm
  Left = 190
  Top = 102
  Width = 483
  Height = 433
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #21019#24314#36134#22871
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -19
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = formClose
  OnCreate = Createform
  OnShow = formshow
  PixelsPerInch = 96
  TextHeight = 19
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 475
    Height = 353
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object PageControl1: TPageControl
      Left = 2
      Top = 2
      Width = 471
      Height = 349
      ActivePage = TabSheet1
      Align = alClient
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      object TabSheet1: TTabSheet
        Caption = #21333#20301#22522#26412#20449#24687
        object Label1: TLabel
          Left = 34
          Top = 35
          Width = 105
          Height = 21
          Caption = #36134#22871#32534#21495#65306
        end
        object Label2: TLabel
          Left = 33
          Top = 95
          Width = 105
          Height = 21
          Caption = #36134#22871#21517#31216#65306
        end
        object Label3: TLabel
          Left = 35
          Top = 157
          Width = 105
          Height = 21
          Caption = #24314#36134#26085#26399#65306
        end
        object Label4: TLabel
          Left = 36
          Top = 217
          Width = 105
          Height = 21
          Caption = #36134#22871#36335#24452#65306
        end
        object Label9: TLabel
          Left = 266
          Top = 37
          Width = 160
          Height = 21
          Caption = '['#19977#20301#25968#22914#65306'001]'
        end
        object Edit1: TEdit
          Left = 142
          Top = 34
          Width = 121
          Height = 29
          TabOrder = 0
          OnKeyDown = edit1keydown
          OnKeyPress = edti1keypress
        end
        object Edit2: TEdit
          Left = 141
          Top = 93
          Width = 287
          Height = 29
          TabOrder = 1
          OnKeyDown = edit2keydown
        end
        object Edit4: TEdit
          Left = 141
          Top = 214
          Width = 286
          Height = 29
          TabOrder = 2
          OnKeyDown = edit4keydown
        end
        object DateTimePicker1: TDateTimePicker
          Left = 144
          Top = 153
          Width = 186
          Height = 29
          Date = 39185.898902627320000000
          Time = 39185.898902627320000000
          DateFormat = dfLong
          TabOrder = 3
          OnChange = DateTimePicker1Change
          OnKeyDown = DateTimePicker1keydown
        end
      end
      object TabSheet2: TTabSheet
        Caption = #35774#32622#36134#22871#26085#26399
        ImageIndex = 1
        object Panel2: TPanel
          Left = 0
          Top = 49
          Width = 463
          Height = 264
          Align = alClient
          TabOrder = 0
          object StringGrid1: TStringGrid
            Left = 1
            Top = 1
            Width = 461
            Height = 262
            Align = alClient
            ColCount = 3
            RowCount = 13
            Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
            TabOrder = 0
            OnKeyDown = stringgrid1keydown
            OnSelectCell = StringGrid1SelectCell
            ColWidths = (
              64
              170
              170)
          end
          object DateTimePicker2: TDateTimePicker
            Left = 67
            Top = 25
            Width = 174
            Height = 30
            Date = 39185.932467986110000000
            Time = 39185.932467986110000000
            DateFormat = dfLong
            TabOrder = 1
            Visible = False
            OnChange = DateTimePicker2Change
          end
        end
        object Panel4: TPanel
          Left = 0
          Top = 0
          Width = 463
          Height = 49
          Align = alTop
          TabOrder = 1
          object Label8: TLabel
            Left = 216
            Top = 11
            Width = 105
            Height = 21
            Caption = #21551#21160#24180#20221#65306
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -21
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
          end
          object Label10: TLabel
            Left = 17
            Top = 11
            Width = 147
            Height = 21
            Caption = #31080#25454#21495#30721#38271#24230#65306
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -21
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
          end
          object Edit3: TEdit
            Left = 316
            Top = 8
            Width = 59
            Height = 29
            TabOrder = 0
            Text = '2006'
            OnChange = edit3Change
            OnKeyDown = edit3KeyDown
          end
          object SpinButton1: TSpinButton
            Left = 375
            Top = 8
            Width = 20
            Height = 29
            DownGlyph.Data = {
              0E010000424D0E01000000000000360000002800000009000000060000000100
              200000000000D800000000000000000000000000000000000000008080000080
              8000008080000080800000808000008080000080800000808000008080000080
              8000008080000080800000808000000000000080800000808000008080000080
              8000008080000080800000808000000000000000000000000000008080000080
              8000008080000080800000808000000000000000000000000000000000000000
              0000008080000080800000808000000000000000000000000000000000000000
              0000000000000000000000808000008080000080800000808000008080000080
              800000808000008080000080800000808000}
            FocusControl = Edit3
            TabOrder = 1
            UpGlyph.Data = {
              0E010000424D0E01000000000000360000002800000009000000060000000100
              200000000000D800000000000000000000000000000000000000008080000080
              8000008080000080800000808000008080000080800000808000008080000080
              8000000000000000000000000000000000000000000000000000000000000080
              8000008080000080800000000000000000000000000000000000000000000080
              8000008080000080800000808000008080000000000000000000000000000080
              8000008080000080800000808000008080000080800000808000000000000080
              8000008080000080800000808000008080000080800000808000008080000080
              800000808000008080000080800000808000}
            OnDownClick = Spinbutton1DownClick
            OnUpClick = Spinbutton1UpClick
          end
          object Edit8: TEdit
            Left = 155
            Top = 8
            Width = 32
            Height = 29
            TabOrder = 2
            Text = '7'
            OnKeyDown = edit8keydown
          end
          object SpinButton2: TSpinButton
            Left = 186
            Top = 8
            Width = 20
            Height = 29
            DownGlyph.Data = {
              0E010000424D0E01000000000000360000002800000009000000060000000100
              200000000000D800000000000000000000000000000000000000008080000080
              8000008080000080800000808000008080000080800000808000008080000080
              8000008080000080800000808000000000000080800000808000008080000080
              8000008080000080800000808000000000000000000000000000008080000080
              8000008080000080800000808000000000000000000000000000000000000000
              0000008080000080800000808000000000000000000000000000000000000000
              0000000000000000000000808000008080000080800000808000008080000080
              800000808000008080000080800000808000}
            FocusControl = Edit8
            TabOrder = 3
            UpGlyph.Data = {
              0E010000424D0E01000000000000360000002800000009000000060000000100
              200000000000D800000000000000000000000000000000000000008080000080
              8000008080000080800000808000008080000080800000808000008080000080
              8000000000000000000000000000000000000000000000000000000000000080
              8000008080000080800000000000000000000000000000000000000000000080
              8000008080000080800000808000008080000000000000000000000000000080
              8000008080000080800000808000008080000080800000808000000000000080
              8000008080000080800000808000008080000080800000808000008080000080
              800000808000008080000080800000808000}
            OnDownClick = SpinbuttonDownClick
            OnUpClick = SpinbuttonUpclick
          end
        end
      end
      object TabSheet3: TTabSheet
        Caption = #35774#32622#29992#25143#23494#30721
        ImageIndex = 2
        object Label5: TLabel
          Left = 75
          Top = 41
          Width = 105
          Height = 21
          Caption = #29992#25143#21517#31216#65306
        end
        object Label6: TLabel
          Left = 76
          Top = 109
          Width = 105
          Height = 21
          Caption = #29992#25143#23494#30721#65306
        end
        object Label7: TLabel
          Left = 76
          Top = 176
          Width = 105
          Height = 21
          Caption = #30830#23450#23494#30721#65306
        end
        object Edit5: TEdit
          Left = 191
          Top = 39
          Width = 156
          Height = 29
          TabOrder = 0
          OnKeyDown = edit5keydown
        end
        object Edit6: TEdit
          Left = 191
          Top = 103
          Width = 158
          Height = 29
          PasswordChar = '*'
          TabOrder = 1
          OnKeyDown = edit6keydown
        end
        object Edit7: TEdit
          Left = 192
          Top = 172
          Width = 159
          Height = 29
          PasswordChar = '*'
          TabOrder = 2
          OnKeyDown = edit7keydown
        end
      end
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 353
    Width = 475
    Height = 53
    Align = alBottom
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object BitBtn1: TBitBtn
      Left = 268
      Top = 7
      Width = 120
      Height = 39
      Caption = #21019#24314
      Default = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BitBtn1Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333330000333333333333333333333333F33333333333
        00003333344333333333333333388F3333333333000033334224333333333333
        338338F3333333330000333422224333333333333833338F3333333300003342
        222224333333333383333338F3333333000034222A22224333333338F338F333
        8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
        33333338F83338F338F33333000033A33333A222433333338333338F338F3333
        0000333333333A222433333333333338F338F33300003333333333A222433333
        333333338F338F33000033333333333A222433333333333338F338F300003333
        33333333A222433333333333338F338F00003333333333333A22433333333333
        3338F38F000033333333333333A223333333333333338F830000333333333333
        333A333333333333333338330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object BitBtn2: TBitBtn
      Left = 105
      Top = 7
      Width = 119
      Height = 39
      Cancel = True
      Caption = #20851#38381
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = BitBtn2Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333FFFFF333333000033333388888833333333333F888888FFF333
        000033338811111188333333338833FFF388FF33000033381119999111833333
        38F338888F338FF30000339119933331111833338F388333383338F300003391
        13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
        33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
        33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
        000039183811193333918338F8F833F83333838F000039118111933339118338
        F3833F83333833830000339111193333391833338F33F8333FF838F300003391
        11833338111833338F338FFFF883F83300003339111888811183333338FF3888
        83FF83330000333399111111993333333388FFFFFF8833330000333333999999
        3333333333338888883333330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
  end
end

⌨️ 快捷键说明

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