unit3.~dfm

此为 汽车维修管理系统 采用ODBC驱动 控制面板里设置 数据库名:qcwxgl 说明：汽车维修管理 SQL服务器名:yangfeng 默认数据库名:qcwxgl

object qcdj: Tqcdj
  Left = 199
  Top = 176
  BorderStyle = bsSingle
  Caption = #27773#36710#30331#35760
  ClientHeight = 496
  ClientWidth = 713
  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 Panel1: TPanel
    Left = 0
    Top = 0
    Width = 937
    Height = 481
    Color = clAqua
    TabOrder = 0
    object Bevel1: TBevel
      Left = -8
      Top = 144
      Width = 713
      Height = 1
    end
    object Label1: TLabel
      Left = 40
      Top = 16
      Width = 81
      Height = 16
      Caption = #27773#36710#29260#21495':      '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 272
      Top = 16
      Width = 43
      Height = 16
      Caption = #22411#21495':   '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 480
      Top = 16
      Width = 56
      Height = 16
      Caption = #29983#20135#21378':   '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label4: TLabel
      Left = 24
      Top = 48
      Width = 98
      Height = 16
      Caption = #20462#29702#39033#30446#30721':       '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label5: TLabel
      Left = 272
      Top = 48
      Width = 47
      Height = 16
      Caption = #36710#20027':    '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label6: TLabel
      Left = 496
      Top = 48
      Width = 43
      Height = 16
      Caption = #30005#35805':   '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label7: TLabel
      Left = 72
      Top = 80
      Width = 43
      Height = 16
      Caption = #22320#22336':   '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object SpeedButton1: TSpeedButton
      Left = 216
      Top = 104
      Width = 65
      Height = 30
      Caption = #30331#35760
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 344
      Top = 104
      Width = 65
      Height = 30
      Caption = #28165#31354
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = SpeedButton2Click
    end
    object Label8: TLabel
      Left = 24
      Top = 432
      Width = 81
      Height = 16
      Caption = #26597#35810#26041#24335':      '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label9: TLabel
      Left = 200
      Top = 432
      Width = 64
      Height = 16
      Caption = #26597#35810#20540':     '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Bevel2: TBevel
      Left = 520
      Top = 344
      Width = 1
      Height = 137
    end
    object Label10: TLabel
      Left = 528
      Top = 352
      Width = 78
      Height = 13
      Caption = #39640#32423'SQL'#26597#35810'   '
    end
    object SpeedButton3: TSpeedButton
      Left = 488
      Top = 104
      Width = 65
      Height = 30
      Caption = #26597#30475
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = SpeedButton3Click
    end
    object Label11: TLabel
      Left = 16
      Top = 392
      Width = 48
      Height = 13
      Caption = #31532#19968#20010'  '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label12: TLabel
      Left = 80
      Top = 392
      Width = 35
      Height = 13
      Caption = #21521#21069'  '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label13: TLabel
      Left = 152
      Top = 392
      Width = 35
      Height = 13
      Caption = #21521#21518'  '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label14: TLabel
      Left = 200
      Top = 392
      Width = 69
      Height = 13
      Caption = #26368#21518#19968#20010'    '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label15: TLabel
      Left = 280
      Top = 392
      Width = 35
      Height = 13
      Caption = #28155#21152'  '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label16: TLabel
      Left = 344
      Top = 392
      Width = 39
      Height = 13
      Caption = #21024#38500'   '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label17: TLabel
      Left = 408
      Top = 392
      Width = 47
      Height = 13
      Caption = #32534#36753'     '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label18: TLabel
      Left = 456
      Top = 392
      Width = 65
      Height = 13
      Caption = #30830#23450#20462#25913'   '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object DBGrid1: TDBGrid
      Left = 0
      Top = 152
      Width = 713
      Height = 193
      DataSource = DataSource2
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = #29260#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = #22411#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = #29983#20135#21378
          Visible = True
        end
        item
          Expanded = False
          FieldName = #20462#29702#39033#30446#30721
          Visible = True
        end
        item
          Expanded = False
          FieldName = #36710#20027#21517
          Visible = True
        end
        item
          Expanded = False
          FieldName = #22320#22336
          Visible = True
        end
        item
          Expanded = False
          FieldName = #30005#35805
          Visible = True
        end
        item
          Expanded = False
          FieldName = #30331#35760#26102#38388
          Visible = True
        end>
    end
    object Edit1: TEdit
      Left = 120
      Top = 8
      Width = 121
      Height = 21
      Color = clAqua
      TabOrder = 1
    end
    object Edit2: TEdit
      Left = 320
      Top = 8
      Width = 121
      Height = 21
      Color = clAqua
      TabOrder = 2
    end
    object Edit3: TEdit
      Left = 544
      Top = 8
      Width = 121
      Height = 21
      Color = clAqua
      TabOrder = 3
    end
    object Edit4: TEdit
      Left = 120
      Top = 40
      Width = 121
      Height = 21
      Color = clAqua
      TabOrder = 4
    end
    object Edit5: TEdit
      Left = 320
      Top = 40
      Width = 121
      Height = 21
      Color = clAqua
      TabOrder = 5
    end
    object Edit6: TEdit
      Left = 544
      Top = 40
      Width = 121
      Height = 21
      Color = clAqua
      TabOrder = 6
    end
    object Edit7: TEdit
      Left = 120
      Top = 72
      Width = 121
      Height = 21
      Color = clAqua
      TabOrder = 7
      Text = #26080
    end
    object ComboBox1: TComboBox
      Left = 112
      Top = 432
      Width = 73
      Height = 21
      Color = clAqua
      ItemHeight = 13
      TabOrder = 8
      OnChange = ComboBox1Change
      Items.Strings = (
        #27773#36710#29260#21495
        #27773#36710#22411#21495
        #20462#29702#39033#30446#30721
        #36710#20027#21517)
    end
    object Edit8: TEdit
      Left = 272
      Top = 432
      Width = 81
      Height = 21
      Color = clAqua
      TabOrder = 9
      OnKeyDown = Edit8KeyDown
    end
    object BitBtn1: TBitBtn
      Left = 368
      Top = 432
      Width = 57
      Height = 25
      Caption = #26597#35810
      TabOrder = 10
      OnClick = BitBtn1Click
    end
    object BitBtn5: TBitBtn
      Left = 536
      Top = 448
      Width = 65
      Height = 25
      Caption = #26597#35810
      TabOrder = 11
      OnClick = BitBtn5Click
    end
    object BitBtn6: TBitBtn
      Left = 640
      Top = 448
      Width = 65
      Height = 25
      Caption = #28165#31354
      TabOrder = 12
      OnClick = BitBtn6Click
    end
    object Memo1: TMemo
      Left = 528
      Top = 368
      Width = 177
      Height = 65
      Lines.Strings = (
        '')
      ScrollBars = ssVertical
      TabOrder = 13
      OnKeyDown = Memo1KeyDown
    end
    object DBNavigator1: TDBNavigator
      Left = 0
      Top = 352
      Width = 520
      Height = 30
      DataSource = DataSource2
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost]
      TabOrder = 14
      OnClick = DBNavigator1Click
    end
    object BitBtn2: TBitBtn
      Left = 448
      Top = 432
      Width = 57
      Height = 25
      Caption = #20840#37096
      TabOrder = 15
      OnClick = BitBtn2Click
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 477
    Width = 713
    Height = 19
    AutoHint = True
    Panels = <>
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 32
    Top = 448
  end
  object Query1: TQuery
    DatabaseName = 'qcgl'
    SQL.Strings = (
      'select * from z1')
    Top = 448
  end
  object Table1: TTable
    DatabaseName = 'qcgl'
    TableName = 'dbo.Z1'
    Left = 64
    Top = 448
  end
  object DataSource2: TDataSource
    DataSet = Table1
    Left = 96
    Top = 448
  end
  object Database1: TDatabase
    AliasName = 'qcwxgl'
    Connected = True
    DatabaseName = 'qcgl'
    LoginPrompt = False
    SessionName = 'Default'
    Left = 672
    Top = 96
  end
end