ypkc.dfm

来自「完整的delphi书籍源代码,大家有空的时候自己慢慢看看」· DFM 代码 · 共 117 行

object YPKCFrm: TYPKCFrm
  Left = 115
  Top = 123
  Width = 544
  Height = 379
  Caption = #33647#21697#24211#23384#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 32
    Top = 16
    Width = 473
    Height = 73
    Caption = #24211#23384#26597#35810
    TabOrder = 0
    object RadioButton1: TRadioButton
      Left = 48
      Top = 32
      Width = 113
      Height = 17
      Caption = #33647#21697#21517#31216
      Checked = True
      TabOrder = 0
      TabStop = True
    end
    object ComboBox1: TComboBox
      Left = 120
      Top = 24
      Width = 81
      Height = 21
      ItemHeight = 13
      TabOrder = 1
    end
    object Button1: TButton
      Left = 336
      Top = 24
      Width = 57
      Height = 25
      Caption = #26597#35810
      TabOrder = 2
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 408
      Top = 24
      Width = 57
      Height = 25
      Caption = #36820#22238
      TabOrder = 3
      OnClick = Button2Click
    end
    object RadioButton2: TRadioButton
      Left = 224
      Top = 32
      Width = 113
      Height = 17
      Caption = #20840#37096#24211#23384#20449#24687
      TabOrder = 4
    end
  end
  object GroupBox2: TGroupBox
    Left = 32
    Top = 112
    Width = 481
    Height = 217
    Caption = #26597#35810#32467#26524
    TabOrder = 1
    object StringGrid1: TStringGrid
      Left = 8
      Top = 32
      Width = 465
      Height = 153
      ColCount = 7
      TabOrder = 0
      ColWidths = (
        64
        66
        64
        64
        64
        64
        64)
    end
  end
  object ADOQuery1: TADOQuery
    Connection = LoginFrm.ADOConnection1
    Parameters = <>
    Left = 240
  end
  object ADOTable1: TADOTable
    Active = True
    Connection = LoginFrm.ADOConnection1
    CursorType = ctStatic
    TableName = 'YPXX'
    Left = 200
  end
  object ADOQuery2: TADOQuery
    Connection = LoginFrm.ADOConnection1
    Parameters = <>
    Left = 280
  end
  object ADOQuery3: TADOQuery
    Connection = LoginFrm.ADOConnection1
    Parameters = <>
    Left = 320
  end
end