unit2.dfm

来自「人工智能中专家系统源代码,用delphi语言编写的」· DFM 代码 · 共 59 行

object Form2: TForm2
  Left = 319
  Top = 133
  BorderStyle = bsDialog
  Caption = #32467#35770
  ClientHeight = 285
  ClientWidth = 227
  Color = clBackground
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 90
    Top = 240
    Width = 84
    Height = 21
    Caption = #21021#22987#26465#20214
    Color = clWhite
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -20
    Font.Name = #21326#25991#26032#39759
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object Image1: TImage
    Left = 0
    Top = -8
    Width = 235
    Height = 225
    Picture.Data = {}
    Stretch = True
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 0
    Width = 232
    Height = 217
    DataSource = Form1.DataSource1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Visible = False
  end
end