كيف اقوم بتشغيل فورم اشأته برمجياً في كل مرة يعمل البرنامح بها

[M_Mori2010]

آخي أنه يعمل قبل اغلاق البرنامج لكن الذي آُريدْه هو تشغيله بعد اغلاق البرنامج شكراً لك
عمل المتغير i هو شيء اخر لكن على سرعة النسخ نسيت محوه
آما بالنسبة لـ Sav هذا هو الكود الذي هو عبارة عن حفظ الفورم :

PHP كود :

public
  constructor Create(AOwner: TComponent); override; // (1)
  procedure BeforeDestruction; override;
  end;

var
  Form5: TForm5;
     PreservePath: string; // (3)
implementation
uses Unit1, Unit4, Unit9, Unit3, Unit2;
{$R *.dfm}
procedure TForm5.BeforeDestruction;
begin
  inherited;

  with TFileStream.Create(PreservePath + ClassName + '.sav',    fmCreate) do
  try
    WriteComponent(Self);
  finally
    Free;
  end;
    end;
Constructor TForm5.Create(AOwner: TComponent);
begin
  PreservePath := ExtractFilePath(Application.ExeName) +
    'Preserve';
  if not DirectoryExists(PreservePath) then
    CreateDir(PreservePath);
  PreservePath := PreservePath + '\';

  if FileExists(PreservePath + name + '.sav') then
  begin
    CreateNew(AOwner, 0);
    with TFileStream.Create(PreservePath + name + '.sav',
                            fmOpenRead or fmShareDenyWrite) do
    try
      ReadComponent(Self);
    finally
      Free;
    end;
  end
  else

  inherited Create(AOwner);

end; 


ما رآيك بالحل الاتي :
البيانات التي تقوم بنسخ الفورم وعمله موجودة ومخزنة في ListView ما رأيك لو قمت بعمل
اعادة تكوين في كل تشغيل للبرنامج اقوم به لأن البرنامج هو عبارة عن سيرفر لبرنامج دردشة ؟
هل هو حل مناسب ؟

شكراً لك وجزاك الله كل خير