receiveunit.dfm

来自「《Delphi7经典问题解析》源代码」· DFM 代码 · 共 44 行

object Form1: TForm1
  Left = 450
  Top = 380
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #21033#29992#20869#23384#26144#23556#25216#26415#23454#29616#25968#25454#20256#36882'Receive '
  ClientHeight = 73
  ClientWidth = 342
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 8
    Width = 174
    Height = 12
    Caption = #30001'SendData'#31243#24207#20256#36882#36807#26469#30340#20449#24687':'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Edit1: TEdit
    Left = 16
    Top = 32
    Width = 297
    Height = 21
    TabOrder = 0
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 216
  end
end