updataztunit.dfm

很好用的一个票据管理系统

object updataForm: TupdataForm
  Left = 182
  Top = 105
  Width = 528
  Height = 432
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #20462#25913#36134#22871
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel3: TPanel
    Left = 0
    Top = 352
    Width = 520
    Height = 53
    Align = alBottom
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object BitBtn1: TBitBtn
      Left = 276
      Top = 7
      Width = 120
      Height = 39
      Caption = #30830#23450
      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 = 124
      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
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 520
    Height = 352
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object PageControl1: TPageControl
      Left = 2
      Top = 2
      Width = 516
      Height = 348
      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 = 43
          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 Label4: TLabel
          Left = 28
          Top = 201
          Width = 105
          Height = 21
          Caption = #36134#22871#36335#24452#65306
        end
        object Label3: TLabel
          Left = 32
          Top = 147
          Width = 105
          Height = 21
          Caption = #20462#25913#24180#20221#65306
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -21
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label6: TLabel
          Left = 25
          Top = 245
          Width = 189
          Height = 21
          Caption = #20462#25913#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 Edit2: TEdit
          Left = 141
          Top = 93
          Width = 287
          Height = 29
          TabOrder = 0
        end
        object Edit4: TEdit
          Left = 141
          Top = 198
          Width = 286
          Height = 29
          TabOrder = 1
        end
        object ComboBox1: TComboBox
          Left = 142
          Top = 42
          Width = 121
          Height = 29
          ItemHeight = 21
          TabOrder = 2
          OnChange = ComboBox1Change
        end
        object Edit3: TEdit
          Left = 141
          Top = 144
          Width = 69
          Height = 29
          TabOrder = 3
          Text = '2006'
          OnChange = Edit3Change
        end
        object SpinButton1: TSpinButton
          Left = 208
          Top = 145
          Width = 20
          Height = 29
          DownGlyph.Data = {
            0E010000424D0E01000000000000360000002800000009000000060000000100
            200000000000D800000000000000000000000000000000000000008080000080
            8000008080000080800000808000008080000080800000808000008080000080
            8000008080000080800000808000000000000080800000808000008080000080
            8000008080000080800000808000000000000000000000000000008080000080
            8000008080000080800000808000000000000000000000000000000000000000
            0000008080000080800000808000000000000000000000000000000000000000
            0000000000000000000000808000008080000080800000808000008080000080
            800000808000008080000080800000808000}
          FocusControl = Edit3
          TabOrder = 4
          UpGlyph.Data = {
            0E010000424D0E01000000000000360000002800000009000000060000000100
            200000000000D800000000000000000000000000000000000000008080000080
            8000008080000080800000808000008080000080800000808000008080000080
            8000000000000000000000000000000000000000000000000000000000000080
            8000008080000080800000000000000000000000000000000000000000000080
            8000008080000080800000808000008080000000000000000000000000000080
            8000008080000080800000808000008080000080800000808000000000000080
            8000008080000080800000808000008080000080800000808000008080000080
            800000808000008080000080800000808000}
          OnDownClick = spinbutton1downclick
          OnUpClick = spinbutton1upclick
        end
        object Edit1: TEdit
          Left = 211
          Top = 240
          Width = 45
          Height = 29
          TabOrder = 5
          Text = '7'
        end
        object SpinButton2: TSpinButton
          Left = 255
          Top = 241
          Width = 20
          Height = 29
          DownGlyph.Data = {
            0E010000424D0E01000000000000360000002800000009000000060000000100
            200000000000D800000000000000000000000000000000000000008080000080
            8000008080000080800000808000008080000080800000808000008080000080
            8000008080000080800000808000000000000080800000808000008080000080
            8000008080000080800000808000000000000000000000000000008080000080
            8000008080000080800000808000000000000000000000000000000000000000
            0000008080000080800000808000000000000000000000000000000000000000
            0000000000000000000000808000008080000080800000808000008080000080
            800000808000008080000080800000808000}
          FocusControl = Edit1
          TabOrder = 6
          UpGlyph.Data = {
            0E010000424D0E01000000000000360000002800000009000000060000000100
            200000000000D800000000000000000000000000000000000000008080000080
            8000008080000080800000808000008080000080800000808000008080000080
            8000000000000000000000000000000000000000000000000000000000000080
            8000008080000080800000000000000000000000000000000000000000000080
            8000008080000080800000808000008080000000000000000000000000000080
            8000008080000080800000808000008080000080800000808000000000000080
            8000008080000080800000808000008080000080800000808000008080000080
            800000808000008080000080800000808000}
          OnDownClick = spinbutton2DownClick
          OnUpClick = spinbutton2UpClick
        end
      end
      object TabSheet2: TTabSheet
        Caption = #20462#25913#36134#22871#26085#26399
        ImageIndex = 1
        object Panel2: TPanel
          Left = 0
          Top = 0
          Width = 508
          Height = 312
          Align = alClient
          TabOrder = 0
          object StringGrid1: TStringGrid
            Left = 1
            Top = 1
            Width = 506
            Height = 310
            Align = alClient
            ColCount = 3
            RowCount = 13
            Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
            TabOrder = 0
            OnSelectCell = strubggrud1sekectcell
            ColWidths = (
              64
              170
              170)
            RowHeights = (
              24
              24
              24
              24
              24
              24
              24
              24
              24
              24
              24
              24
              24)
          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 = stringgridchange
          end
        end
      end
      object TabSheet3: TTabSheet
        Caption = #20462#25913#29992#25143#23494#30721
        ImageIndex = 2
        object Label5: TLabel
          Left = 70
          Top = 65
          Width = 105
          Height = 21
          Caption = #29992#25143#21517#31216#65306
        end
        object Label7: TLabel
          Left = 68
          Top = 128
          Width = 105
          Height = 21
          Caption = #20462#25913#23494#30721#65306
        end
        object Edit5: TEdit
          Left = 191
          Top = 63
          Width = 156
          Height = 29
          TabOrder = 0
        end
        object Edit6: TEdit
          Left = 191
          Top = 127
          Width = 158
          Height = 29
          PasswordChar = '*'
          TabOrder = 1
        end
      end
    end
  end
end