unit1.dfm

delphi +SQL 编程 语法 delphi +SQL 编程 语法

object Form1: TForm1
  Left = 59
  Top = 121
  BorderStyle = bsSingle
  Caption = 'Form1'
  ClientHeight = 477
  ClientWidth = 839
  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 Label1: TLabel
    Left = 456
    Top = 24
    Width = 36
    Height = 13
    Caption = #26597#35810#20540
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 175
    Width = 769
    Height = 297
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = #31185#30446#20195#30721
        Width = 332
        Visible = True
      end
      item
        Expanded = False
        FieldName = #31185#30446#21517#31216
        Width = 397
        Visible = True
      end>
  end
  object Edit3: TEdit
    Left = 504
    Top = 16
    Width = 121
    Height = 21
    TabOrder = 1
    Text = 'Edit3'
  end
  object Edit4: TEdit
    Left = 504
    Top = 40
    Width = 121
    Height = 21
    TabOrder = 2
    Text = 'Edit4'
  end
  object Button2: TButton
    Left = 8
    Top = 64
    Width = 75
    Height = 25
    Caption = #22686#21152
    TabOrder = 3
    OnClick = Button2Click
  end
  object Edit1: TDBEdit
    Left = 32
    Top = 120
    Width = 121
    Height = 21
    DataField = #31185#30446#20195#30721
    DataSource = DataSource1
    TabOrder = 4
  end
  object Edit2: TDBEdit
    Left = 192
    Top = 120
    Width = 121
    Height = 21
    DataField = #31185#30446#21517#31216
    DataSource = DataSource1
    TabOrder = 5
  end
  object Button3: TButton
    Left = 96
    Top = 64
    Width = 75
    Height = 25
    Caption = #25552#20132
    TabOrder = 6
    OnClick = Button3Click
  end
  object Button1: TButton
    Left = 632
    Top = 16
    Width = 105
    Height = 25
    Caption = #22810#26465#20214#36807#28388#26597#35810
    TabOrder = 7
    OnClick = Button1Click
  end
  object Button4: TButton
    Left = 752
    Top = 16
    Width = 75
    Height = 25
    Caption = #20851#20110
    TabOrder = 8
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 176
    Top = 64
    Width = 75
    Height = 25
    Caption = #21024#38500
    TabOrder = 9
    OnClick = Button5Click
  end
  object Button6: TButton
    Left = 264
    Top = 64
    Width = 75
    Height = 25
    Caption = #32534#36753'/'#20462#25913
    TabOrder = 10
    OnClick = Button6Click
  end
  object Button7: TButton
    Left = 352
    Top = 64
    Width = 75
    Height = 25
    Caption = #21462#28040
    TabOrder = 11
    OnClick = Button7Click
  end
  object Button8: TButton
    Left = 504
    Top = 72
    Width = 105
    Height = 25
    Caption = #31934#30830#26597#35810'query'
    TabOrder = 12
    OnClick = Button8Click
  end
  object Button9: TButton
    Left = 616
    Top = 72
    Width = 105
    Height = 25
    Caption = #27169#31946#26597#35810'query'
    TabOrder = 13
    OnClick = Button9Click
  end
  object Edit5: TEdit
    Left = 512
    Top = 104
    Width = 121
    Height = 21
    TabOrder = 14
    Text = 'Edit5'
  end
  object Button10: TButton
    Left = 744
    Top = 72
    Width = 75
    Height = 25
    Caption = #36820#22238
    TabOrder = 15
    OnClick = Button10Click
  end
  object Query1: TQuery
    AutoRefresh = True
    RequestLive = True
    SQL.Strings = (
      'Select'
      '  TEST."'#31185#30446#20195#30721'",'
      '  TEST."'#31185#30446#21517#31216'"'
      'From "d:\sql\'#25506#32034#35745#21010'\TEST.db"'
      'As test')
    Left = 376
    Top = 120
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 344
    Top = 120
  end
end