uliaochen_m.dfm

程序採用了无状态连接池的三层结构

inherited frmliaochen_m: Tfrmliaochen_m
  Left = 419
  Top = 393
  Caption = #30103#31243#35774#32622
  ClientHeight = 318
  ClientWidth = 402
  Font.Charset = ANSI_CHARSET
  Font.Height = -12
  Font.Name = #23435#20307
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Label7: TLabel [0]
    Left = 83
    Top = 5
    Width = 17
    Height = 17
    AutoSize = False
    Caption = #31532
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel [1]
    Left = 155
    Top = 5
    Width = 86
    Height = 17
    AutoSize = False
    Caption = #22825#30103#31243#35774#23450
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  inherited GroupBox: TGroupBox
    Left = 2
    Top = 22
    Width = 313
    TabOrder = 3
    inherited Label1: TLabel
      Width = 70
      Caption = #25252#29702#39033#30446#32534#21495
    end
    object Label2: TLabel [1]
      Left = 8
      Top = 40
      Width = 52
      Height = 17
      AutoSize = False
      Caption = #21517#31216
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel [2]
      Left = 8
      Top = 64
      Width = 52
      Height = 17
      AutoSize = False
      Caption = #27425#25968
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel [3]
      Left = 8
      Top = 88
      Width = 52
      Height = 17
      AutoSize = False
      Caption = #20215#26684
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel [4]
      Left = 192
      Top = 88
      Width = 33
      Height = 17
      AutoSize = False
      Caption = #25552#25104
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel [5]
      Left = 8
      Top = 112
      Width = 52
      Height = 17
      AutoSize = False
      Caption = #22791#27880
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    inherited Edit1: TwwDBEdit
      Left = 85
      Top = 14
      Width = 89
      Height = 20
      DataField = 'fcode'
      DataSource = frmliaochen.DSbaseinfo
    end
    object wwDBEdit1: TwwDBEdit
      Left = 60
      Top = 38
      Width = 114
      Height = 20
      CharCase = ecUpperCase
      DataField = 'fname'
      DataSource = frmliaochen.DSbaseinfo
      TabOrder = 1
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit2: TwwDBEdit
      Left = 60
      Top = 62
      Width = 114
      Height = 20
      CharCase = ecUpperCase
      DataField = 'fcount'
      DataSource = frmliaochen.DSbaseinfo
      TabOrder = 2
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit3: TwwDBEdit
      Left = 60
      Top = 86
      Width = 114
      Height = 20
      CharCase = ecUpperCase
      DataField = 'fprice'
      DataSource = frmliaochen.DSbaseinfo
      TabOrder = 3
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit4: TwwDBEdit
      Left = 220
      Top = 86
      Width = 55
      Height = 20
      CharCase = ecUpperCase
      DataField = 'faward'
      DataSource = frmliaochen.DSbaseinfo
      TabOrder = 7
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwCheckBox1: TwwCheckBox
      Left = 192
      Top = 16
      Width = 97
      Height = 17
      DisableThemes = False
      AlwaysTransparent = False
      ValueChecked = 'True'
      ValueUnchecked = 'False'
      DisplayValueChecked = 'True'
      DisplayValueUnchecked = 'False'
      NullAndBlankState = cbUnchecked
      Caption = #26159#21542#20248#24800
      DataField = 'fifyouhui'
      DataSource = frmliaochen.DSbaseinfo
      TabOrder = 4
    end
    object wwCheckBox2: TwwCheckBox
      Left = 192
      Top = 40
      Width = 97
      Height = 17
      DisableThemes = False
      AlwaysTransparent = False
      ValueChecked = 'True'
      ValueUnchecked = 'False'
      DisplayValueChecked = 'True'
      DisplayValueUnchecked = 'False'
      NullAndBlankState = cbUnchecked
      Caption = #26159#21542#29305#27530#20248#24800
      DataField = 'fifpyouhui'
      DataSource = frmliaochen.DSbaseinfo
      TabOrder = 5
    end
    object wwCheckBox3: TwwCheckBox
      Left = 192
      Top = 64
      Width = 97
      Height = 17
      DisableThemes = False
      AlwaysTransparent = False
      ValueChecked = 'True'
      ValueUnchecked = 'False'
      DisplayValueChecked = 'True'
      DisplayValueUnchecked = 'False'
      NullAndBlankState = cbUnchecked
      Caption = #26159#21542#25552#25104
      DataField = 'fiftichen'
      DataSource = frmliaochen.DSbaseinfo
      TabOrder = 6
    end
    object wwDBEdit5: TwwDBEdit
      Left = 60
      Top = 110
      Width = 245
      Height = 20
      CharCase = ecUpperCase
      DataField = 'fnote'
      DataSource = frmliaochen.DSbaseinfo
      TabOrder = 8
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
  end
  inherited Button1: TButton
    Left = 322
    Top = 30
    TabOrder = 0
  end
  inherited Button2: TButton
    Left = 322
    Top = 70
    TabOrder = 1
  end
  inherited Button3: TButton
    Left = 322
    Top = 142
    TabOrder = 2
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 173
    Width = 387
    Height = 136
    Caption = #21253#21547#39033#30446
    TabOrder = 4
    object Button4: TButton
      Left = 176
      Top = 59
      Width = 50
      Height = 25
      Caption = '->'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = Button4Click
    end
    object slist: TListBox
      Left = 40
      Top = 16
      Width = 120
      Height = 110
      ItemHeight = 12
      MultiSelect = True
      TabOrder = 1
    end
    object dlist: TDBMemo
      Left = 240
      Top = 16
      Width = 120
      Height = 110
      DataField = 'finclude'
      DataSource = frmliaochen.DSbaseinfo
      TabOrder = 2
    end
  end
  object daylist: TwwDBComboBox
    Left = 102
    Top = 3
    Width = 49
    Height = 20
    ShowButton = True
    Style = csDropDown
    MapList = False
    AllowClearKey = False
    DataField = 'fday'
    DataSource = frmliaochen.DSbaseinfo
    DropDownCount = 8
    ItemHeight = 0
    Sorted = False
    TabOrder = 5
    UnboundDataType = wwDefault
  end
  object CDSrlist: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 14
    Top = 206
  end
end