ufrmmain.dfm

面向对象数据库开发时

object FrmMain: TFrmMain
  Left = 199
  Top = 116
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'DBToClass 1.3'
  ClientHeight = 508
  ClientWidth = 740
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 740
    Height = 30
    Bands = <
      item
        Control = ToolBar1
        ImageIndex = -1
        MinHeight = 26
        Width = 736
      end>
    object ToolBar1: TToolBar
      Left = 9
      Top = 0
      Width = 723
      Height = 26
      ButtonHeight = 20
      ButtonWidth = 67
      Caption = 'ToolBar1'
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      ShowCaptions = True
      TabOrder = 0
      object ToolButton1: TToolButton
        Left = 0
        Top = 0
        AutoSize = True
        Caption = #36830#25509#25968#25454#24211
        ImageIndex = 0
        OnClick = ToolButton1Click
      end
      object ToolButton6: TToolButton
        Left = 71
        Top = 0
        Width = 8
        Caption = 'ToolButton6'
        ImageIndex = 3
        Style = tbsSeparator
      end
      object ToolButton2: TToolButton
        Left = 79
        Top = 0
        Caption = #29983#25104#31867#25551#36848
        ImageIndex = 1
        OnClick = ToolButton2Click
      end
      object ToolButton4: TToolButton
        Left = 146
        Top = 0
        Caption = #20445#23384#25991#20214
        ImageIndex = 2
        OnClick = ToolButton4Click
      end
      object ToolButton7: TToolButton
        Left = 213
        Top = 0
        Caption = #35774#32622
        Enabled = False
        ImageIndex = 3
      end
      object Panel4: TPanel
        Left = 280
        Top = 0
        Width = 435
        Height = 20
        Caption = #20316#32773#65306#24352#26234'  [e-mail]'
        Enabled = False
        TabOrder = 0
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 30
    Width = 249
    Height = 478
    Align = alLeft
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 19
      Width = 60
      Height = 12
      Caption = #25968#25454#24211#21517#65306
    end
    object Label2: TLabel
      Left = 16
      Top = 64
      Width = 60
      Height = 12
      Caption = #29992#25143#34920#21517#65306
    end
    object SpeedButton1: TSpeedButton
      Left = 101
      Top = 57
      Width = 44
      Height = 22
      Caption = #20840#36873
      Flat = True
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 144
      Top = 57
      Width = 44
      Height = 22
      Caption = #20840#19981#36873
      Flat = True
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton
      Left = 187
      Top = 57
      Width = 44
      Height = 22
      Caption = #21453#36873
      Flat = True
      OnClick = SpeedButton3Click
    end
    object cbxDBName: TComboBox
      Left = 15
      Top = 35
      Width = 218
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      TabOrder = 0
      OnChange = cbxDBNameChange
    end
    object clbTable: TCheckListBox
      Left = 15
      Top = 80
      Width = 217
      Height = 385
      ItemHeight = 12
      TabOrder = 1
    end
  end
  object Panel2: TPanel
    Left = 249
    Top = 30
    Width = 491
    Height = 478
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 2
    object Panel3: TPanel
      Left = 2
      Top = 2
      Width = 487
      Height = 127
      Align = alTop
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 0
      object Label3: TLabel
        Left = 10
        Top = 24
        Width = 60
        Height = 12
        Caption = #22522#31867#21517#31216#65306
      end
      object cbNote: TCheckBox
        Left = 276
        Top = 96
        Width = 189
        Height = 20
        Caption = #27880#37322#23545#24212'SQLserver'#30340#23383#27573#31867#22411
        TabOrder = 0
      end
      object rdgFileType: TRadioGroup
        Left = 11
        Top = 46
        Width = 185
        Height = 65
        Caption = #29983#25104#25991#20214
        Columns = 2
        ItemIndex = 0
        Items.Strings = (
          'Unit'#25991#20214
          #31867#20449#24687)
        TabOrder = 1
        OnClick = rdgFileTypeClick
      end
      object edtBaseClass: TEdit
        Left = 74
        Top = 16
        Width = 121
        Height = 20
        TabOrder = 2
        Text = 'TObject'
      end
      object cbInsert: TCheckBox
        Left = 276
        Top = 20
        Width = 141
        Height = 17
        Caption = #29983#25104' Insert '#26041#27861#26694#26550
        Checked = True
        State = cbChecked
        TabOrder = 3
      end
      object cbAmend: TCheckBox
        Left = 276
        Top = 36
        Width = 141
        Height = 17
        Caption = #29983#25104' Amend  '#26041#27861#26694#26550
        Checked = True
        State = cbChecked
        TabOrder = 4
      end
      object cbDelete: TCheckBox
        Left = 276
        Top = 52
        Width = 141
        Height = 17
        Caption = #29983#25104' Delete '#26041#27861#26694#26550
        Checked = True
        State = cbChecked
        TabOrder = 5
      end
      object cbSetFieldValues: TCheckBox
        Left = 276
        Top = 68
        Width = 149
        Height = 17
        Caption = #29983#25104' SetFieldValues '#26041#27861#26694#26550
        Checked = True
        State = cbChecked
        TabOrder = 6
      end
      object cbAutoID: TCheckBox
        Left = 276
        Top = 5
        Width = 140
        Height = 17
        Caption = #26159#21542#21019#24314#33258#21160#32534#21495#23383#27573
        TabOrder = 7
      end
    end
    object ProgressBar1: TProgressBar
      Left = 2
      Top = 460
      Width = 487
      Height = 16
      Align = alBottom
      Min = 0
      Max = 100
      TabOrder = 1
    end
    object mmFile: TRichEdit
      Left = 2
      Top = 129
      Width = 487
      Height = 331
      Align = alClient
      ScrollBars = ssVertical
      TabOrder = 2
    end
  end
  object SaveDialog1: TSaveDialog
    Filter = #25991#26412#25991#20214'(*.txt)|*.txt|PAS'#25991#20214'(*.pas)|*.pas'
    Left = 256
    Top = 168
  end
end