Полностью сохранить форму в файл как .dfm

[anton14]

Доброго всем дня! Проблема такая: нашёл в доках информацию такого типа: "Полностью сохранить форму в файл как .dfm "
вот код

constructor TForm1.Create(AOwner TComponent); override;
var
fname :string;
begin
{ Для динамически создаваемых контролов, может требоваться
RegisterClasses(..); }
fname := FormFilename;
if FileExists( fname ) then
begin
CreateNew(AOwner);
ReadComponentResFile(fname, Self);
end
else
inherited Create( AOwner );
end;

procedure TForm1.FormCloseQuery( Sender TObject;
var CanClose: Boolean);
begin
WriteComponentResFile(FormFileName, Self);
end;

целая гора ошибок!
p.s сильно не судить
Заранее благодарен!

[Alter]

и какие же там ошибки пишет?

[anton14]

вот ошибки:

[Error] Unit1.pas(52): Undeclared identifier: 'Create'
[Error] Unit1.pas(58): Undeclared identifier: 'FormFilename'
[Error] Unit1.pas(61): Undeclared identifier: 'CreateNew'
[Error] Unit1.pas(62): Undeclared identifier: 'Self'
[Error] Unit1.pas(65): This form of method call only allowed in methods of derived types
[Error] Unit1.pas(68): Undeclared identifier: 'FormCloseQuery'

[Alter]

Полный текст(компоненты[Button и Edit] для проверки были):

unit UniForm;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Button1: TButton;
    Edit2: TEdit;
    procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
  private
    { Private declarations }
  public
   constructor Create(AOwner :TComponent); override;
    { Public declarations }
  end;

Const FormFilename='Save.ini';

var
  Form1: TForm1;

implementation

{$R *.dfm}

constructor TForm1.Create(AOwner :TComponent);
var
fname :string;
begin
 fname := FormFilename;
 if FileExists( fname ) then
 begin
  CreateNew(AOwner);
  ReadComponentResFile(fname, Self);
 end
  else
 inherited Create( AOwner );
end;

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
 WriteComponentResFile(FormFileName, Self);
end;

end.

[anton14]

Alter огромное СПАСИБО!

[artemavd]

Сохранение я сделал. А как можно загрузить и отобразить вторым окном сохраненную форму в мое работающее приложение? Знаю, что через ReadComponentResFile, но как применить, а именно отобразить форму вторым окном - не знаю.