unit14.dfm

一个简单的旅游管理系统

object Form14: TForm14
  Left = 90
  Top = 180
  Width = 883
  Height = 596
  Caption = #20462#25913#26053#28216#32447#36335#20449#24687
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object DBCtrlGrid1: TDBCtrlGrid
    Left = 0
    Top = 25
    Width = 875
    Height = 504
    Align = alTop
    DataSource = DataSource1
    PanelHeight = 126
    PanelWidth = 858
    TabOrder = 0
    RowCount = 4
    object Label1: TLabel
      Left = 32
      Top = 25
      Width = 36
      Height = 13
      Caption = #32534#21495#65306
    end
    object DBText1: TDBText
      Left = 72
      Top = 23
      Width = 89
      Height = 17
      DataField = #32534#21495
      DataSource = DataSource1
    end
    object Label3: TLabel
      Left = 196
      Top = 25
      Width = 48
      Height = 13
      Caption = #21457#22242#31038#65306
    end
    object Label4: TLabel
      Left = 448
      Top = 25
      Width = 60
      Height = 13
      Caption = #21457#22242#26102#38388#65306
    end
    object Label5: TLabel
      Left = 688
      Top = 25
      Width = 36
      Height = 13
      Caption = #20215#26684#65306
    end
    object Label2: TLabel
      Left = 32
      Top = 51
      Width = 60
      Height = 13
      Caption = #26053#28216#32447#36335#65306
    end
    object Label6: TLabel
      Left = 304
      Top = 51
      Width = 60
      Height = 13
      Caption = #34892#31243#23433#25490#65306
    end
    object Label7: TLabel
      Left = 560
      Top = 51
      Width = 60
      Height = 13
      Caption = #26381#21153#26631#20934#65306
    end
    object DBEdit1: TDBEdit
      Left = 248
      Top = 21
      Width = 177
      Height = 21
      DataField = #21457#22242#31038
      DataSource = DataSource1
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 512
      Top = 21
      Width = 153
      Height = 21
      DataField = #21457#22242#26102#38388
      DataSource = DataSource1
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 728
      Top = 21
      Width = 89
      Height = 21
      DataField = #20215#26684
      DataSource = DataSource1
      TabOrder = 2
    end
    object DBMemo1: TDBMemo
      Left = 96
      Top = 51
      Width = 193
      Height = 59
      DataField = #26053#28216#32447#36335
      DataSource = DataSource1
      TabOrder = 3
    end
    object DBMemo2: TDBMemo
      Left = 368
      Top = 51
      Width = 177
      Height = 59
      DataField = #34892#31243#23433#25490
      DataSource = DataSource1
      TabOrder = 4
    end
    object DBMemo3: TDBMemo
      Left = 624
      Top = 51
      Width = 193
      Height = 59
      DataField = #26381#21153#26631#20934
      DataSource = DataSource1
      TabOrder = 5
    end
  end
  object DBNavigator1: TDBNavigator
    Left = 0
    Top = 0
    Width = 875
    Height = 25
    DataSource = DataSource1
    Align = alTop
    TabOrder = 1
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=lygl.' +
      'mdb;Mode=Share Deny None;Extended Properties="";Persist Security' +
      ' Info=False;Jet OLEDB:System database="";Jet OLEDB:Registry Path' +
      '="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet O' +
      'LEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2' +
      ';Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Pas' +
      'sword="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encryp' +
      't Database=False;Jet OLEDB:Don'#39't Copy Locale on Compact=False;Je' +
      't OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 424
    Top = 368
  end
  object ADOQuery1: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from '#26053#28216#32447#36335#34920)
    Left = 464
    Top = 368
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 376
    Top = 352
  end
end