ut_dl_clt.~dfm

罗小平<<delphi精要>>一书源码

object FM_DL_CLT: TFM_DL_CLT
  Left = 331
  Top = 277
  Width = 285
  Height = 115
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #25991#20214#19979#36733#23458#25143#31471
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object lbNote: TLabel
    Left = 12
    Top = 11
    Width = 192
    Height = 16
    Caption = #27491#22312#19979#36733#25991#20214#65292#35831#31561#24453#8230#8230
  end
  object ggCopy: TGauge
    Left = 13
    Top = 35
    Width = 251
    Height = 20
    Color = clBlack
    ForeColor = clLime
    ParentColor = False
    Progress = 0
  end
  object btCommand: TButton
    Left = 96
    Top = 60
    Width = 75
    Height = 25
    Caption = #24320#22987
    Default = True
    TabOrder = 0
    OnClick = btCommandClick
  end
  object CltSocket: TClientSocket
    Active = False
    ClientType = ctBlocking
    Port = 0
    Top = 56
  end
end