unit1.dfm

DELPHI经典程序

object Form1: TForm1
  Left = 99
  Top = 136
  Width = 259
  Height = 366
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 6
    Top = 250
    Width = 185
    Height = 15
    AutoSize = False
    Caption = 'CaretPos '#35831#22312'memo1 click'#27979#35797
    Color = clAqua
    ParentColor = False
  end
  object Label2: TLabel
    Left = 6
    Top = 316
    Width = 32
    Height = 13
    Caption = 'Label2'
    Color = clAqua
    ParentColor = False
  end
  object Memo1: TMemo
    Left = 2
    Top = 6
    Width = 121
    Height = 119
    Lines.Strings = (
      'Memo1'
      #25105#26159#23567#25289
      #25105#22312#24037#20316
      'CYH '#21644' '#21488#28286#38463#28304)
    TabOrder = 0
    OnChange = Memo1Change
    OnMouseDown = Memo1MouseDown
  end
  object GroupBox1: TGroupBox
    Left = 6
    Top = 132
    Width = 237
    Height = 113
    Caption = '(Memo1) TMemo '#30340' Lines:TString'
    TabOrder = 1
    object Button1: TButton
      Left = 10
      Top = 38
      Width = 45
      Height = 20
      Caption = 'Add'
      TabOrder = 0
      OnClick = Button1Click
    end
    object Edit1: TEdit
      Left = 12
      Top = 14
      Width = 221
      Height = 21
      TabOrder = 1
      Text = 'Edit1'
    end
    object Button2: TButton
      Left = 60
      Top = 38
      Width = 55
      Height = 20
      Caption = 'Append'
      TabOrder = 2
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 120
      Top = 38
      Width = 51
      Height = 20
      Caption = 'Insert'
      TabOrder = 3
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 176
      Top = 38
      Width = 55
      Height = 20
      Caption = 'Delete'
      TabOrder = 4
      OnClick = Button4Click
    end
    object Button5: TButton
      Left = 10
      Top = 62
      Width = 45
      Height = 20
      Caption = 'Clear'
      TabOrder = 5
      OnClick = Button5Click
    end
    object Button7: TButton
      Left = 10
      Top = 86
      Width = 73
      Height = 20
      Caption = 'SaveToFile'
      TabOrder = 6
      OnClick = Button7Click
    end
    object Button8: TButton
      Left = 98
      Top = 86
      Width = 81
      Height = 20
      Caption = 'LoadFromFile'
      TabOrder = 7
      OnClick = Button8Click
    end
    object Button6: TButton
      Left = 60
      Top = 62
      Width = 55
      Height = 20
      Caption = 'Move'
      TabOrder = 8
      OnClick = Button6Click
    end
  end
  object Memo2: TMemo
    Left = 128
    Top = 6
    Width = 121
    Height = 119
    Lines.Strings = (
      'Memo2')
    TabOrder = 2
  end
  object GroupBox2: TGroupBox
    Left = 6
    Top = 268
    Width = 237
    Height = 45
    Caption = 'Want Return,Tabs'
    TabOrder = 3
    object Button9: TButton
      Left = 8
      Top = 16
      Width = 103
      Height = 22
      Caption = 'WantReturn'
      TabOrder = 0
      OnClick = Button9Click
    end
    object Button10: TButton
      Left = 120
      Top = 16
      Width = 103
      Height = 22
      Caption = 'WantTabs'
      TabOrder = 1
      OnClick = Button10Click
    end
  end
end