yk.dfm

详细说明:毕业论文中关于小型宾馆管理系统的详细设计毕 业论文中关于小型宾馆...一个酒店管理系统VB+Access [学生学籍管理系统(VB+Acess).zip] - !这个是刚刚编的毕业设计,可能

        Caption = '用款报告'
        object g0: TGroupBox
          Left = 0
          Top = 0
          Width = 566
          Height = 417
          Align = alClient
          TabOrder = 0
          object Label2: TLabel
            Left = 148
            Top = 20
            Width = 221
            Height = 20
            Caption = '玄武饭店-用款申请报告'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -20
            Font.Name = '黑体'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object Label5: TLabel
            Left = 404
            Top = 21
            Width = 33
            Height = 20
            Caption = 'NO.'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -20
            Font.Name = '黑体'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object Label6: TLabel
            Left = 16
            Top = 54
            Width = 49
            Height = 13
            AutoSize = False
            Caption = '致 (To)'
          end
          object Label7: TLabel
            Left = 199
            Top = 54
            Width = 58
            Height = 13
            AutoSize = False
            Caption = '由 (From)'
          end
          object LB: TLabel
            Left = 401
            Top = 58
            Width = 72
            Height = 13
            AutoSize = False
            Caption = '日期  Date'
          end
          object Bevel1: TBevel
            Left = 1
            Top = 79
            Width = 634
            Height = 2
          end
          object Bevel2: TBevel
            Left = 1
            Top = 107
            Width = 633
            Height = 2
          end
          object Label10: TLabel
            Left = 13
            Top = 86
            Width = 345
            Height = 13
            AutoSize = False
            Caption = '由有关部门填写  (To be coompleted in full by originatingdetp.)'
          end
          object Label11: TLabel
            Left = 381
            Top = 115
            Width = 177
            Height = 13
            AutoSize = False
            Caption = '估计金额 (Estimated Total Cost)'
          end
          object Label12: TLabel
            Left = 381
            Top = 163
            Width = 183
            Height = 29
            AutoSize = False
            Caption = '供应单位及地址(Possible Supplier/Address)'
            WordWrap = True
          end
          object Label4: TLabel
            Left = 8
            Top = 367
            Width = 305
            Height = 18
            AutoSize = False
            WordWrap = True
          end
          object Bevel3: TBevel
            Left = 0
            Top = 297
            Width = 637
            Height = 2
          end
          object Label8: TLabel
            Left = 378
            Top = 305
            Width = 157
            Height = 13
            AutoSize = False
            Caption = '需用日期 (Date required)'
          end
          object Label13: TLabel
            Left = 378
            Top = 346
            Width = 133
            Height = 13
            AutoSize = False
            Caption = '报告创建者 (Creator)'
          end
          object GroupBox3: TGroupBox
            Left = 5
            Top = 114
            Width = 366
            Height = 176
            Caption = '需采购物品'
            TabOrder = 0
            object lvhw: TListView
              Left = 7
              Top = 44
              Width = 354
              Height = 126
              Columns = <
                item
                  Caption = '品名'
                  Width = 100
                end
                item
                  Caption = '规格'
                end
                item
                  Caption = '数量'
                end
                item
                  Caption = '单价'
                end
                item
                  Caption = '金额'
                  Width = 100
                end>
              MultiSelect = True
              ReadOnly = True
              RowSelect = True
              SmallImages = ImgMenu
              TabOrder = 0
              ViewStyle = vsReport
            end
            object tnav: TToolBar
              Left = 2
              Top = 15
              Width = 362
              Height = 28
              EdgeInner = esNone
              EdgeOuter = esNone
              Flat = True
              Images = ImgMenu
              ParentShowHint = False
              ShowHint = True
              TabOrder = 1
              object ToolButton3: TToolButton
                Left = 0
                Top = 0
                Width = 8
                Caption = 'ToolButton3'
                ImageIndex = 1
                Style = tbsSeparator
              end
              object btins: TToolButton
                Left = 8
                Top = 0
                Hint = '增加'
                Caption = 'Create'
                ImageIndex = 1
                ParentShowHint = False
                ShowHint = True
                OnClick = btinsClick
              end
              object ToolButton6: TToolButton
                Left = 31
                Top = 0
                Width = 8
                Caption = 'ToolButton4'
                ImageIndex = 1
                Style = tbsSeparator
              end
              object btDelete: TToolButton
                Left = 39
                Top = 0
                Hint = '删除'
                Caption = 'Delete'
                ImageIndex = 2
                ParentShowHint = False
                ShowHint = True
                OnClick = btDeleteClick
              end
              object ToolButton10: TToolButton
                Left = 62
                Top = 0
                Width = 8
                Caption = 'ToolButton10'
                ImageIndex = 3
                Style = tbsSeparator
              end
              object btUpdate: TToolButton
                Left = 70
                Top = 0
                Hint = '修改'
                Caption = 'Update'
                ImageIndex = 3
                ParentShowHint = False
                ShowHint = True
                OnClick = btUpdateClick
              end
              object Label21: TLabel
                Left = 93
                Top = 0
                Width = 196
                Height = 22
                AutoSize = False
                Caption = '           <------增加,删除,修改物品'
              end
            end
          end
          object edNo: TEdit
            Left = 434
            Top = 21
            Width = 125
            Height = 21
            BorderStyle = bsNone
            Color = clAqua
            Enabled = False
            TabOrder = 1
          end
          object CBTO: TComboBox
            Left = 72
            Top = 52
            Width = 120
            Height = 21
            ItemHeight = 13
            TabOrder = 2
          end
          object CBFROM: TComboBox
            Left = 250
            Top = 54
            Width = 119
            Height = 21
            ItemHeight = 13
            TabOrder = 3
          end
          object dtrq: TDateTimePicker
            Left = 465
            Top = 54
            Width = 94
            Height = 21
            CalAlignment = dtaLeft
            Date = 36697.9107726389
            Time = 36697.9107726389
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 4
          end
          object eJe: TEdit
            Left = 381
            Top = 133
            Width = 171
            Height = 21
            TabOrder = 5
          end
          object mDW: TMemo