unit6.dfm

这是一个平时无事是编写的一个航空售票管理小系统,与大家分享, 有什么问题大家在这里留言,,大家一起讨论

object ChaXun: TChaXun
  Left = 22
  Top = 18
  BorderStyle = bsDialog
  Caption = 'ChaXun'
  ClientHeight = 660
  ClientWidth = 965
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 965
    Height = 41
    ButtonHeight = 37
    ButtonWidth = 82
    Caption = 'ToolBar1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clMaroon
    Font.Height = -24
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ShowCaptions = True
    TabOrder = 0
    object ToolButton1: TToolButton
      Left = 0
      Top = 2
      AutoSize = True
      Caption = #39318#35760#24405
      ImageIndex = 0
      OnClick = ToolButton1Click
    end
    object ToolButton2: TToolButton
      Left = 87
      Top = 2
      Caption = #19978#35760#24405
      ImageIndex = 1
      OnClick = ToolButton2Click
    end
    object ToolButton3: TToolButton
      Left = 169
      Top = 2
      Caption = #19979#35760#24405
      ImageIndex = 2
      OnClick = ToolButton3Click
    end
    object ToolButton4: TToolButton
      Left = 251
      Top = 2
      Caption = #26411#35760#24405
      ImageIndex = 3
      OnClick = ToolButton4Click
    end
    object ToolButton5: TToolButton
      Left = 333
      Top = 2
      Width = 8
      Caption = 'ToolButton5'
      ImageIndex = 4
      Style = tbsSeparator
    end
    object ToolButton6: TToolButton
      Left = 341
      Top = 2
      Width = 8
      Caption = 'ToolButton6'
      ImageIndex = 5
      Style = tbsSeparator
    end
    object ToolButton7: TToolButton
      Left = 349
      Top = 2
      Caption = #26032#22686
      ImageIndex = 5
      OnClick = ToolButton7Click
    end
    object ToolButton8: TToolButton
      Left = 431
      Top = 2
      Caption = #20462#25913
      ImageIndex = 6
      OnClick = ToolButton8Click
    end
    object ToolButton9: TToolButton
      Left = 513
      Top = 2
      Caption = #21024#38500
      ImageIndex = 7
      OnClick = ToolButton9Click
    end
    object ToolButton10: TToolButton
      Left = 595
      Top = 2
      Width = 8
      Caption = 'ToolButton10'
      ImageIndex = 8
      Style = tbsSeparator
    end
    object ToolButton11: TToolButton
      Left = 603
      Top = 2
      Width = 8
      Caption = 'ToolButton11'
      ImageIndex = 9
      Style = tbsSeparator
    end
    object ToolButton12: TToolButton
      Left = 611
      Top = 2
      Caption = #20445#23384
      ImageIndex = 9
      OnClick = ToolButton12Click
    end
    object ToolButton13: TToolButton
      Left = 693
      Top = 2
      Caption = #21462#28040
      ImageIndex = 10
      OnClick = ToolButton13Click
    end
    object ToolButton14: TToolButton
      Left = 775
      Top = 2
      Width = 8
      Caption = 'ToolButton14'
      ImageIndex = 11
      Style = tbsSeparator
    end
    object ToolButton15: TToolButton
      Left = 783
      Top = 2
      Width = 8
      Caption = 'ToolButton15'
      ImageIndex = 12
      Style = tbsSeparator
    end
    object ToolButton16: TToolButton
      Left = 791
      Top = 2
      Caption = #36864#20986
      ImageIndex = 12
      OnClick = ToolButton16Click
    end
  end
  object Panel1: TPanel
    Left = 4
    Top = 54
    Width = 961
    Height = 49
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 14
      Width = 70
      Height = 19
      Caption = #35760#24405#25968':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -19
      Font.Name = #38582#20070
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 80
      Top = 16
      Width = 40
      Height = 20
      Caption = '          '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 196
      Top = 12
      Width = 92
      Height = 21
      Caption = #36215#39134#26102#38388
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -21
      Font.Name = #38582#20070
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label5: TLabel
      Left = 482
      Top = 12
      Width = 92
      Height = 21
      Caption = #36884#32463#22478#24066
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -21
      Font.Name = #38582#20070
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Edit2: TEdit
      Left = 295
      Top = 13
      Width = 129
      Height = 21
      TabOrder = 0
      Text = 'Edit2'
    end
    object Edit3: TEdit
      Left = 587
      Top = 13
      Width = 116
      Height = 21
      TabOrder = 1
      Text = 'Edit3'
    end
    object Button1: TButton
      Left = 804
      Top = 4
      Width = 88
      Height = 41
      Caption = #25628#32034
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -29
      Font.Name = #38582#20070
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = Button1Click
    end
  end
  object Panel2: TPanel
    Left = 2
    Top = 113
    Width = 960
    Height = 545
    Caption = 'Panel2'
    TabOrder = 2
    object DBGrid1: TDBGrid
      Left = 8
      Top = 8
      Width = 945
      Height = 529
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 48
    Top = 336
  end
  object ADOTable1: TADOTable
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\'#33322#29677#20449#24687#31649#29702#31995#32479'\'#24635#34920'.mdb;' +
      'Persist Security Info=False'
    TableName = #33322#32447#34920
    Left = 80
    Top = 336
  end
  object ADOQuery1: TADOQuery
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\'#33322#29677#20449#24687#31649#29702#31995#32479'\'#24635#34920'.mdb;' +
      'Persist Security Info=False'
    Parameters = <>
    Left = 120
    Top = 336
  end
end