msg01frm.dfm

该系统实现了对DVD租赁过程的管理,功能完善,方便实用.

object FrmMsg01: TFrmMsg01
  Left = 528
  Top = 358
  Width = 242
  Height = 227
  Caption = #20449#24687#25552#31034
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 12
    Top = 16
    Width = 177
    Height = 12
    Caption = #20197#19979'DVD'#26410#24402#36824#65292#26080#27861#36864#36824#25276#37329
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Panel1: TPanel
    Left = 4
    Top = 44
    Width = 225
    Height = 97
    Align = alCustom
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 0
    object Label1: TLabel
      Left = 12
      Top = 20
      Width = 80
      Height = 16
      Caption = #24215#20869#32534#21495#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 96
      Top = 16
      Width = 6
      Height = 23
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -19
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 12
      Top = 60
      Width = 80
      Height = 16
      Caption = #20013#25991#29255#21517#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 96
      Top = 56
      Width = 12
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object bbtnQuit: TBitBtn
    Left = 80
    Top = 153
    Width = 78
    Height = 25
    Caption = #30830' '#23450
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ModalResult = 4
    ParentFont = False
    TabOrder = 1
    OnClick = bbtnQuitClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      04000000000080000000750A0000750A00001000000000000000000000000000
      0000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF00000000000000FFFF0000FFFFFF001FFFFFFFFFFF
      FFF1F89393933339399FF99999399999993FF39998FFFF89939FF9998F9999F8
      999FF998F999999F899FF99F999FF999F93FF99F999FF999F93FF99F999FF999
      F99FF99F999FF999F93FF998F999999F899FF9998F9999F8999FF99998FFFF89
      993FF99999999999939FF99999999999398F1FFFFFFFFFFFFFF1}
    Spacing = 8
  end
  object ADOQuery1: TADOQuery
    Connection = FrmMain.ADOConnection1
    Parameters = <>
    Left = 4
    Top = 4
  end
end