unit18.dfm

来自「玉龙飞雪进销存管理系统,可以帮您管理进销存的软件」· DFM 代码 · 共 85 行

object Formmemo: TFormmemo
  Left = 231
  Top = 143
  Width = 505
  Height = 227
  Caption = #20449#24687#22791#27880#26597#30475
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton
    Left = 416
    Top = 170
    Width = 73
    Height = 22
    Caption = #36864'         '#20986
    Flat = True
    OnClick = SpeedButton1Click
  end
  object DBMemo1: TDBMemo
    Left = 8
    Top = 9
    Width = 209
    Height = 152
    DataField = #20449#24687#22791#27880
    DataSource = DataSource1
    TabOrder = 0
  end
  object MonthCalendar1: TMonthCalendar
    Left = 222
    Top = 9
    Width = 267
    Height = 154
    Date = 37251.0201279051
    TabOrder = 1
    OnClick = MonthCalendar1Click
  end
  object RadioButton1: TRadioButton
    Left = 8
    Top = 175
    Width = 113
    Height = 17
    Caption = #36827#36135#22791#27880#20449#24687#26597#30475
    TabOrder = 2
  end
  object RadioButton2: TRadioButton
    Left = 143
    Top = 175
    Width = 113
    Height = 17
    Caption = #38144#21806#22791#27880#20449#24687#26597#30475
    TabOrder = 3
  end
  object RadioButton3: TRadioButton
    Left = 278
    Top = 174
    Width = 113
    Height = 17
    Caption = #23458#25143#22791#27880#20449#24687#26597#30475
    TabOrder = 4
  end
  object Table1: TTable
    Active = True
    AutoCalcFields = False
    DatabaseName = 'mydb'
    TableName = 'jin.DB'
    Left = 16
    Top = 40
  end
  object DataSource1: TDataSource
    DataSet = Table1
    OnDataChange = DataSource1DataChange
    OnUpdateData = DataSource1UpdateData
    Left = 56
    Top = 40
  end
end