unit1.dfm

来自「《Delphi实用程序100例》配套书源码盘」· DFM 代码 · 共 35 行

object Form1: TForm1
  Left = 200
  Top = 109
  Width = 375
  Height = 403
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Courier New'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 15
  object WindowsNameListBox: TListBox
    Left = 8
    Top = 8
    Width = 353
    Height = 313
    ImeName = '中文 (简体) - 智能 ABC'
    ItemHeight = 15
    TabOrder = 0
  end
  object ListButton: TButton
    Left = 104
    Top = 336
    Width = 137
    Height = 25
    Caption = '枚举系统窗口标题'
    TabOrder = 1
    OnClick = ListButtonClick
  end
end