动态修改delphi窗口

				object frmMain: TfrmMain
				  Left = 124
				  Top = 96
				  AutoScroll = False
				  Caption = 'DFM View'
				  ClientHeight = 529
				  ClientWidth = 768
				  Color = clBtnFace
				  Font.Charset = GB2312_CHARSET
				  Font.Color = clWindowText
				  Font.Height = -12
				  Font.Name = #203#206#204#229
				  Font.Style = []
				  OldCreateOrder = False
				  Position = poScreenCenter
				  PixelsPerInch = 96
				  TextHeight = 12
				  object scrlbx1: TScrollBox
				    Left = 0
				    Top = 0
				    Width = 768
				    Height = 481
				    Align = alClient
				    TabOrder = 0
				  end
				  object pnlBottom: TPanel
				    Left = 0
				    Top = 481
				    Width = 768
				    Height = 48
				    Align = alBottom
				    BevelOuter = bvNone
				    TabOrder = 1
				    object btnShowForm: TButton
				      Left = 9
				      Top = 11
				      Width = 88
				      Height = 29
				      Caption = #180#242#191#170' dfm'
				      TabOrder = 0
				      OnClick = btnShowFormClick
				    end
				    object btn1: TButton
				      Left = 673
				      Top = 11
				      Width = 88
				      Height = 29
				      Caption = #203#181#195#247
				      TabOrder = 1
				      OnClick = btn1Click
				    end
				  end
				  object dlgOpen1: TOpenDialog
				    DefaultExt = '*.dfm'
				    Filter = 'dfm|*.dfm'
				    Left = 304
				    Top = 88
				  end
				end