syssetu.dfm

来自「日昌餐饮管理系统是用Delphi7+SQL写的管理系统」· DFM 代码 · 共 174 行

object setForm: TsetForm
  Left = 119
  Top = 140
  Width = 307
  Height = 224
  BorderIcons = [biSystemMenu]
  Caption = #31995#32479#21442#25968#35774#32622
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 12
  object Bevel3: TBevel
    Left = 17
    Top = 109
    Width = 264
    Height = 42
  end
  object Bevel2: TBevel
    Left = 16
    Top = 60
    Width = 264
    Height = 42
  end
  object Label1: TLabel
    Left = 33
    Top = 67
    Width = 98
    Height = 14
    Caption = #23458#20154#32467#24080#26102#65292#25353
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 191
    Top = 67
    Width = 70
    Height = 14
    Caption = '% '#25273#21435#38646#22836
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 30
    Top = 116
    Width = 147
    Height = 14
    Caption = #25273#21435#38646#22836#26102' '#26368#22810#19981#36229#36807
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 233
    Top = 113
    Width = 14
    Height = 14
    Caption = #20803
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 48
    Top = 86
    Width = 168
    Height = 12
    Caption = #65288#20026#38646#26102#20195#34920#19981#23481#35768#25273#21435#38646#22836#65289
  end
  object Label6: TLabel
    Left = 46
    Top = 136
    Width = 168
    Height = 12
    Caption = #65288#20026#38646#26102#20195#34920#25273#21435#38646#22836#26080#38480#39069#65289
  end
  object Bevel1: TBevel
    Left = 16
    Top = 24
    Width = 264
    Height = 30
  end
  object BitBtn1: TBitBtn
    Left = 144
    Top = 160
    Width = 75
    Height = 25
    Caption = #30830#35748
    TabOrder = 0
    OnClick = BitBtn1Click
  end
  object DBCheckBox1: TDBCheckBox
    Left = 32
    Top = 29
    Width = 233
    Height = 17
    Caption = #21551#21160#21508#39184#21488#30340#26368#20302#28040#36153'  '#38480#39069
    DataField = 'zdxfset'
    DataSource = DataSource1
    Font.Charset = ANSI_CHARSET
    Font.Color = clRed
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    ValueChecked = 'True'
    ValueUnchecked = 'False'
  end
  object DBEdit1: TDBEdit
    Left = 144
    Top = 62
    Width = 41
    Height = 22
    DataField = 'yebile'
    DataSource = DataSource1
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
  end
  object DBEdit2: TDBEdit
    Left = 181
    Top = 111
    Width = 44
    Height = 22
    DataField = 'maxye'
    DataSource = DataSource1
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
  end
  object ADOQuery1: TADOQuery
    Connection = mainForm.RJSADO
    Parameters = <>
    SQL.Strings = (
      'select *'
      'from sysset')
    Left = 192
    Top = 5
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 224
    Top = 8
  end
end