ut_dl_srv.~dfm

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

object FM_DL_SRV: TFM_DL_SRV
  Tag = 100
  Left = 200
  Top = 171
  Width = 610
  Height = 308
  Caption = #25991#20214#19979#36733#26381#21153#31471
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 14
  object sbSRV: TStatusBar
    Left = 0
    Top = 262
    Width = 602
    Height = 19
    Panels = <
      item
        Text = #24403#21069#32447#31243#25968#65306'0'
        Width = 480
      end
      item
        Text = #25991#20214#19979#36733#26381#21153#31471
        Width = 50
      end>
    SimplePanel = False
  end
  object pcSRV: TPageControl
    Left = 0
    Top = 0
    Width = 602
    Height = 262
    ActivePage = TabSheet1
    Align = alClient
    TabIndex = 0
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = #29992#25143#20449#24687
      object UserInfo: TListView
        Left = 0
        Top = 0
        Width = 594
        Height = 233
        Align = alClient
        Columns = <
          item
            Caption = #26102#38388
            Width = 150
          end
          item
            Caption = #20027#26426#21517
            Width = 60
          end
          item
            Caption = #22320#22336
            Width = 120
          end
          item
            Caption = #31471#21475
            Width = 40
          end
          item
            Caption = #20256#36865#25991#20214
            Width = 95
          end
          item
            Caption = #25991#20214#25968
            Width = 55
          end
          item
            Caption = #29366#24577
            Width = 70
          end>
        RowSelect = True
        TabOrder = 0
        ViewStyle = vsReport
      end
    end
  end
  object SrvSocket: TServerSocket
    Active = False
    Port = 5643
    ServerType = stThreadBlocking
    OnGetThread = SrvSocketGetThread
    Left = 96
    Top = 64
  end
end