w_pvpaper.~dfm

来自「很不错很实用的学生联机考试系统」· ~DFM 代码 · 共 52 行

object pvpaper: Tpvpaper
  Left = 309
  Top = -12
  Width = 709
  Height = 731
  Caption = #39044#35272#35797#21367
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Memo1: TMemo
    Left = 0
    Top = 0
    Width = 701
    Height = 704
    Align = alClient
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    Lines.Strings = (
      'Memo1')
    ParentFont = False
    ScrollBars = ssVertical
    TabOrder = 0
  end
  object Query1: TQuery
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'exam'
    SQL.Strings = (
      
        'select q.content from questionlib q natural join makepaper m  wh' +
        'ere m.paper_id=01 order by m.question_no')
    Left = 720
    Top = 8
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 760
    Top = 8
  end
end