unit1.dfm

Delphi 有很多很好的例子

object Form1: TForm1
  Left = 192
  Top = 107
  Width = 462
  Height = 330
  Caption = #20998#38548#31383#20307
  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 Memo1: TMemo
    Left = 0
    Top = 0
    Width = 454
    Height = 41
    Align = alTop
    Lines.Strings = (
      'Memo1')
    TabOrder = 0
    OnDragOver = MemoDragOver
  end
  object Panel1: TPanel
    Left = 0
    Top = 41
    Width = 454
    Height = 6
    Cursor = crVSplit
    Align = alTop
    DragCursor = crVSplit
    DragMode = dmAutomatic
    TabOrder = 1
  end
  object Memo2: TMemo
    Left = 0
    Top = 47
    Width = 454
    Height = 249
    Align = alClient
    Lines.Strings = (
      'Memo2')
    TabOrder = 2
    OnDragOver = MemoDragOver
  end
end