unit1.dfm

Delphi中一个可以进行内容编辑的Grid

object Form1: TForm1
  Left = 289
  Top = 141
  Width = 495
  Height = 344
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 240
    Top = 208
    Width = 216
    Height = 13
    Caption = #26174#31034#25968#25454#21518#65292#28857#26576#26684#65292#21487#20197#23545#20854#36827#34892#32534#36753
  end
  object Label2: TLabel
    Left = 232
    Top = 224
    Width = 225
    Height = 39
    Caption = #36755#20837#20102#38169#35823#20540#65292#19988#28857#20987#28378#21160#26102#65292#13#10#20250#21457#29983'Text'#20301#32622#38169#35823#30340#29616#35937#13#10#37319#29992#38190#20837#26102#25918#38169#65292#21487#36991#20813#27492#38382#39064
  end
  object sg: TStringGrid
    Left = 24
    Top = 16
    Width = 441
    Height = 177
    Ctl3D = False
    FixedCols = 0
    RowCount = 10
    ParentCtl3D = False
    ScrollBars = ssVertical
    TabOrder = 0
    OnEnter = sgEnter
    OnSelectCell = sgSelectCell
  end
  object RzButton1: TRzButton
    Left = 32
    Top = 208
    Width = 97
    Height = 33
    Caption = #26174#31034#25968#25454
    TabOrder = 1
    OnClick = RzButton1Click
  end
  object RE1: TRzEdit
    Left = 149
    Top = 212
    Width = 65
    Height = 26
    Color = clMoneyGreen
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    FocusColor = clMoneyGreen
    ParentFont = False
    TabOrder = 2
    Visible = False
    OnExit = RE1Exit
    OnKeyPress = RE1KeyPress
  end
end