unitserver.dfm

一个文件传输的程序

object Form1: TForm1
  Left = 510
  Top = 195
  Width = 343
  Height = 468
  Caption = 'server'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Memo1: TMemo
    Left = 0
    Top = 0
    Width = 335
    Height = 403
    Align = alClient
    Color = clSkyBlue
    ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
    Lines.Strings = (
      'Memo1')
    TabOrder = 0
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 403
    Width = 335
    Height = 19
    Panels = <
      item
        Text = #19978#38754#30340#26694#20013#26174#31034#25991#20214#20256#36865#30340#36827#31243#19982#29366#24577
        Width = 50
      end>
    SimplePanel = False
  end
  object SaveDialog1: TSaveDialog
    Left = 104
    Top = 72
  end
  object ss: TServerSocket
    Active = False
    Port = 0
    ServerType = stNonBlocking
    OnClientRead = ssClientRead
    Left = 48
    Top = 64
  end
  object MainMenu1: TMainMenu
    Left = 128
    Top = 152
    object N1: TMenuItem
      Bitmap.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000CE0E0000D80E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
        2222222222200022222222222005580222222220055FF780222220055FF00778
        0222855FF0055077802285F00555550778028005553B55507780855555535555
        070225F55555BB555002225F555553BB55022225F55535BB555022225F55BBB5
        5500222225F5555500222222225F550022222222222550222222}
      Caption = #35828#26126
      ShortCut = 16450
      object N2: TMenuItem
        Bitmap.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
          888888888880088888888888880B308888888888880B30888888888888800888
          88888888880B308888888888880B308888888888880B308888888888880BB308
          888888880080BB3088888880B3080BB308888880B30880B308888880BB300BB3
          088888880BBBBB30888888888000000888888888888888888888}
        Caption = #20851#20110#20027#26426#26381#21153#31471
        OnClick = N2Click
      end
    end
  end
end