?? paymentbase.dfm

?? Barcode And LabelPrint
?? DFM
字號:
inherited frmPaymentBase: TfrmPaymentBase
  Left = 170
  Top = 101
  Caption = #24448#26469#27454#21333#25454#30340#22522#31867
  OldCreateOrder = True
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object ToolBar: TToolBar
    Left = 0
    Top = 0
    Width = 536
    Height = 38
    AutoSize = True
    ButtonHeight = 36
    ButtonWidth = 33
    Caption = 'ToolBar'
    Flat = True
    Images = frmMain.ToolButtonImages
    ShowCaptions = True
    TabOrder = 0
    Wrapable = False
    object tbtNew: TToolButton
      Left = 0
      Top = 0
      Action = acNew
      AutoSize = True
    end
    object tbtModify: TToolButton
      Left = 37
      Top = 0
      Action = acModify
      AutoSize = True
    end
    object tbtDelete: TToolButton
      Left = 74
      Top = 0
      Action = acDelete
      AutoSize = True
    end
    object tbtDivider1: TToolButton
      Left = 111
      Top = 0
      Width = 9
      Caption = 'tbtDivider1'
      ImageIndex = 3
      Style = tbsDivider
    end
    object tbtFirst: TToolButton
      Left = 120
      Top = 0
      Action = acFirst
      AutoSize = True
    end
    object tbtPrior: TToolButton
      Left = 157
      Top = 0
      Action = acPrior
      AutoSize = True
    end
    object tbtNext: TToolButton
      Left = 194
      Top = 0
      Action = acNext
      AutoSize = True
    end
    object tbtLast: TToolButton
      Left = 231
      Top = 0
      Action = acLast
      AutoSize = True
    end
    object tbtDivider: TToolButton
      Left = 268
      Top = 0
      Width = 8
      Caption = 'tbtDivider'
      ImageIndex = 8
      Style = tbsDivider
    end
    object ToolButton1: TToolButton
      Left = 276
      Top = 0
      Action = acConfirm
    end
    object ToolButton3: TToolButton
      Left = 309
      Top = 0
      Width = 9
      Caption = 'ToolButton3'
      ImageIndex = 0
      Style = tbsDivider
    end
    object tbtSave: TToolButton
      Left = 318
      Top = 0
      Action = acSave
      AutoSize = True
    end
    object tbtCancel: TToolButton
      Left = 355
      Top = 0
      Action = acCancel
      AutoSize = True
    end
    object ToolButton5: TToolButton
      Left = 392
      Top = 0
      Action = acPrint
    end
    object tbtFind: TToolButton
      Left = 425
      Top = 0
      Action = acFind
      AutoSize = True
    end
    object tbtDivider3: TToolButton
      Left = 462
      Top = 0
      Width = 8
      Caption = 'tbtDivider3'
      ImageIndex = 12
      Style = tbsDivider
    end
    object tbtExit: TToolButton
      Left = 470
      Top = 0
      Action = acExit
      AutoSize = True
    end
  end
  object pnlTop: TPanel
    Left = 0
    Top = 38
    Width = 536
    Height = 310
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 1
    object lblSubmit: TLabel
      Left = 40
      Top = 8
      Width = 58
      Height = 13
      Caption = '*'#24050#23457#26680'*'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lblBillCaption: TLabel
      Left = 208
      Top = 8
      Width = 82
      Height = 19
      Caption = #21333' '#25454' '#21517
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -19
      Font.Name = #23435#20307
      Font.Style = [fsBold, fsUnderline]
      ParentFont = False
    end
    object lblNO: TLabel
      Left = 366
      Top = 21
      Width = 45
      Height = 15
      Alignment = taRightJustify
      Caption = #21333#21495#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object dbtxtNo: TDBText
      Left = 409
      Top = 19
      Width = 104
      Height = 14
      DataField = 'fNO'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold, fsUnderline]
      ParentFont = False
    end
    object lblMaker: TLabel
      Left = 77
      Top = 261
      Width = 60
      Height = 12
      Alignment = taRightJustify
      Caption = #21046' '#21333' '#20154#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lblSubmitUser: TLabel
      Left = 317
      Top = 261
      Width = 60
      Height = 12
      Alignment = taRightJustify
      Caption = #23457' '#26680' '#20154#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lblDate: TLabel
      Left = 77
      Top = 240
      Width = 60
      Height = 12
      Alignment = taRightJustify
      Caption = #21046#21333#26085#26399#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lblSubmitDate: TLabel
      Left = 317
      Top = 240
      Width = 60
      Height = 12
      Alignment = taRightJustify
      Caption = #23457#26680#26085#26399#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object wwDBEdtMaker: TwwDBEdit
      Left = 136
      Top = 255
      Width = 89
      Height = 18
      BorderStyle = bsNone
      DataField = 'fMaker'
      DataSource = dsMaster
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Frame.Enabled = True
      Frame.NonFocusBorders = [efLeftBorder, efTopBorder, efRightBorder, efBottomBorder]
      Frame.NonFocusStyle = efsFrameSingle
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdtSubmitUser: TwwDBEdit
      Left = 376
      Top = 255
      Width = 89
      Height = 18
      BorderStyle = bsNone
      DataField = 'fSubmitUser'
      DataSource = dsMaster
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Frame.Enabled = True
      Frame.NonFocusBorders = [efLeftBorder, efTopBorder, efRightBorder, efBottomBorder]
      Frame.NonFocusStyle = efsFrameSingle
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwPKDate: TwwDBDateTimePicker
      Left = 136
      Top = 234
      Width = 89
      Height = 20
      BorderStyle = bsNone
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      DataField = 'fDate'
      DataSource = dsMaster
      Epoch = 1950
      ButtonEffects.Transparent = True
      ButtonEffects.Flat = True
      Frame.Enabled = True
      Frame.NonFocusBorders = [efLeftBorder, efTopBorder, efRightBorder, efBottomBorder]
      Frame.FocusStyle = efsFrameSingle
      Frame.NonFocusStyle = efsFrameSingle
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      ShowButton = True
      TabOrder = 2
    end
    object wwPKSubmitDate: TwwDBDateTimePicker
      Left = 376
      Top = 234
      Width = 89
      Height = 20
      BorderStyle = bsNone
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      DataField = 'fSubmitDate'
      DataSource = dsMaster
      Epoch = 1950
      ButtonEffects.Transparent = True
      ButtonEffects.Flat = True
      Frame.Enabled = True
      Frame.NonFocusBorders = [efLeftBorder, efTopBorder, efRightBorder, efBottomBorder]
      Frame.FocusStyle = efsFrameSingle
      Frame.NonFocusStyle = efsFrameSingle
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      ShowButton = True
      TabOrder = 3
    end
  end
  object ALToolbar: TActionList
    Images = frmMain.ToolButtonImages
    Left = 472
    Top = 40
    object acNew: TAction
      Caption = #26032#24314
      Hint = #26032#24314#21333#25454
      ImageIndex = 0
      ShortCut = 16429
      OnExecute = acNewExecute
    end
    object acModify: TAction
      Caption = #32534#36753
      Hint = #32534#36753
      ImageIndex = 15
      ShortCut = 16453
      OnExecute = acModifyExecute
    end
    object acDelete: TAction
      Caption = #21024#38500
      Hint = #21024#38500#21333#25454
      ImageIndex = 16
      ShortCut = 16430
      OnExecute = acDeleteExecute
    end
    object acSave: TAction
      Caption = #20445#23384
      Hint = #20445#23384
      ImageIndex = 4
      ShortCut = 16467
      OnExecute = acSaveExecute
    end
    object acCancel: TAction
      Caption = #21462#28040
      Hint = #21462#28040
      ImageIndex = 5
      ShortCut = 16392
      OnExecute = acCancelExecute
    end
    object acFirst: TAction
      Caption = #39318#24352
      Hint = #39318#24352
      ImageIndex = 8
      ShortCut = 113
      OnExecute = acFirstExecute
    end
    object acPrior: TAction
      Caption = #19978#24352
      Hint = #19978#24352
      ImageIndex = 9
      ShortCut = 114
      OnExecute = acPriorExecute
    end
    object acNext: TAction
      Caption = #19979#24352
      Hint = #19979#24352
      ImageIndex = 10
      ShortCut = 115
      OnExecute = acNextExecute
    end
    object acLast: TAction
      Caption = #26411#24352
      Hint = #26411#24352
      ImageIndex = 11
      ShortCut = 116
      OnExecute = acLastExecute
    end
    object acFind: TAction
      Caption = #26597#25214
      Hint = #26597#25214
      ImageIndex = 14
      ShortCut = 16454
    end
    object acPrint: TAction
      Caption = #25171#21360
      Hint = #25171#21360
      ImageIndex = 3
      ShortCut = 16464
    end
    object acExit: TAction
      Caption = #20851#38381
      Hint = #20851#38381
      ImageIndex = 20
      ShortCut = 16465
      OnExecute = acExitExecute
    end
    object acConfirm: TAction
      Caption = #23457#26680
      Hint = #23457#26680
      ImageIndex = 7
      OnExecute = acConfirmExecute
    end
  end
  object spGetInNumber: TADOStoredProc
    Connection = dmClient.adocnClothing
    ProcedureName = 'pGetInNumber;1'
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
        Value = Null
      end
      item
        Name = '@BillType'
        Attributes = [paNullable]
        DataType = ftInteger
        Precision = 10
        Value = Null
      end
      item
        Name = '@InNumber'
        Attributes = [paNullable]
        DataType = ftInteger
        Direction = pdOutput
        Precision = 10
        Value = Null
      end>
    Left = 472
    Top = 72
  end
  object spGetOutNumber: TADOStoredProc
    Connection = dmClient.adocnClothing
    ProcedureName = 'pGetOutNumber;1'
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
        Value = Null
      end
      item
        Name = '@BillType'
        Attributes = [paNullable]
        DataType = ftInteger
        Precision = 10
        Value = Null
      end
      item
        Name = '@OutNumber'
        Attributes = [paNullable]
        DataType = ftFixedChar
        Direction = pdOutput
        Size = 50
        Value = Null
      end>
    Left = 504
    Top = 72
  end
  object QMaster: TADOQuery
    Connection = dmClient.adocnClothing
    AfterInsert = QMasterAfterInsert
    BeforePost = QMasterBeforePost
    AfterPost = QMasterAfterPost
    BeforeDelete = QMasterBeforeDelete
    AfterDelete = QMasterAfterPost
    OnDeleteError = QMasterDeleteError
    OnPostError = QMasterPostError
    Parameters = <>
    Left = 416
    Top = 80
  end
  object dsMaster: TDataSource
    AutoEdit = False
    DataSet = QMaster
    OnStateChange = dsMasterStateChange
    OnDataChange = dsMasterDataChange
    Left = 432
    Top = 88
  end
end
?? 文件大小 22800 K
?? 上傳用戶 LotusAwhaT
?? 所屬分類 SQL Server
??? 相關標簽

#LabelPrint #Barcode #And
?? 快捷鍵說明

復制代碼 Ctrl + C
搜索代碼 Ctrl + F
全屏模式 F11
切換主題 Ctrl + Shift + D
顯示快捷鍵 ?
增大字號 Ctrl + =
減小字號 Ctrl + -
亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频

?? paymentbase.dfm

?? 快捷鍵說明
